，listview里面的内容，如何响应双击事件啊

求助，，listview里面的内容，怎么响应双击事件啊~
我用delphi+sqlserver 2000，查询得到的内容在Listview里面显示
勾选checkbox后，按button4，则弹出form3。这个没有问题
现在要求通过双击选中并打开，应该怎样实现呢？
（空间不能传图片了，总是提示‘请选择图片’）

procedure TForm2.Button4Click(Sender: TObject);
var 
 num,i, t: Integer;
 // Query: TADOQuery;
begin
  t:= 0;
  num:=ListView1.items.count;
  if num = 0 then
  begin
  showmessage('没有记录，请先查询');
  Exit;
  end;
  for i:=0 to num-1 do
  begin
  if ListView1.Items[i].Checked then
  begin
  xuhao:= ListView1.Items[i].Caption;
  t:= 1;
  end;
  end;
  if t = 0 then
  begin
  showmessage('没有选中记录');
  exit;
  end;
  form3.ShowModal
end;



[解决办法]
Listview的Click事件
[解决办法]
Listview的Click事件
[解决办法]
在对像检查器里有一项 Events ，在这里面编写 DblClick 事件就可以了
[解决办法]
Listview有双击事件onDblClick!!!

Delphi(Pascal) code

  if ListView1.Selected <> nil then  begin    ListView1.Selected.Checked:=True;    ...  end;