Delphi小记录

[本人baidu博客全部搬家到csdn,baidu博客地址：http://hi.baidu.com/new/miracleconf]

1、Delphi里有断点调试,不过机子差的话,可能会慢一点.
关于控制台的输出调试

Java里有

system.out.println("");

ActionScript里有

Trace("");

那Delphi Console可以writeln但窗体程序怎么办呢？Google了一下.
结果是:
首先在你的*.DPR项目文件里加上这一行

{$APPTYPE CONSOLE}

然后可以

Writeln('文本');

像这样:

program MsgTo;
{$APPTYPE CONSOLE}
uses
Windows,SysUtils;
begin
WriteLn(‘测试信息’);
Sleep(1000);
end;

还有一种方法就是使用WinAPI的OutputDebugString函数然后再View|Debug Window|Event Log中查看

2、Delphi好像没有Static类型的,一般都是定义全局变量程序一开始运行就赋值,如果硬要的话,这样定义应该可以

procedure TForm1.Button1Click(Sender: TObject);
{$j+}const a :integer=0;{$j-}
Var
  b:integer;
begin
for b := 1 to 5 do
begin
  a := a+10;
showmessage(inttostr(a));
end
end;