| Blog信息 |
|
blog名称:注册会计师（注会）练习软件
日志总数:398
评论数量:116
留言数量:27
访问次数:3279336
建立时间:2005年6月6日 |
| |
|
 [delpih编程]在TWebBrowser 屏蔽右键的弹出菜单.弹出自己的菜单
软件技术
吕向阳 发表于 2009/7/3 10:23:17 |
| 创建一个TApplicationEvents控件(别说你不知道在哪里*_*) 在控件的onMessage事件输入: if (Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONDBLCLK) thenbeginif IsChild(Webbrowser1.Handle, Msg.hwnd) then //这里的Webbrowser1必须对应你的TWebbrowser命名,begin//这里可以输入你自己的东西,例如弹出你自己的右键菜单,我这里是弹出信息框!ShowMessage('some things');Handled := True; //屏蔽这句,右键菜单就可以弹出end;end; |
|
|