请问:如果关闭OutputDebugString的输入信息

Question

有没有编译开关指令呢?或者选项是如何的呢貌似{$D}不行.

Answer 1

OutputDebugString 是一个标准的windows api接口函数,直接在delphi中调用时,没有编译开关来指示其是否输出的;

Answer 2

如要达到你的这种要求,可以将OutputDebugString 写到宏语句中,{$IFDEF __DEBUG} 
OutputDebugString("output a log");
{$ENDIF} 

Answer 3

还有种变态的方法，在上面声明一OutputDebugString同名函数procedure OutputDebugString(lpOutputString: PChar);
begin
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  OutputDebugString('hello world');
end;

Answer 4

哈哈,zswang(伴水清清)的方法,果然够BT~~~强