X xuefeng_zzg Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-04 #1 我是delphi新手 我想请问一下在delphi中能否用一个按钮实现将一个listbox的项目传递给另一个listbox?
A ANiDelphi Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-04 #2 ListBox2.Items.Assign(ListBox1.Items);
L liyinwei Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-04 #3 ListBox2.Items.Add(ListBox1.Items[0]); ListBox2.Items.Insert(0,ListBox1.Items[0]);
X xuefeng_zzg Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-04 #4 可能我的描述不太正确应该是传递选中的值,不过刚解决了。还是散分吧。 var i:Integer; begin for i :=0 to ListBox1.Count-1 do begin if ListBox1.Selected then ListBox2.Items.Add(ListBox1.Items.Strings); end; ListBox1.DeleteSelected;//增加后删除所选的记录 end;
可能我的描述不太正确应该是传递选中的值,不过刚解决了。还是散分吧。 var i:Integer; begin for i :=0 to ListBox1.Count-1 do begin if ListBox1.Selected then ListBox2.Items.Add(ListBox1.Items.Strings); end; ListBox1.DeleteSelected;//增加后删除所选的记录 end;