delphi7,如何操作listbox中的item,当单击某项后弹出窗体。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.ListBox1Click(Sender: TObject);var i:integer;beginfor i:=0 to (listbox1.Items.Count-1) do begin if listbox1.Selected[i] then showmessage('这里可以选择要弹出窗体!'); end;end; if self.ListBox1.Items.IndexOf('这里添你要求的列表项')=0 thenform2.show; BBS.csdn..... cxGrid1DBTableView1怎么不响应keypress事件呀? 一个输入法的问题,大家一定要帮忙! 怎样获得DBLookUpComboBox的keyField的值? 一个说容易但是感觉不太容易的问题 SOS,win2000下开发的窗口在98下都增大了 小弟急需解决的问题,请各位帮忙解决,感激不尽! 求助,DELPHI+ACCESS更新数据时出现“标准表达式中数据类型不匹配“ Acces中利用ADOQuery创建表使用Create Table语句,如何定义数据类型? 高手们请帮帮小弟? 在树的节点记录信息的问题 有成都的delphi程序员吗?
var
i:integer;
begin
for i:=0 to (listbox1.Items.Count-1) do
begin
if listbox1.Selected[i] then
showmessage('这里可以选择要弹出窗体!');
end;
end;
form2.show;