2009年6月25日
delphi中屏蔽浏览器控件右键菜单
摘要： procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);var mPoint : TPoint;begin if IsChild(WebBrowser1.Handle, Msg.Hwnd) and ((Msg.Message = WM_RBUTTONDOWN) or (Msg.Message... 阅读全文
posted @ 2009-06-25 02:20 谭志宇 阅读(605) 评论(0) 推荐(0)