插入块,先按比例缩放,再指定插入点.可以实现吗?
在插入块时,利用"DIMSCALE"来进行缩放,但是在指定插入点之前图块不能先预览缩放的效果。有什么方法可以让"pause"在缩放后,再指定插入点呢?
(defun c:av ( / DS )
(command "undo" "be")
(SetQ DS (GETVAR "DIMSCALE"))
(command "insert" "note" pause DS DS 0)
(command "explode" (entlast))
(command "undo" "end")
(princ)
)
纯命令,凑合用吧
(defun c:tt5 (/ DS)
(command "undo" "be")
(SetQ DS (GETVAR "DIMSCALE"))
(command "insert" "note" '(0 0) DS DS 0 "copybase" "non" '(0 0) (entlast) "" "ERASE" (entlast) "" "PASTECLIP" pause)
(command "explode" (entlast))
(command "undo" "end")
(princ)
) 谢谢!几个都认识,就没想到哦
页:
[1]