【结贴】关于操作word

hdwt · 发表于 2010-7-1 20:36:39

我用lFind.InvokeMethod('Execute', [edit1.Text, False, False, False, False, False, True, 1, False, edit2.Text, 2, False, False, False, False]);方法控制word，发现一个问题就是edit2.Text的字符串长度不能过大，一大就超过长度报错，请问能有什么解决办法么？

atiger · 发表于 2010-7-2 10:42:59

edit2.Text的字符串长度不能过大，请问楼主设置了多少个字符呢？
另外，报啥错误呢，楼主

hdwt · 发表于 2010-7-2 13:13:10

好像是不能超过256吧！报错如下

hdwt · 发表于 2010-7-2 14:18:58

看问题是字符串超出长度，如果用该方法不能实现请问该用哪种方法实现呢？

amao800613 · 发表于 2010-7-2 14:35:24

用wordApp.addstr() 可以实现，已经实现过。wordApp中的替换exReplace() 在替换标识符时也存在同样问题，这是word本身的原因引起的错误。
代码如下：
wordApp.createApp(true);//显示word
wordApp.openFile('c:\model.doc');//打开模板文件
wordApp.exreplace('#Title','通知：关于国庆节放假 ',1);//全局替换#title--表示标题
wordApp.findword('#Context',true);//查找到内容标记符号,并且定位
wordApp.insertStr('文档内容，多长都可以！');//在当前位置插入要插入的内容
wordApp.exReplace('#Context','',1);//将模板文件中内容标记符号去掉（替换为空）

zfang · 发表于 2010-7-2 14:37:01

那就只能尝试一下用delphi封装一下，然后以第三方控件的方式引入平台。
或者你可以看下这个帖子的 http://bbs.justep.com/forum.php?mod=viewthread&tid=24449

hdwt · 发表于 2010-7-2 21:40:04

我添加word.dll和word.blp后点击工具栏上的控件提示“没有类型信息TWordApp” 我的版本是3.0.6.3002

zfang · 发表于 2010-7-5 08:54:53

楼主，可能你下载的这个dll和bpl不适用你这个版本。
其实你可以参考那个的做法，自己用delphi封装一个。

amao800613 · 发表于 2010-7-5 10:45:40

wordApp 3088版本

hdwt · 发表于 2010-7-5 12:28:50

ok,没有问题了，amao800613是大好人呀，哈哈哈！结贴吧

		自动登录	找回密码
密码			立即注册