请教高手，如何用DELPHI实现下列操作：

用SERVERs的TWordApplication控件打开word文档后，使WORD窗口右上方的“关闭窗口”按钮及“关闭文件”“退出”菜单失效？就是说，不让用户关闭WORD.

补充：请列出具体实现方法。谢谢

追问：Word的Handle 如何取得？解决了。谢谢！
handle  :=   FindWindow(PChar( 'OpusApp '),   nil);

答案：var
        sysmenu:HMENU;
begin
        sysmenu:=GetSystemMenu(Handle,False);
        EnableMenuItem(sysmenu,SC_CLOSE,MF_GRAYED);
end; 

试试把Handle换成Word的Handle

其他：在网上下载一个大富翁delphiBBS离线CHM文件,这个问题在里面搜索下随便解决.

给你个思路,用button的点击事件中,调用TWordApplication控件的关闭功能来实现 可能没有逆方法,也就禁用关闭按钮之后,再使能,就没有办法了.因为WORD窗口一旦打开,就不会再受DELPHI程序的控制了.只能再在界面上放一个按钮,专门来关闭WORD.

上一个：delphi程序内的路劲冲突问题
下一个：关于delphi xe 的问题