OutputDebugString(PChar(SysErrorMessage(GetLastError))); 也可以为OutputDebugString再做层函数封装,以更方便的使用: procedure OutputDebugStr(const ADebugInfo: string); begin OutputDebugString(PChar(ADebugInfo)); end;
原文链接:http://blog.youkuaiyun.com/funnyfu0101/article/details/6562450
转载于:https://www.cnblogs.com/zhrong/p/5666649.html