关于listbox for i:=0 to ListBox1.Items.Count-1 do if (ListBox1.Items.Selected[i] then ListBox2.Items.Add(ListBox1.Items[i]); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 for i:=listbox1.count-1 downto 0 dobegin if listbox1.selected[i] then begin ListBox2.Items.Add(ListBox1.Items[i]); ListBox1.Items.Delete(ListBox1.i); end;end; 弹出两次对话框 感谢ARI的帮忙 这样定义的Button创建 TTreeView的一个问题?? Socket编程问题 怎样可以使控件Query中的数据,按自身的字段任意排序 请帮忙 !!! Delphi 5.0加上IBM 400数据库控件如何开发? 我有个建议,大家来看看 常识问题.... 我的一个数据库程序,在别的机器上运行时出现“exception EDBEngineErrorin in module get_data.dll at 00069006”,如何解决? 各位高手请进来帮忙读取excel表格数据入informix数据库的问题 LISTVIEW如何隐藏某一列不显示?
begin
if listbox1.selected[i] then
begin
ListBox2.Items.Add(ListBox1.Items[i]);
ListBox1.Items.Delete(ListBox1.i);
end;
end;