我的问题是右键单击空白处他总是弹出最后一次拥有焦点的节点的弹出菜单

在Delphi的treeview应用中出错，右键单击不同的节点弹出不同的弹出菜单 
treeview中的父节点和子节点如下： 
我的客户 
  客户1 
  客户2 
我的任务 
  任务a 
  任务b 
    任务bb 
    任务bc 
任务任务bb是任务b的子节点，任务b是我的任务的子节点
代码如下：
procedure TMainForm.TreeView1Click(Sender: TObject);
var
pt1 :TPoint;
selectedNode1:TTreeNode;
begin   pt1 := Mouse.CursorPos;
   pt1 := TreeView1.ScreenToClient(Mouse.CursorPos);
   treeview1.RightClickSelect:=true;
   selectedNode1:=TreeView1.GetNodeAt(pt1.X,pt1.Y);
   if TreeView1.GetNodeAt(pt1.X,pt1.Y)<>nil then
     if (selectedNode1.Level=0)and (selectedNode1.Index=0)and(TreeView1.GetNodeAt(pt1.X,pt1.Y).Text ='我的客户') then
     TreeView1.PopupMenu := PopupMenu1
     else if (selectedNode1.Level=0)and (selectedNode1.Index=1)and(TreeView1.GetNodeAt(pt1.X,pt1.Y).Text ='我的任务') then
     TreeView1.PopupMenu := PopupMenu2
     else if (selectedNode1.Level=0)and (selectedNode1.Index=3)and(TreeView1.GetNodeAt(pt1.X,pt1.Y).Text ='我的日志') then
      TreeView1.PopupMenu := PopupMenu3;
end;end.
怎么在空白处单击也不行啊，照样出现获得最后焦点的哪个弹出窗口啊