[共享] X3下调用Excel 的插件

amao800613 · 发表于 2009-6-24 18:02:05

现在刚好用TWordApp做报表，提供点经验给大家。由于报表的格式不断变换，所以我们就制定了客户自己配置报表的方式；先制作一个模板文件（样板）；让模板文件上的标签跟配置库的标签一致，通过给每个一标签设置表达式，制定获取数据关系；然后通过调用自己写的解析计算公式资源来获取；然后自动从数据库中提取数据输出到Word文档当中。好处是灵活性自由！难就难在解析自定义表达式要写好些代码来完成。不过也不算难！

vagrant · 发表于 2009-7-31 11:58:20

3楼：请问一下，我导入你那个“附件: word.rar”后怎么提示:没有类型信息？请指点下，另外可否把那个dll的源码共享一下啊？谢谢

amao800613 · 发表于 2009-8-4 10:52:30

你把它解压到某个文件夹目录中，然后再在Studio中引用该目录下的dll和bpl文件，关闭studio后，重启一下studio(平台保存配置信息)。注意版本要一致。如果不明白怎么引入第三方控件，到论坛找一下。如果要发布就要拷贝这两个文件到服务器上的client目录下，并且重新制作安装程序。

taokele · 发表于 2009-8-5 08:53:32

毛哥，ExcelApp有支持3088版本的吗？着急

lisb · 发表于 2009-8-5 09:31:22

taokele · 发表于 2009-8-5 11:11:16

不能让此贴沉了

amao800613 · 发表于 2009-8-5 13:56:53

帮助文档在前面的资源包里面有！

taokele · 发表于 2009-8-5 17:02:49

为啥执行下面代码的最后一行时报错了，rtl60.bpl的地址错误
ExcelApp1.Create(nil);
ExcelApp1.AddApplication(true);
ExcelApp1.OpenFile('D:\097.xls');
ExcelApp1.SetVisible(false);
str := ExcelApp1.GetActiveSheetName;

amao800613 · 发表于 2009-8-6 10:51:01

请仔细查看帮助文档 GetActiveSheetName 是否有返回值？返回的类型应该不是字符串型的吧。
ExcelApp1.Create(nil); 这行不需要，在AddApplication中自动创建了Application

taokele · 发表于 2009-8-6 11:04:32

好的，谢谢毛哥，帮了我大忙！

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