CDR插件开源

a6635648 · 发表于 2020-12-22 11:03:39

以前开源过一些低版本的，不过效果不理想，后续增加了很多新功能，修了很多新bug，txt为对象.查看（）获得文档翻译而来，部分百d翻译不怎么准确，里边包含了，成品源码为去验证打包加密，开源必读请尽量去看吧，com插件的写法，我自认我的应该算详细了，可能在大神眼里不算什么吧……

tian9090 · 发表于 2024-7-30 09:05:53

支持,支持开源，感谢分享

太阳GG · 发表于 2024-4-17 14:26:16

88888888888888

模型小哥 · 发表于 2023-6-8 15:39:42

好人呐。。。。。。。。

hejiang · 发表于 2023-3-21 14:21:51

厉害呀大哥

miaorui · 发表于 2023-2-2 20:23:50

支持开源~！感谢分享

3454932 · 发表于 2022-3-14 21:53:16

膜拜一下

ghost12 · 发表于 2022-3-10 03:00:50

感谢分享，很给力！~

18308286578 · 发表于 2021-10-4 18:09:20

fasdfasdfasdf

randlyang · 发表于 2021-8-11 15:22:19

.版本 2
.支持库 CorelDRAW

.子程序一键转曲
.局部变量 Query, 文本型
.局部变量 Shape_Range, ShapeRange
.局部变量页面计次, 整数型

Active_Document.BeginCommandGroup (“一键转曲”)
Query ＝ “@type='text:artistic' or @type='text:paragraph'”
进度条1.最大位置＝ All_Pages

.变量循环首 (1, All_Pages, 1, 页面计次)
Active_Document.GetPages ().GetItem (页面计次).Activate ()
Shape_Range ＝ Active_Document.GetSelectableShapes ().FindShapes (“”, 6, 真, Query)
Shape_Range.ConvertToCurves ()
进度条1.位置＝页面计次
.变量循环尾 ()
Active_Document.EndCommandGroup ()
进度条1.位置＝ 0

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

[易语言纯源码] CDR插件开源

评分

本帖被以下淘专辑推荐: