showmessage(inttostr(ListBox1.ItemIndex));
解决方案 »
- BT题目 大家来回答~
- delphi与oracle
- 关于计算的问题
- 有谁知道TjvBitmapButton控件的使用,如何点击它,就让它消失呢,帮帮我啦,谢谢
- 急!急!各位大侠,怎样把byte类型的数据通过WriteFile函数据写入到串口.
- 初学者问题
- |||||我在WinXP下用Delphi7开发的程序在Win98下运行为什么窗体都变形了呢?急,在线等|||||||||||||
- 哪里有SQL语句的实例下载,我急需!谢谢!
- 如何获取其他程序中EDIT窗口中的内容?
- sql数据库备份恢复问题,急!急!急!我又多花了50分!
- 在keypress中如何屏蔽del键??
- 高手帮忙啊!如何实现一个搜索功能
I :integer ;
begin
for I := 0 to ListBox1.Items .count-1do
begin
if ListBox1.Selected[i] then
showmessage(inttostr(i))
end ;
end;
I :integer ;
begin
for I := 0 to ListBox1.Items .count-1do
begin
if ListBox1.Selected[i] then
showmessage(inttostr(i))
end ;
end;