动态对齐程序

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

CTC 发表于 2013-1-2 11:41
4[/attach]

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

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

kwok 发表于 2013-1-2 14:45
2008提示:
命令: OA
Select Objects to Align:

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

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

664571221 发表于 2016-1-17 17:50
老师能不能改成不保留原来移动对象的版本

可以在后面加一句
找到(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

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

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

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

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

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

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

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

这个不是lee mac的程序么

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

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

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

谢谢分享！！！！！

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

太牛了

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