怎么会出错，这么简单的问题，为什么MouseDown无法捕捉右键？

procedure Tkcfrm.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var  aTreeNode:TTreeNode;
begin
  if button=mbRight then
  begin
    showmessage('right click');
  end;
end;
在treeview1上点击左键、中建都没有问题，就是单价右键不管用？怎么回事呢？难道是鼠标的问题吗？可是如果给treeview1指定弹出菜单也能够用呀？不知道哪位遇到过，还凡指点一二。