我用webbrowser控件做浏览器,我如何屏蔽掉此浏览器得右键菜单(0分)

  • 主题发起人 主题发起人 lyzyh1209
  • 开始时间 开始时间
L

lyzyh1209

Unregistered / Unconfirmed
GUEST, unregistred user!
我用webbrowser控件做浏览器,我如何屏蔽掉此浏览器得右键菜单
 
首先添加TApplicationEvents

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
//屏敝网页右键
if (Msg.message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONUP) then
begin
//如果去掉下面这行就是屏蔽右键菜单,现在为自定义右键菜单
//PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y);
Handled := True;
end;
end;
就是这样的 呵呵
 
楼上的说的很对,呵呵!
 
结帖给分呀 呵呵 [:D]
 
等等啊,明天有分给你加点分结贴。不好意思
 

Similar threads

D
回复
0
查看
946
DelphiTeacher的专栏
D
D
回复
0
查看
884
DelphiTeacher的专栏
D
D
回复
0
查看
961
DelphiTeacher的专栏
D
D
回复
0
查看
789
DelphiTeacher的专栏
D
后退
顶部