在一个LISTBOX中,我选择了多条项目,如何让这些条目顺序加入另外一个LISTBOX中? 在一个LISTBOX中,我选择了多条项目,如何让这些条目顺序加入另外一个LISTBOX中? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 listbox2.items.clear;for i:=0 to listbox1.items.count-1 do begin if listbox1.selected[i] then listbox2.items.add(listbox1.items[i]); end;不知道你是不是这个意思。 var i:integer;beginfor i:=0 to listbox1.items.count-1 do if listbox1.selected[i] then listbox2.items.add(listbox1.items[i]);end; 急求:用ADOQuery查询大批量数据的速度问题 数字溢出问题 edit *号 怎么修改呢? 请教,程序运行时提示这样错误? 系统更换域管理模式后,我的Delphi用重装吗? 100分在线等待给分,数据更新简单问题 报表格式问题 向高手请教动态建报表的问题 RS232与RS485,韦根26 串口通讯编程的区别? 出现"Variant does not reference an automation object."提示错误是什么原因,如何处理? 散分。怎样判断某条记录在数据库中不存在。 怎么来限制字段的格式和长度?
listbox2.items.clear;
for i:=0 to listbox1.items.count-1 do
begin
if listbox1.selected[i] then
listbox2.items.add(listbox1.items[i]);
end;不知道你是不是这个意思。
i:integer;
begin
for i:=0 to listbox1.items.count-1 do
if listbox1.selected[i] then
listbox2.items.add(listbox1.items[i]);
end;