控制Word菜单项的问题(100分)

  • 主题发起人 主题发起人 altailin
  • 开始时间 开始时间
A

altailin

Unregistered / Unconfirmed
GUEST, unregistred user!
1)我希望从Delphi调用Word,然后将Word菜单中的与文件保存或者打开有关的菜单
项目都屏蔽掉,怎么办?
2)如果我用的是OleContainer加上一个TMenu(Word菜单会自动与我的TMenu合并,但是
File菜单会消失),如何从我的程序内部实现1、页面设置 2、打印预览

以上最好可以把2)实现,请指教
 
这个问题好象有点难,啷个没得人晓得哟?
已经有多人问这个问题了,我也急用!
 
有点怪!有人放了TMenu后就有文件菜单,而我的就是没有!
 
我从其他贴子里找到一个方法,遥远兄你试一下,希望可以帮你的忙.
实现方法:
1、创建一个模板(在Word里面的新建对话框中可以选择是创建模板还是文档)
2、选择菜单 工具-宏-Visual Basic编辑器
3、左边列表中是TemplateProject-模块-模块一(如果还没有模块一,则使用右键
点击“模块”,从菜单中选择 插入-模块)
4、双击左边列表下的模块一
5、在右边的代码窗口中输入如下代码:

Sub FileNew()
MsgBox "为了不影响软件的运行,该项功能暂时被禁用", vbInformation, "我的软件"
End Sub

Sub FileOpen()
MsgBox "为了不影响软件的运行,该项功能暂时被禁用", vbInformation, "我的软件"
End Sub

Sub FileClose()
MsgBox "为了不影响软件的运行,该项功能暂时被禁用", vbInformation, "我的软件"
End Sub

Sub FileSaveAs()
MsgBox "为了不影响软件的运行,该项功能暂时被禁用", vbInformation, "我的软件"
End Sub

Sub FileTemplates()
MsgBox "为了不影响软件的运行,该项功能暂时被禁用", vbInformation, "我的软件"
End Sub

这样,Word中的对应功能被这些的同名的宏所替代。

6、保存这个模板到你的Windows目录下的Application Data/Microsoft/Template/
(这是Word默认的模板目录,所以你的安装程序中也需要将这个模板文件保存到客户
机器对应的目录下)

这种方法直接用wordapplication 和 worddocument,
如果你要例子,我把源程序发给你
 
通常情况下我们可以将某个OLE程序放在OLEContainer控件中,当我们打开OLE程序时,
它会打开它自己的菜单,但如果我们的窗体上已经有了菜单的时候,OLE程序的菜单会
被融合进来,但OLE本身第一个主菜单不可见,这个主菜单会被原来程序的第一个主菜
单所替代,如果我们的程序有第二个主菜单项,就依次往后排。
希望对你有帮助!
 
TO: altailin
哪样可以把实现页面设置的功能吗!可不可以发源程序?scsongqiang@163.com
先谢了!
 
调用WORD的页面设置窗口,就可一自动设置了
 
目前到是有办法!
可以在WORD中菜单或工具栏单击右键选自定义,先把文件菜单删出,再自己新建一文件菜单,
再建文件菜单的各子菜单,保存到文件或模板,然后在OLE中调用该文件或该模板就搞定!
这时你会发现编辑菜单在文件菜单之前,再试着把编辑菜单删出,自己再新建一编辑菜单
就OK!
 
我想要例子,

sunsl_yantai@163.com
 
后退
顶部