D5 怎样控制 word ?急!定位和读取(100分)

  • 主题发起人 主题发起人 laolor
  • 开始时间 开始时间
L

laolor

Unregistered / Unconfirmed
GUEST, unregistred user!
用wordapplication打开一个文档后,我要多次监测其中的字符匹配,并复制出其中的内容。
即查找字符窜'aa','bb',并复制'aa'与‘bb'间的内容,怎么搞?请给出完整程序段

 
将Word内容粘帖到OleContainer中,而后再匹配?!
 
可以将文档中的字符复制到程序中,自己用代码解决。

wordapplication.document.text(好像是,记不太清了)
得到整个文档的字符内容,你找找你硬盘中的COM例程,
delphi哦例子讲怎么控制WORD。
 
word文档格式为: //字段名可能会出现在内容中,怎样自动提取每个字段出来。
字段1:aaaaaa...(key)
字段2:dsadsfgsdfgdsbgdfkjs;gl
dfgdfbgds
字段3:dslj;ldfgkl;dfkl

字段1:bbbbbb...
字段3:skfj;lrefgj;dfsgfdfgdfg //字段2 空
sdflkjsdg
 
wst:=WordDocument.Content.Text;
之后怎么处理wst?
 
推荐使用VBA解决,如果一定要用D5,那么从Visual Studio中找到一个OCX控件
:script.ocx,可以在你的应用中写入VB脚本,控制外部应用。如果对VB不熟,
则要颇费周折,当然,也许会有更好的办法。
 
to m2k:我真的不会vb,怎么办?你写个来看看啦。
to all: widestring很难操作,连加入stringlist中都不行。怎么转成其他类型的string?
 
xujiancai,快来拿分。
这里没人会,我已经自己解决了,你来拿分就行了。记住请客!
 
不仗义、
 
这个容易,我发我的例子给你吧!请接收!
 
wst是widestring变量,调试时显示WordDocument.Content.Get_Text为inaccessable.
但实际上却成功了。可能因为borlan对那些server控件还不是完全支持吧——帮助都没有。
Wst:=WordDocument.Content.Get_Text;
st_temp:=Wst;
stlist := TStringList.Create;
stlist.Add(st_temp);
stlist.SaveToFile('c:/windows/temp/word.tem');
Edit1.Text:=st_temp;
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部