请教一个关于listView的问题 把ListView1.Items[0].Selected:=true;移到With语句后面看看 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你是在ListView的OnSelectItem事件中写的吗? 显示选中是自动的不需要对Selected赋值试试下面的代码:procedure TForm1.ListView1Click(Sender: TObject);var Item: TListItem;begin if ListView1.Selected = nil then Exit; Item := ListView1.Selected; Edit1.Text := Item.Caption; Edit2.Text := Item.SubItems[0]; //... continueend; 高分请教!delphi smtp群发邮件+自己搭建服务器的问题! SPY++问题 dephi 关于TADOQuery使用Tcomponent的问题 File not found: 'cxExportGrid4link.dcu' 如何编程来控制windows的“组策略”编辑器呢?如解决另高分相赠! 谢谢! ADOQUERY执行遇到的奇怪问题 为什么我获取不到QQ文本框的文字呢? 中文版哪有? 怎样彻底关闭一个adoconnection的连接 C/S架构向三层转换的问题 打印图象的实际问题,急! 怎样得到CPU的ID?
试试下面的代码:
procedure TForm1.ListView1Click(Sender: TObject);
var
Item: TListItem;
begin
if ListView1.Selected = nil then
Exit;
Item := ListView1.Selected;
Edit1.Text := Item.Caption;
Edit2.Text := Item.SubItems[0];
//... continue
end;