偏移量2#039；
我想知道是否有人可以帮我做2foot offset按钮。我想要2foot偏移，然后将偏移更改为对象层
我有^C^C\u偏移量2'
从那里我该去哪里？ 在VL中，它可能如下所示：
(defun c:2off (/ ss)
(vl-load-com)
(if (setq ss (ssget (list (cons -4 "<NOT") (cons 0 "INSERT,VIEWPORT") (cons -4 "NOT>"))))
(progn
(foreach obj (mapcar 'vlax-ename->vla-object
(vl-remove-if 'listp (mapcar 'cadr (ssnamex ss))))
(mapcar 'vla-put-layer
(vlax-safearray->list
(vlax-variant-value
(vla-offset obj 2)))
(list (vla-get-layer obj)))))
(princ "\n<!> Nothing Selected <!>"))
(princ))
“偏移”命令已具有将偏移图元移动到当前图层的选项。只要看一下命令行。
例子：
命令：偏移
指定偏移距离或[通过/擦除/层]：L
输入偏移对象的图层选项[当前/源]：C
指定偏移距离或[通过（T）/删除（E）/图层（L）]：2'
您可以使用这样一个简单的宏来自动执行此操作：^C^C\u offset；LC2';\
页:
[1]