xj6019 发表于 2019-12-9 09:17:14

求制作一个lisp 能把当前布局复制并移动到最后

本帖最后由 xj6019 于 2019-12-29 11:51 编辑

      画图的时候 必须用到布局的复制并移动到最后,每次用鼠标挨个的点,可不可以做一个lisp实现呢,要求1.当前布局的情况下,输入命令,把当前布局复制并移动到最后,我布局起名一般情况是有规律的都是1.2.3.4.5.........这样一直往后起名,要求移动到最后读取上一次的布局名称,并将复制并移动后的布局名称自动改为对应的下一个号。 打个比方,现在一共有15个布局,我选择在7号布局,输入命令后,自动把7号布局移动并复制到最后,然后起名为16.就这么个功能

拜托了!

ssdsfg 发表于 2019-12-9 09:17:15

本帖最后由 ssdsfg 于 2019-12-26 14:33 编辑

xj6019 发表于 2019-12-26 11:26
您好,可否先把代码传上来我试试呀?谢谢
(defun c:fb()
(setvar "cmdecho" 0)
(setq bjj (layoutlist))
(setq i (length bjj))
(setq text (itoa (1+ i)))
(command "layout" "c" "" text)
)你试试!

xj6019 发表于 2019-12-12 08:18:08

有知道的吗 ,求解,就是不能自动编号也行啊,只实现能复制并移动到最后就行!

xj6019 发表于 2019-12-16 16:04:11

有人可以帮忙做一个吗,拜托了!!!!

start4444 发表于 2019-12-19 14:09:02

这种布局操作很少人用到的,查不到相关命令资料,搞不了

xj6019 发表于 2019-12-19 14:31:40

start4444 发表于 2019-12-19 14:09
这种布局操作很少人用到的,查不到相关命令资料,搞不了

怪不得没人回复,我画图的时候一个布局放一张图纸,最后打印的时候用发布,我个人觉得这样很方便

xj6019 发表于 2019-12-19 15:02:01

start4444 发表于 2019-12-19 14:09
这种布局操作很少人用到的,查不到相关命令资料,搞不了

电脑试过秋风走不动啊,加载不了(非中文系统)没法用,cad自带的发布我觉得还好吧,只要设置好第一个,往后的都是复制下去的,发布的时候一键确定生成PDF合成的文件,啥都不用调整,秋枫没用过,打印之后也是所有PDF文件按照编号自动合成吗?
我现在算是不得劲的也就是复制布局的时候,鼠标点好几下,如果能自动复制一个就最好了,不行也没法,就这样用吧,反正也习惯了,这几年都是这么干的。

start4444 发表于 2019-12-24 13:31:28

没搞清楚你要什么的操作

xj6019 发表于 2019-12-24 14:59:15

start4444 发表于 2019-12-24 13:31
没搞清楚你要什么的操作

1.双击激活视口调好比例后运行命令,直接在模型空间做一个1:1的矩形,对象画到0图层    后期我自己改到自己需要的图层就行
2.双击激活视口以后,运行命令,自动对齐上次的注释性比例,如图其实就是想把这个功能做一个快捷键.

ssdsfg 发表于 2019-12-25 18:03:15

我支持你画图的这种方法,你想要的命令我可以试试。
页: [1] 2 3 4
查看完整版本: 求制作一个lisp 能把当前布局复制并移动到最后