我有个treeview很简单的问题呀

Question

OnItemDoubleClick事件怎么使用啊

Answer 1

case TreeView1.Selected.Level of
  0:
   begin
      showmessage(treeview1.Selected.Text);
   end;
   1:
   begin
      showmessage(treeview1.Selected.Text);
   end;
    .
    .
    .
end;

Answer 2

private
  { Private declarations }
   FOnIt:Boolean;
procedure TForm1.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  FOnIt:=( htOnItem in self.TreeView1.GetHitTestInfoAt(x,y) );
end;procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
  if FOnIt then
    showmessage( 'itemdoubleclick is true' )
  else
    showmessage( 'itemdoubleclick is false' )
end;

Answer 3

if Treeview1.Selected = nil then exit;
ShowMessage(Treeview1.selected.text);

Answer 4

百度里搜索一下：OnItemDoubleClick
没有解决问题的话，那请问你想要作什么？