我有这样一个需求,就是DELPHI中调用WORD并打开一个模板,这模板中包含一些特定的字符(如#ID#,#NAME#),我想用SERVER中相应的字段替换这些字符,请大虾指教!!!急急!!!!
解决方案 »
- 字符串 及 URL转译问题
- delphi2007的图像效果要优于delphi7吗?
- 相同日期合并问题
- 關於 FormatDateTime('mmm dd,yyyy',now)
- DELPHI的字符串
- 动态创建一个shape的问题,谢谢大家
- 怎样屏蔽ListBox的滚动条??
- 网上调查,大家一年要买多少钱的和编程有关的书,最喜欢哪个出版社的,买了以后不后悔的有几本
- 关于userdat.dat文件的读取?
- 调查题:在上百个表的mis里,最常用的健表工具是什么? pd or project or design2000?//牛虻(需要下载,先作调查)
- 我修改了DIALOGS.PAS后,如何让它生效?
- 谁有JEDI-GIFImage这个控件
appWord: OLEVariant;
begin
appWord := CreateOleObject('Word.Application'); // 然后操作 Word 提供的命令即可解决, 替换命令应该用 Replace, 具体就不是很清楚,
// 请买本 Word 的 VBA 手册.
appWord.Documents.Open(DocFileName);
//appWord.ActiveDocument.Replace(...);
// ... ... appWord.Quit;
end;
findtext := strscr;//要替换的文本
.........
replacewith := strdst;//替换为的内容
replace := true;
worddocument1.range(startpos).find.execute(findtext, ....., replacewith, replace);
其他参数省略,你可以用emptyparam来代替
接分!!!!!!!!!