关于鼠标右击的问题，在线等待，谢谢

Question

我对TTreeView进行操作，使用鼠标右击时获得当前节点，并带入函数进行操作，
如果先鼠标左击然后右击，就能够找到当前选中的节点，
但如果直接鼠标右击，就无法找到当前节点，得到的是前一次鼠标左击TreeView的节点，请问怎么解决，谢谢!

Answer 1

不可以马？有popupmenu的情况下怎么样？

Answer 2

procedure TForm1.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer );
var i:integer;
begin
  if Button=mbRight then
    begin
      i:=TreeView1.GetNodeAt(X,Y).Index;
      if i<>-1 then
       TreeView1.Selected:=TreeView1.GetNodeAt(X,Y);
    end;
end;