怎样检测当前界面有没有右键弹出菜单呀 ( 积分: 200 )

  • 主题发起人 主题发起人 jiangzhang3942
  • 开始时间 开始时间
J

jiangzhang3942

Unregistered / Unconfirmed
GUEST, unregistred user!
如题,怎样检测当前界面有没有右键弹出菜单呀
 
如果是在设计界面,那看看有没有PopupMenu控件;如果是在执行界面,点右键就行了。
 
是监视弹出菜单不是在窗体设计
 
自己的程序可以在onpopup添加一个记录
 
HOOK API,显示菜单好象有个API......是什么来着忘记了...
 
To:暗夜中独舞
老大,想想好吗
 
To jiangzhang3942:
不用想了,是 WM_CONTEXTMENU 消息,显示菜单是 TrackPopupMenu。
不过奉劝一句,动不动张口就“Hook”或“正则表达式”的人,真的是很恐怖,建议到医院检查一下,看看自己是不是智力“超常”,谢谢。
不知道楼主所谓那个什么“界面”是什么编的,如果是 Delphi,可以这样:
//TCustomEdit 也可以弹出系统默认的剪切板菜单
var
i: Integer;
begin
for i := 0 to ComponentCount - 1 do
if (Components is TPopupMenu) or (Components is TCustomEdit) then
ShowMessage(Components.Name);
end;
 
var
i: Integer;
begin
for i := 0 to ComponentCount - 1 do
if (Components is TPopupMenu) or (Components is TCustomEdit) then
ShowMessage(Components.Name);
end;
我同意楼上的
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部