Foxtable(狐表)用户栏目专家坐堂 → [求助]如何引用CorelDRAW的库 来操作CorelDRAW


  共有4132人关注过本帖树形打印复制链接

主题:[求助]如何引用CorelDRAW的库 来操作CorelDRAW

帅哥哟,离线,有人找我吗?
hui986
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:495 积分:3437 威望:0 精华:0 注册:2012/3/29 21:15:00
[求助]如何引用CorelDRAW的库 来操作CorelDRAW  发帖心情 Post By:2014/5/2 14:29:00 [显示全部帖子]

Dim myApp As Object
myApp = CreateObject("CorelDRAW.Application")  '通过并可操作
myApp.ActiveDocument.Unit = CorelDRAW.cdrUni.cdrInch  '这句不能通过,原因是应该是没有正确声明调用

myApp.Application.ActiveLayer.CreateRectangle(3, 7, 6, 5) '通过并可操作

 


此主题相关图片如下:出错提示.jpg
按此在新窗口浏览图片

 

在VS里是直接引用就行的了

 


此主题相关图片如下:vs调用.jpg
按此在新窗口浏览图片

 

 

请问如何写代码才能正确调用呢?

以下是相关说明文档:

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:coreldraw-二次开发.rar

[此贴子已经被作者于2014-5-2 15:10:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
hui986
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:495 积分:3437 威望:0 精华:0 注册:2012/3/29 21:15:00
  发帖心情 Post By:2014/5/2 19:29:00 [显示全部帖子]

感谢你的回答,这是COM类型库,不能这样引用的!


 回到顶部
帅哥哟,离线,有人找我吗?
hui986
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:495 积分:3437 威望:0 精华:0 注册:2012/3/29 21:15:00
  发帖心情 Post By:2014/5/3 16:41:00 [显示全部帖子]

感谢您的回复,我现在的想法就是用FT与CorelDRAW 做一下数据合并功能,我用的CorelDRAW 的功能不多,也是利用VBA的命令来处理!只是在FT来做,客户体验更好,更快捷!


 回到顶部
帅哥哟,离线,有人找我吗?
hui986
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:495 积分:3437 威望:0 精华:0 注册:2012/3/29 21:15:00
  发帖心情 Post By:2014/5/4 13:27:00 [显示全部帖子]

用vba就可以直接操作相关的功能,只是导入文件时,要引用CorelDRAW的类型时,要引用到CorelDRAW.XXXXX这些不知如何声明;

 

myApp.ActiveDocument.Unit = CorelDRAW.cdrUni.cdrInch '这句不能通过,原因是应该是没有正确声明调用

 

 

感谢大家的帮助,我现在转用了其它软件配合了,我要的功能已经实现了!非常感谢!


 回到顶部