Z zhukairu Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #1 在一个窗体上有一个listbox和edit 在listbox中有4个选项 我选择了listbox中的任何一个选项，就在edit里显示出当前所选的选项。
风 ~风之彼端~ Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #2 在ListBox的OnChange事件中添加如下代码 Edit.Text:=ListBox.Text
V vine Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #4 ListBox没有OnChange呵 在ListBox的onClick() Edit.Text:=ListBox.items[ListBox.ItemIndex];
晴 晴 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #6 procedure TForm1.ListBox1Click(Sender: TObject); begin edit1.Text:=listbox1.Items[ListBox1.ItemIndex]; end;
procedure TForm1.ListBox1Click(Sender: TObject); begin edit1.Text:=listbox1.Items[ListBox1.ItemIndex]; end;
