小弟我做的程序包含一个listview和edit,我在listview的dbclick事件写入edit1.text:=listview1.selected.ca

X

xiaoxiami1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-18

• #1

小弟我做的程序包含一个listview和edit,我在listview的dbclick事件写入edit1.text:=listview1.selected.caption;当我双击listview里的项目时没有错，当我双击listview空白时就出错！大哥们怎么解决啊？(15分)<br />procedure TForm1.ListView1DblClick(Sender: TObject);
begin
edit1.Text:=listview1.Selected.Caption;
end;
点击空白时出错，怎么解决啊？

 

哈

哈利波特

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-18

• #2

建议先判断一下是否为空

 

Y

yue_shan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-18

• #3

if listview1.Selected=nil then Exit;
edit1.Text:=listview1.Selected.Caption;

 

C

chenxz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-18

• #4

简单的处理如yue_sha的就可以了，更深层的处理可以用处理onmousedown事件里
调用GetItemAt（）判断mouse点击的是哪个item或是空的

 

X

xiaoxiami1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-18

• #5

多人接受答案了。