yxp 发表于 2017-10-1 19:36:15

【源码】发一个程序---递增复制+ v1.05

本帖最后由 yxp 于 2020-7-3 12:13 编辑

源码下载:

《递增复制+》 v1.05
主要功能:
1选择集增量复制,选择集不仅仅是文字,可以是任意实体
2对于一个字符串中多个文字,可以设置某些文字增量,以及增量的大小
3支持汉字及英文字符的增量复制
4支持小数增量复制
5支持多个文本同时增量复制
有限支持:
1. 只能对 TEXT 文字增量复制,对 MTEXT 或属性块无效
2. 程序运行需要 acetutil.arx 的支持(即使没有也可正常运行,但少了拖拽效果)



;;更新历史:
;;1.01 修正前置0丢失 bug—— vectra 2017.10.1
;;1.02 修正设置窗口弹出错误 bug   ——tianbob 2017.10.2
;;1.03 修正小写字母递增变大写的 bug—— hehoubin 2018.2.5
;;1.04 修正步长为负值,递增值小于0的 bug—— 2018-2-6
;;1.05 将 lsp 和 dcl 文件合并。—— 2020-7-3

补充说明:acetutil.arx 是 autocad 在安装过程中选装的 ET 工具集里自带的一个文件,如果曾经安装过,则将该文件复制出来放入支持路径就可以。
---
CAD2018 x64 acetutil.arx 下载
CAD2012 x64 acetutil.arx 下载
CAD2008 x86 acetutil.arx 下载



再见熊猫衣服 发表于 2018-9-8 17:22:03

楼主,你这个能不能设置成,可以设置步数,而不仅仅是鼠标点击一次才会生成一次。
就是相当于复制的时候,可以递增,而且还可以整列。
可以由鼠标指定方向,指定整列的距离。

tianbob 发表于 2017-10-5 14:24:16

谢谢,真的非常棒,测试了,能打开设置了。楼主能不能再优化下,比如您程序里上半部分S5-51不动,只动下半部分S6-52;或者只动上半部分,下半部分不动。

elepeipei 发表于 2018-2-25 14:54:38

elepeipei 发表于 2017-10-12 14:23
谢谢楼主分享,请教一下为什么有的电脑好用,有的用不了,不出来那个显示基点那一步

谢谢高手回复,用不了的直接将文字炸开就好用了,谢谢楼主

maxli 发表于 2017-10-1 20:38:41

这个写门牌还不错

maxli 发表于 2017-10-1 20:57:02

你是晓东的YXP???刚转了你的一个文件来明经了。。写明出处了。。最近穷疯了。准备换一点明经币花花。。去下一点想要的东西。

508000096 发表于 2017-10-1 21:01:46

这个可以支持一下。

vectra 发表于 2017-10-1 22:33:43

2008 按S设置后提示错误 另外不支持 001这类文字递增 会丢失0

yxp 发表于 2017-10-2 08:55:54

本帖最后由 yxp 于 2017-10-2 23:57 编辑

vectra 发表于 2017-10-1 22:33
2008 按S设置后提示错误 另外不支持 001这类文字递增 会丢失0
感谢测试,前置0的丢失确实是一个bug,修改后版本1.01。

fanqinwei 发表于 2017-10-2 09:03:50

国庆节快乐

masterlong 发表于 2017-10-2 13:36:46

既然拖动
为啥拖动的不是最终的结果
而是在指定点以后修改
这个做到不难吧

tianbob 发表于 2017-10-2 16:25:04

国庆节快乐

夺天工 发表于 2017-10-2 17:23:21

很棒的工具
页: [1] 2 3 4 5 6
查看完整版本: 【源码】发一个程序---递增复制+ v1.05