天啊，见鬼了Tstringlist(50分)

C

coldfish

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-15

• #1

新建一工程，什么都没有
procedure TForm1.Button1Click(Sender: TObject);
var a:tstringlist;
begin
try
a.Create;
finally
a.Free;
end;
end;
运行不通过，为什么啊？

 

R

ranger18

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-15

• #2

天啊，你刚学Delphi呀！
procedure TForm1.Button1Click(Sender: TObject);
var a:tstringlist;
begin
try
a.Create;
finally
a.Free;
end;
end;

a.create 改为 a:=TStringList.Create

 

K

kaida

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-15

• #3

procedure TForm1.Button1Click(Sender: TObject);
var a:tstringlist;
begin
try
a:=tstringlist.Create;
finally
a.Free;
end;
end;

 

F

forsoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-15

• #4

[][][]

 

C

coldfish

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-16

• #5

多人接受答案了。