1.怎么样在 Delphi 中打开一个word文件
delphi 调用 word 打开一个文档,兼容性比较好的办法,是使用 oleObject 来调用本机安装的 word,示例代码如下:procedure TForm1.Button1Click(Sender: TObject);var MSWord: Variant;begin MSWord := CreateOLEObject('Word.Application');//连接Word MSWord.Documents.Open(FileName:='D:\Temp\temp.doc', ReadOnly:=True); //打开外部Word文档 MSWord.Visible := 1;//是否显示文件编辑 MSWord.ActiveDocument.Range(Start:=0, End:=0);//开始改变的启止位置 MSWord.ActiveDocument.Range.InsertAfter(Text:='myvc');//在Word中增加字符'myvc' MSWord.ActiveDocument.Range.InsertParagraphAfter; MSWord.ActiveDocument.Range.Font.Size := 72;//字体大小 MSWord.ActiveDocument.Range.Font.Name := 'Arial';//字体名称。
2.如何用delphi直接启动一个Word文档
楼上兄弟的方法也是可以的,我这个参数少一点,也可以实现,呵呵.uses comObj;------------Function OpenWordFile(FileNameboolean;var Doc,MsWord:Variant;begin try MsWord:=CreateOLEObject('Word.Application'); MsWord.visible:=true; Doc:=MsWord.Documents.Open(FileName,true); except ShowMsg('您的机子上没有正确安装MicroSoft Word,或文件格式出现错误,无法打开您所需要的文档,请重试'); end;end;FileName参数就是你所要打开文件的文件名,包括路径的!如果不包括路径就是代表当前路径。
3.delphi 的一个问题,怎么打开word,简单的最好用控件
我不太理解你想要做什麽,不过我看了你的问题后也做了一个把memo中的纪录导入到word档的例子,你可以参考一下: 单元接口引用 comobj单元。 procedure TForm1.Button3Click(Sender: TObject); var Word : Variant; begin try Word := CreateOLEObject('Word.Application'); Word.Documents.Open(extractfilepath(Application.ExeName)+'\test.doc',false); Word.Visible := false; Word.ActiveDocument.Range(0, 0); Word.ActiveDocument.Range.InsertAfter(memo1.Lines.Text); Word.ActiveDocument.Range.InsertParagraphAfter; Word.ActiveDocument.Range.Font.Name := 'MS Sans Serif';//砞竚砰 Word.ActiveDocument.Range.Font.Size := 24;//砞竚砰掜 Word.Quit; finally Word.Quit; end; end;
15296804918C2!
4.在DELPHI 中使用 word 文档
这个问题难不住我~
1.首先你可以使用ole 调用word ,
将word内容在delphi界面显示出来。
2.然后利用word本身的‘宏’命令。
选择‘录制新宏’。
3.在宏录制状态下做你想做的操作(将字段插入word中你想要的任何地方)。操作完毕后选择停止录制。
4.打开刚刚录制的‘宏’。选择编辑,把VBA命令转换为delphi代码。
(其实你应该去大富翁看看,那里有很多答案)
转载请注明出处51数据库 » delphi如何打开word文档
健力宝