请选择 进入手机版 | 继续访问电脑版

大富翁Delphi开发技术网站

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 1710|回复: 0

GetLastTrueErrorText 获取 WIN API 错误文本 V1.0.2015.1029

[复制链接]

970

主题

1459

帖子

4501

积分

论坛元老

Rank: 8Rank: 8

积分
4501
发表于 2015-11-6 09:57:51 | 显示全部楼层 |阅读模式
精品文章
支持版本: Delphi XE10 
资源分类: 系统 
发布平台: Windows 
转载地址: -

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
  1. Function GetLastTrueErrorText: WideString;
  2. var
  3.   ErrorID: Cardinal;
  4. begin
  5.   ErrorID := GetLastError;
  6.   if ErrorID<>ERROR_SUCCESS then
  7.   begin
  8. //    Result := GetLastErrorText(ErrorID);
  9.     Result := SysErrorMessage(ErrorID, '');
  10.   end
  11.   else
  12.   begin
  13.     Result := '';
  14.   end;
  15. end;
复制代码


转载请保留当前帖子的链接:http://www.dfwlt.com/forum.php?mod=viewthread&tid=2062 谢谢!

搜索简单,分享不易,且分享且珍惜,您难道不想分享下您的心得?如果觉得本文章好的话,您可以在我们网站上注册,然后发布您的好的心得,让大家共同进步,谢谢!

最新添加

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

申请友链|Archiver|手机版|小黑屋|大富翁Delphi开发技术网站 ( 苏ICP备12065705号-4

GMT+8, 2020-1-28 09:20 , Processed in 0.125777 second(s), 30 queries .

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表