664571221 发表于 2016-1-17 17:47:42

CTC 发表于 2013-1-2 11:41 static/image/common/back.gif
4

老师能不能做一个不保留最早移动对象的版本，非常需要

664571221 发表于 2016-1-17 17:50:29

kwok 发表于 2013-1-2 14:45 static/image/common/back.gif
2008提示:
命令:OA
Select Objects to Align:


老师能不能改成不保留原来移动对象的版本

kwok 发表于 2016-1-17 18:26:19

664571221 发表于 2016-1-17 17:50 static/image/common/back.gif
老师能不能改成不保留原来移动对象的版本

可以在后面加一句
找到(princ)在它前面加上
(command "ERASE" sel "");;;简单加上这个基本可以删源.
(princ)

如果想在动态移动旋转时就不要看到删源对象，就要把加在下面这里
(while
       (tblsearch "BLOCK"
                  (setq bnm (strcat "$tmp" (itoa (setq inc (1+ inc)))))
       )
   );;;这是原有的，在它后面加下面这句就行
   (command "ERASE" sel ""));;;简单加上这个基本可以删源.

664571221 发表于 2016-1-18 10:40:06

kwok 发表于 2016-1-17 18:26 static/image/common/back.gif
可以在后面加一句
找到(princ)在它前面加上
(command "ERASE" sel "");;;简单加上这个基本可以删源.
...

老师能不能像移动一样，对齐过程中带一条移动路径那样白色的线

qiushizhda 发表于 2016-1-18 10:52:59

虽然没用上，不过程序本身就很有意思

waly008 发表于 2018-10-25 09:00:54

命令: OA
Select Objects to Align:
Error: no function definition: UPOINT
好像不能用

20060510412 发表于 2018-10-28 15:03:11

这个不是lee mac的程序么

依然小小鸟 发表于 2018-12-11 12:53:18

不错的帖子 找了好久 终于找到了

cowboy110 发表于 2019-2-27 11:43:46

谢谢分享！！！！！

paulpipi 发表于 2019-9-8 10:32:18

太牛了
页: 1 [2]
查看完整版本: 动态对齐程序