delphi中有没有象C&C++中的static变量,我想在一个函数中申明一个这样的变量,要不我只好定义全局变量了:(

Question

procedure TForm1.Button1Click(Sender: TObject);
{$J+}
  const
    a:Integer = 0;
    b:Integer = 0;
    c:Integer = 0;
{$J-}
beginend;
你的那个问题我已经给你解答了!

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
{$J+}
  const
    a:Integer = 0;
    b:Integer = 0;
    c:Integer = 0;
{$J-}
begin
   inc(a);
   showmessage(inttostr(a));
end;

Answer 2

var
   ListItem:TListItem;
  begin
    with ListView1 do
      begin
         columns.add;
         columns.add;
         columns[0].caption:='语言';
         columns[1].caption:='应用方向';
         viewstyle:=vsReport;
         Items.Clear ;
         ListItem:=Items.Add ;
         ListItem.Caption :='java';
         ListItem.SubItems.Add ('internet');
         ListItem:=Items.Add ;
         ListItem.Caption :='delphi';
         ListItem.SubItems.Add ('windows');
      end;
end;

Answer 3

这是不是delphi才有的,
原来的pascal有这种变量嘛?

Answer 4

ListView中设置的在设计阶段,设置columns属性(比如caption),是不是只有在运行的时候才能看见效果??