如何实现用鼠标左键点击Button弹出快捷菜单Popupmenu?

Question

如何实现用鼠标左键点击Button弹出快捷菜单Popupmenu?

Answer 1

在Button的OnClick写:
PopupMenu1.Pop(Mouse.curson.x,Mouse.curson.y);

Answer 2

PopupMenu1.Popup(100,100);//后面的100，100是坐标

Answer 3

写错了 -_-# 怪不得越看越晕！
PopupMenu1.Pop(Mouse.CursorPos.x,Mouse.CursorPos.y);

Answer 4

PopupMenu1.Popup(Mouse.CursorPos.x,Mouse.CursorPos.y);
哈哈！　^_^　楼主包涵

Answer 5

procedure TForm1.buttonClick(Sender: TObject);
begin
  PopupMenu1.Popup(Mouse.CursorPos.x,Mouse.CursorPos.y);
end;