C cjt0520 Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-02 #1 三个按钮，2个菜单````第一个是菜单按钮```怎样做到点击按钮2后```按钮1的菜单选项是1菜单里面的````点击按钮3后```按钮1的菜单选项是2菜单里面的``````````
C cjt0520 Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-02 #3 就是这样动态创建菜单``````点击不同的按钮````出现不同的菜单```
D de410 Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-02 #4 procedure TForm1.Button2Click(Sender: TObject);begin button1.PopupMenu:=PopupMenu1;end;procedure TForm1.Button3Click(Sender: TObject);begin button1.PopupMenu:=PopupMenu2;end;
procedure TForm1.Button2Click(Sender: TObject);begin button1.PopupMenu:=PopupMenu1;end;procedure TForm1.Button3Click(Sender: TObject);begin button1.PopupMenu:=PopupMenu2;end;
C cjt0520 Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-02 #5 按楼上的方法``点第一个按钮能读取菜单```但再点第2个的时候就读取不了了`````显示不出菜单了````WHY？
