怎么实现通过点击listview某一行后,将这一行的几个字段分别读到几个edit.text?
如listview某一行:aaaa | bbbb | cccc |
点击该行后:edit.text=aaaa , edit.text=bbbb , edit.text=cccc
请赐教!谢谢!
如listview某一行:aaaa | bbbb | cccc |
点击该行后:edit.text=aaaa , edit.text=bbbb , edit.text=cccc
请赐教!谢谢!
解决方案 »
- 求 文本框赋值的SQL语句写法
- 求助"Internal error: U1196"错误
- 奇怪:在Delphi5下编译过的程序,在Delphi6下编译报错:[Error] Ujf_ybzxf.pas(310): Undeclared identifier: 'VarArrayOf'
- delphi5安装请教(100分)
- Delphi7中没有NMUDP控件,但是我的程序里用到该控件,请问怎么样才能在Delphi7中使用该控件
- delphi 中有像C++中的可以指定某段程序可以不编译的操作吗?
- 一个奇怪的SQLServer问题。。。
- 关于SQL效率的问题
- 有谁知道如何在Delphi中带参调用.bat文件,解决后定加分,不够再加...
- 我的新代码该放在派生类过程的哪儿呢?
- 用delphi做个系统没问题,但是就是题目意思看不懂,大家帮我分析分析这说的是什么意思
- 怎么让按回车就相当于点击了‘确定’按钮
ListView2.Selected.SubItems[0]、ListView2.Selected.SubItems[1]
//.......
var s: string;
s := ListView.Items[i - 1].Caption;
第i行,j列(j > 1):
var s: string;
s := ListView.Items[i - 1].SubItems[j - 1];
//很久不用,如果不行,你试验下面的
s := ListView1.Items[i-1].SubItems[j-1].Text
edit2.text:=listview1.Selected.SubItems.Text;
这个能够实现,但是点第二次就会出错,怎么回事?
有更完善的代码吗?
var
s:string;
begin
try
s := listview1.Selected.Caption;
except
exit;
end;
edit1.Text := listview1.Selected.Caption;
edit2.Text := listview1.selected.SubItems[0];
edit3.Text := listview1.Selected.SubItems[1];
end;