怎么使用popupmenu?

Question

popupmenu是右键才弹出的。自己改或是用第三方控件。

Answer 1

表单上增加一个popupmenu组件，设置button的popupmenu为这个popupmenu组件，或者在鼠标事件中指定弹出

Answer 2

修改Button的OnClick事件，然后获得鼠标位置（设成Button的左上角也可以）
然后
     PopupMenu1.Popup(Button1.left+Left,button1.Top+Top);

Answer 3

用GetcursorPo(Pmouse)得到鼠标的坐标，然后判断按下的是左键还是右键。PopupMenu1.Popup（PMouse.x,PMouse.y);