在Delphi中使用CreateOleObject方法对WORD文件进行操作(2)
时间:2010-03-13 22:01来源:虫虫技术在线收集整理 作者:虫虫编辑 点击:次
FWord.Selection.TypeText(Text:= 'World!' ); except one:Exception do ShowMessage(e.Message); end; end; //在程序关闭时把文件内容保存到当前目录中，并以test.doc命名 //同时关闭W
| FWord.Selection.TypeText(Text := 'World! '); except on e: Exception do ShowMessage(e.Message); end; end; procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin FDoc.SaveAs(ExtractFilePath(application.ExeName) +'test.doc'); FWord.Quit; FWord := Unassigned; end; end.
此外，对OFFICE其他文件的操作都比较类似，不在赘述。通过对WORD文件中更复杂的VBA宏的引用，这个方法还可以完成更复杂的文档操作。
(责任编辑：admin) |
------分隔线----------------------------
