这样写错那里了? (1分)

A

ajim

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-28

• #1

var<br>st:tstrings;<br>begin<br>st.Create;<br>st.Add(memo1.Lines.Text);<br>end;<br>

 

K

kingdeezj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-28

• #2

关注.

 

C

creation-zy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-28

• #3

请看 &nbsp;http://www.delphibbs.com/delphibbs/dispq.asp?lid=867513

 

R

rainsea

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-15

• #4

这样当然不可以，<br>TStrings是抽象类，不可以对它进行赋值等的操作，可以使用TStringList等。<br>详细的看一下帮助。

 

C

chocolate

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-15

• #5

st:=TStringList.Create

 

S

sichuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-16

• #6

看我的:<br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br>&nbsp; st:tstringlist;<br>&nbsp; i:word;<br>begin<br>&nbsp; st:=tstringlist.Create;<br>&nbsp; st.AddStrings(memo1.Lines);<br>&nbsp; treeview1.Items.Clear;<br>&nbsp; for i:=0 to st.Count -1 do<br>&nbsp; &nbsp; treeview1.Items.AddChild(nil,st.Strings);<br>&nbsp; st.Free;<br>end;<br>

 

A

ajim

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-31

• #7

接受答案了.