怎样在弹出菜单上实现弹出菜单(100分)(100分)

  • 主题发起人 主题发起人 huifi
  • 开始时间 开始时间
H

huifi

Unregistered / Unconfirmed
GUEST, unregistred user!
如题:
怎样在POPMENU的菜单项上再实现POPMENU菜单??
在线等待.....
 
你不要等待了,大富翁有这个问题的解决大案的,搜搜就有的!
 
popup菜单本身就可以级联
在设计时,右击该菜单项选择“Create submenu”
 
to shenloqi:
给个ID 我在DFW上搜了一在堆弹出菜单,就是不见我要的解答。
to jsxjd:
我要的是在弹出菜单上实现(右键)弹出菜单,并不是下一级菜单。
 
to huifi:

你的第一个popmenu 有多个菜单元素吧。这样可以在它的菜单元素的onclick事件中
procedure TForm1.N2342341Click(Sender: TObject);
var
P:TPoint;
begin
Getcursorpos(p);
PopupMenu2.Popup(P.x,P.y);
end;
 
to pcc_mmz1
可能是我没说清楚,
“你的第一个popmenu 有多个菜单元素吧。这样可以在它的菜单元素的onclick事件中
procedure TForm1.N2342341Click(Sender: TObject);
var
P:TPoint;
begin
Getcursorpos(p);
PopupMenu2.Popup(P.x,P.y);
end;”
我的第一个POPMENU的菜单元素的onclick事件,还有其正常的功能,如果按你上面的做法
和原来的功能有所冲突,我是要用鼠标右键点击菜单元素时弹出POPMENU。
即:TMENUITEM如何捕获ONMOUSEDOWN事件
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=206834
 
也有办法,但你为什么不用级联,你的意图是什么?
否则没法给你出主意?
 
就像收藏夹中的项目,可以弹出右键菜单的
 
开始菜单并不是真正的“菜单” [:D]

或者说,并不是传统意义上的菜单。
 
那你的第一个popupMemu改用其它的实现,否则popupMemu中没有现成的事件可用。
 
我觉得你应该问怎样把menu放到toolbar里,因为我觉得ie中的菜单就是放到toolbar中的。
我也想知道怎么做。
 
ToolBar 是 PopupMenu 属性的.
 
后退
顶部