我要疯掉了??请问,这段代码怎么错了?该怎样改了????(50分)

Y

yyhhnn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-28

• #1

procedure TForm1.Button1Click(Sender: TObject);
var sss:tstrings;
begin
memo1.Lines.Clear;
sss:=tstrings.Create;
sss.append('aaa');
sss.append('bbb');
sss.append('ccc');
memo1.Lines.Assign(sss);

end;

 

Y

yyhhnn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-28

• #2

一运行就出现异常 ABSTRACT ERROR 怎么回事了?

 

吴

吴剑明

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-28

• #3

tstrings是抽象类,抽象类是不能有类实例的.当然会出错.
你应该用TStringlist

 

W

wjing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-28

• #4

同意楼上的意见.
procedure TForm1.Button1Click(Sender: TObject);
var sss:tstringlist;
begin
memo1.Lines.Clear;
sss:=tstringlist.Create;
sss.append('aaa');
sss.append('bbb');
sss.append('ccc');
memo1.Lines.Assign(sss.strings);

end;

 

C

creation-zy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-28

• #5

你的程序在编译过程中就会出现编译警告，除非特殊情况，应该消除所有警告。

 

S

sonie

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-28

• #6

同意楼上各位

 

Y

yyhhnn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-07-30

• #7

多人接受答案了。