Y ysl66 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #2 listbox.Items.Strings listbox.Items.Text
L linsb Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #3 procedure TForm1.Button1Click(Sender: TObject); var m:byte; begin for m := 0 to ListBox1.Items.count - 1 do if ListBox1.Selected[m] then edit1.text:=ListBox1.Items[m]; end;
procedure TForm1.Button1Click(Sender: TObject); var m:byte; begin for m := 0 to ListBox1.Items.count - 1 do if ListBox1.Selected[m] then edit1.text:=ListBox1.Items[m]; end;
P peng_qs Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #4 Item[0] 用STring. Items用TStringList
D dlnew Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #6 listbox.items[listbox.itemindex];
L linsb Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #7 我的贴子就是你所要的，直观。 dinew的可以，简练。
P pnljh Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #8 edit1.text:=listbox1.Items[listbox1.ItemIndex];
哈 哈利波特 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #9 listbox1.items[listbox1.itemindex] 同意楼上的几位
Y yfdciom Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #10 楼上的也对，你还可以用checklistbox.试着用不同的控件完成同一件事，其乐无穷
C chenzheng770101 Unregistered / Unconfirmed GUEST, unregistred user! 2002-05-24 #11 edit1.text:=listbox1.Items[listbox1.ItemIndex];
