如何将一个listbox中的值,复制给另一个listbox,同时删除本次所复制的值? 谢谢。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);vari:integer;begin for i:=0 to listbox1.Count-1 do begin if listbox1.Selected[i] then listbox2.Items.Add(listbox1.Items[i]); end; listbox1.DeleteSelected;end; listbox2.items.assign(listbox1.items)可以实现在复制 zhangyan920(zhangyan920) 不是已经说了吗? listbox1.DeleteSelected;这就是删除选中的部分呀 dbgrid数据删除问题 访问数库库出现dbexpora.dll,midas.dll 问题 为什么要用B/S架构,为什么要用J2EE/.NET?? ? 菜鸟请教:如果创建一个对象,该对象不存在怎么办? 呵呵,今天早上答辩了,不管结果怎么样,先散一百分再说 数据库连接问题 请问一下,各位大客的DELPHI7是在哪儿下的啊。我的D版不好用 keydown事件 各位帮我看看树状图由于tree.data的phar,而不能正确生成的问题,谢谢拉!!! 毕业了 如何修改数据库中的指定某格的数据?(菜鸟问题) 如何用fastreport制作报表定制工具??求救!!万分感激!!
var
i:integer;
begin
for i:=0 to listbox1.Count-1 do
begin
if listbox1.Selected[i] then
listbox2.Items.Add(listbox1.Items[i]);
end;
listbox1.DeleteSelected;
end;
可以实现在复制