用TWordApplication 打开的Word文档如何屏蔽鼠标右键菜单? 用TWordApplication 打开的Word文档如何屏蔽鼠标右键菜单? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 写一个新的类,继承TWordApplication可以屏蔽右键消息 右键的消息WM_RBUTTONDOWN继承这个类是最简单的方法否则,你需要继续WindowProc,更加麻烦TMyObject = Class(TWordApplication)private procedure RightClick(var Msg: TWMRBUTTONDOWN); message WM_RBUTTONDOWN;publicend;implementationprocedure TMyObject.RightClick(var Msg: TWMRBUTTONDOWN); begin //这里不用任何代码,可以达到效果end;end没有测试过,大概就是这样 字符串索引为何从1开始的? 有没有碰到过取数据太多报错的问题(其实也不多的,并且这个问题只出在一台机子上,其它机子上都没问题) Access数据库,ado连接,数据库SQL问题高手请入? 问题 产品征名~~~高分相送,不够还可以加 可否告知如何连接到SQL SERVER2000数据库服务器上? DELPHI数据库部分怎么学? 关于DBGrid的问题?? delphi的ado组件支持分页吗? 日期转换的问题 圣诞前夕大调查!!! 请问自来水公司的阶梯水价怎么搞
可以屏蔽右键消息
WM_RBUTTONDOWN
继承这个类是最简单的方法
否则,你需要继续WindowProc,更加麻烦
TMyObject = Class(TWordApplication)
private
procedure RightClick(var Msg: TWMRBUTTONDOWN); message WM_RBUTTONDOWN;
publicend;implementationprocedure TMyObject.RightClick(var Msg: TWMRBUTTONDOWN);
begin
//这里不用任何代码,可以达到效果
end;end没有测试过,大概就是这样