Delphi中用OutputDebugString显示调试信息
作者:webfly 日期:2007-08-27
今天在看《ISAPI Filter 限制 IIS 多线程访问》源码时,发现多处使用了
{$IFDEF DEBUG}
OutputDebugString('Call IpIncrement ...');
OutputDebugString(PChar('IP in IpIncrement ...'+IP));
{$ENDIF}
这样的语法,看意思是输出调试信息,跟踪定义到了widows单元,有这么几个定义
procedure OutputDebugString; external kernel32 name 'OutputDebugStringA';
procedure OutputDebugStringA; external kernel32 name 'OutputDebugStringA';
procedure OutputDebugStringW; external kernel32 name 'OutputDebugStringW';
Tags: Delphi中 OutputDebugString 调试
