一个急简单的问题,马上就结贴,在线= 如何从listbox中取出被选上的值!!在线等 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 给你点代码自己看看把procedure TForm1.Button1Click(Sender: TObject);vari:integer;begin for i:=0 to listbox1.Items.Count-1 do begin if listbox1.Selected[i] then begin listbox2.Items.Text:=listbox1.Items.Strings[i]; end; end;end; 急急急!!!delphi 保存报错 关于datagrid刷新的问题~ 插入 JPG 文件时报错,求救... 请问高手!!怎么样获得本机的DNS?? 给大家介绍一个好的Delphi原码网站 ~~~~~~~~~请大家帮帮小弟,过来看看,不够再加。~~~~~~~~ XImage 控件哪里有? 怎样让同一幅图的两种效果同时在一个窗体的两个image里同时显示出来? 如何让IE打开一个指定的网页? 如何确定StringGrid中的文本(不是整个单元格)呈选中状态? 我的BDE不能连上数据库,如何解决? 自己做了一个DELPHI版本控制的东东
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=0 to listbox1.Items.Count-1 do
begin
if listbox1.Selected[i] then
begin
listbox2.Items.Text:=listbox1.Items.Strings[i];
end;
end;
end;