delphi中调试信息输出

1 http://topic.csdn.net/t/20041018/02/3464822.html
首先在你的*.DPR项目文件里加上这一行  
  {$APPTYPE   CONSOLE}  
   
  然后  
  调用  
  Writeln('文本');  
  就行了  
2 http://blog.csdn.net/dogbear2000/archive/2005/02/03/279485.aspx
在Delphi中如何输出后台调试信息？

有些时候，我们需要输出调试信息，但又不在界面上，也不希望弹出窗口中断执行，
这时，只要用OutputDebugString就可以了，然后在View|Debug Window|Event Log查看结果即可。

例子：
var S : string;
for I:= 1 to 10000 do
begin
  ....

  OutputDebugString(PChar(S));
end;