用我编的程式运行word或execl怎么才能使这此软件里的另存为不能用(100分)

还有才能使word或execl不能看到当前编辑文件的文件名

用dde或许可以，没试过

有谁知道的教我一下嘛

我也想问这个问题，我调用了ComObj使用Word我想在保存的时候‘另存为’以灰体显示，并且在点击保存和关闭窗口的时候写入我建立好的数据库里面！<br>有哪个大虾能解决啊

uses ComObj;<br>//另存不可用很简单，如下：<br>procedure OpenDocWithoutSaveAs(const FileName: string);<br>var<br>&nbsp; DocApp: OleVariant;<br>begin<br>&nbsp; try<br>&nbsp; &nbsp; try<br>&nbsp; &nbsp; &nbsp; DocApp := CreateOleObject('Word.Application');<br>&nbsp; &nbsp; &nbsp; DocApp.DisplayAlerts := False;<br>&nbsp; &nbsp; &nbsp; DocApp.Documents.Open(FileName);<br>&nbsp; &nbsp; &nbsp; DocApp.CommandBars['File'].Controls[5].Enabled := False;//另存菜单项灰掉<br>&nbsp; &nbsp; &nbsp; DocApp.Visible := True;<br>&nbsp; &nbsp; except<br>&nbsp; &nbsp; &nbsp; if not VarIsEmpty(DocApp) then<br>&nbsp; &nbsp; &nbsp; &nbsp; DocApp.Quit;<br>&nbsp; &nbsp; end;<br>&nbsp; finally<br>&nbsp; &nbsp; DocApp := Unassigned;<br>&nbsp; end;<br>end;<br><br>Word显示的文件名为只读属性，你最好修改原来文件的名称

好好学习，天天向上！

有不有人可以提供完全的word编程资料

本可加分,但如果能像梦之火说的那样,就更完美了!<br><br>其实我就是想实现那个功能<br><br>再放两天如没有人答就给分!

你干脆用delphi自带的组件好了，在OnDocumentBeforeSave和OnDocumentBeforeClose中写你自己的代码

问题是我不懂，有没有相关资料？<br>或相关例程？

请vvyang<br>到http://www.delphibbs.com/delphibbs/dispq.asp?lid=2591903<br>回答我的问题<br>

接受答案了.