问个简单的问题

Question

分别在窗体和控件的PopupMenu的属性选择PopupMenu1和PopupMenu2

Answer 1

分别在窗体和控件的MouseDown的事件中写代码

Answer 2

能否说清楚些在那个event中写什么代码
先谢谢各位朋友指教

Answer 3

当我在窗体的PopupMenu的属性选择PopupMenu1后
右击edit时不是原来的编辑菜单而是婆婆PopupMenu1的菜单
有没有什么办法使的对窗体右击时弹出PopupMenu1，对edit右击时弹出编辑菜单
谢谢

Answer 4

窗体的PopupMenu的属性为空，放入一个 PopupMenu1 并添加几个选项，然后
在窗体的 OnMouseDown 事件中写入：procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  P: TPoint;
begin
  GetCursorPos(P);
  if Button = mbRight then
    PopupMenu1.Popup (P.x, P.y);
end;//OK

Answer 5

Greenberet(百萬石) 说得对！来晚了！

Answer 6

赞成Greenberet(百萬石)的做法！