tstring问题=为什么会错? ( 积分: 25 )

F

fbms

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #1

void __fastcall TForm1::FormCreate(TObject *Sender)
{
TStrings *sl =new TStringList;
sl =Memo1->Lines;
delete sl;
}
这样会报错,为什么?

 

F

fbms

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #2

void __fastcall TForm1::FormCreate(TObject *Sender)
{
TStrings *sl =new TStringList;
sl =Memo1->Lines;
delete sl;
}
这样会报错,为什么?

 

S

suninrain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #3

delphi里
var sl:tstrings;
begin
sl:=tstringlist.create();
end;

 

F

fbms

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #4

void __fastcall TForm1::FormCreate(TObject *Sender)
{
TStrings *sl ;
sl=new TStringList;
sl =Memo1->Lines;
delete sl;
}
改成这样还是:编译没有问题,一关闭窗体就挂了.

 

D

dreamisx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #5

sl = Memo1->Lines 改为 sl->Assign(Memo1.Lines) 或 sl->Text = Memo1.Text 试试。

 

F

fbms

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #6

dreamisx说得好.谢谢.不过我不知道为什么错.

 

F

fbms

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #7

接受答案了.

 

F

fbms

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-24

• #8

晕,明白为什么了.
脑子坏了.转不过来了.