【结帖】求助: 关于文档导出的**

caoyeziqq · 发表于 2009-2-18 11:11:58

客户提出一个需求,需要根据数据库中的信息自动生成一份WORD报告,报告里面含盖了文字,表格,图片.其中表格和文字现在差不多都可以实现导出了,但是图表还没有找到实现的途径,他的图表是每张都有一个独立的URL,也就是每张图表都是以一张独立的网页来显示.求助一个可以实现将图表导出或是连接到WORD中的办法.
谢谢

zfang · 发表于 2009-2-18 11:38:29

建议楼主网上找一下delphi中输出word的相关资料，然后以第三方控件的形式导入到平台中来实现。

caoyeziqq · 发表于 2009-2-18 11:45:11

正因为还没有找见输出图表的方式才发贴子求助的,希望有人能帮忙!谢谢

zfang · 发表于 2009-2-18 13:13:05

网上找找相关资料吧。
比如
http://delphi.ktop.com.tw/board.php?tid=33811

caoyeziqq · 发表于 2009-2-18 18:18:34

请问这句怎么翻译成X3呢?

Application.Selection.InlineShapes.AddPicture('C:lzwy.gif', False, True).Select

谢谢!

lixy · 发表于 2009-2-19 09:03:53

http://bbs.justep.com/forum.php?mod=viewthread&tid=27065

caoyeziqq · 发表于 2009-2-19 09:32:18

这些帖子我早都看过了啊,但是我我不清楚在X3中都可以创建哪些接口对象的实例 ,比如:ActiveDocument,Selection等等,是不是也有类似"InlineShapes"或是"Shapes","

icture"之类的呢?能具体公布一下或是帮忙翻译一下,谢谢!

jiahaiming · 发表于 2009-2-19 09:44:14

在平台中调用接口，需要用DispatchHelper来调用，没有与之对应的对象可以直接使用。
楼主可以用DispatchHelper来搜索一下

caoyeziqq · 发表于 2009-2-19 15:29:35

您好!关于DispatchHelper的帖子我几乎都看了,但是没有与插入图片相关的.
我自己瞎写了如下代码,但是我自己也知道这是不可能正确的,因为我根本不知道"InlineShapes","AddPicture"这些方法在X3中对应的是怎么样的.请帮忙解决一下.
谢谢!
完整代码见附件!

  LineShape:= DispatchHelper.Create(FApp.PropertyGet('InlineShapes', []));
   APicture:= DispatchHelper.Create(FApp.PropertyGet('AddPicture', []));
   APicture.InvokeMethod('ClearFormatting',[]);
   APicture.InvokeMethod('Execute',[PFileName]);

jiahaiming · 发表于 2009-2-19 15:48:23

楼主，你说的这些方法、函数在x3中都是没有对应函数可以直接使用的。

你需要确认在word中用vba是如何执行插入图片操作的，可以用录制宏的方式来录制代码，然后将这些代码用dispatchhelper在x3中进行调用

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