olecontainer就可以实现你的功能
解决方案 »
- Timage的Picture怎么动态装载网上图片?图片地址格式为:http://www.com.com/0.bmp
- 如何显示word文档
- 100分求解delphi应用超级大难题
- 50分求,怎么在Memo中加入垂直滚动条!?
- DELPHI 6 可以在WIN97下安装?
- Pascal中有没有中断循环和中段一次循环的语句?
- 现有两表,结构如下,如果我想得到以下结果,我的sql应该怎么写?(100分)真心相求,不够可加!
- 晕死!!!好好的程序一到Vistal就出错。。。。。。。。。。。
- comcat.h对应Delphi里边的哪个dcu或是pas?
- 100分我问一个关于在delphi或者BDS中建立的工程或者VCL form的名字怎么修改,不要老是Form1
- 关于日期字符串的问题?
- 400k程序打包后变3M???
2. 以下是一个按钮的响应过程:
try
WordApplication1.Connect;
WordApplication1.Visible:=True; //设置为可见
{{ FileName:=ExtractFilePath(Application.ExeName)+'MyContent.dot';//打开模板文件,在该模板文件中可关闭不需要的菜单等,若是直接连接,则注释掉的部分不要
itemindex:=1;
tempPlate:=Filename;
newtemplate:=false;
DocumentType:=wdNewBlankDocument;
Visible:=True;
WordApplication1.Connect;
WordApplication1.Visible:=true;
WordApplication1.Documents.Add(TempPlate,newtemplate,documentType,Visible);
WordDocument1.ConnectTo(WordApplication1.Documents.Item(itemindex));
FileName:=ExtractFilePath(Application.ExeName)+'编辑完成后切回原程序.RTF';
FileType:=wdFormatRTF;
WordDocument1.SaveAs(FileName, FileType); //保存为RTF格式 }
finally
//断开连接
WordDocument1.Disconnect;
WordApplication1.Disconnect;// WordApplication1.Quit;
但是用右键还是可以重新设置,并且用快捷方式都可以用,能不能包括右键、快捷方式都屏蔽掉