Delphi定义静态变量

发布于： 2012/12/11 22:33:47 | 发布在： Delphi文章 | 点击：

学过C语言的人都知道，C语言中可以用static关键字来定义一个局部的静态变量，Delphi中也可以定义静态变量，请看下面一段代码，并查看运行效果：

procedure TForm1.Timer1Timer(Sender: TObject);
{$J+}
const iStatic: Integer = 0;
{$J-}
begin
Inc(iStatic);
Caption := IntToStr(iStatic);
end;