有可能吗？层

titoprax · 发表于 2022-7-6 10:29:07

我想知道你是否能做到以下几点。。。
1-输入（命令名称）以启用或禁用。
2-当您单击或键入以创建（直线、多段线、圆等）时，Autocad将询问：继续当前图层（是/否），更改图层（图层名称），创建新图层。

其想法是选择您绘制的层，而不必直接转到工具栏。

有可能吗？

Tharwat · 发表于 2022-7-6 10:40:35

这会妨碍你快速完成工作。

如果图层工具栏位于Cad菜单下方，那么它有什么问题？

塔瓦特

Se7en · 发表于 2022-7-6 10:51:02

在某种程度上是的。查看帮助文件中的“取消定义”。

第二个需要一个指挥反应堆。

BlackBox · 发表于 2022-7-6 11:02:50

Se7en正确；我也会用反应堆来换层。

为什么需要启用/禁用命令才能绘制直线、多段线、圆等。？

您可以创建一个工具箱函数，该函数接受T或nil参数，以分别启用/禁用（定义/取消定义）命令。

alanjt · 发表于 2022-7-6 11:06:29

这是一种非常粗糙的方法，但我使用它来快速创建/设置电流：

copy

(defun AT:DummyLayer (name color plot)
 ;;DUMMY LAYERS (CREATES AND/OR SETS AS CURRENT)
 (cond
   ((tblsearch "layer" name)
    (vl-cmdf "_.layer" "_t" name "_s" name "_p" plot name "")
    (princ (strcat "\nLayer: "" name "" is the current layer."))
   )
   ((vl-cmdf "_.layer" "_m" name "_c" color name "_p" plot name "")
    (princ (strcat "\nLayer: "" name "" has been created."))
   )
 )
)

我的一些人：

copy

 ;"ALAN" LAYER
(defun c:ALAN (/) (AT:DummyLayer "ALAN" 2 "P") (princ))
;"TEMP" LAYER
(defun c:TEMP (/) (AT:DummyLayer "TEMP" 7 "P") (princ))
;"VP" LAYER
(defun c:VP (/) (AT:DummyLayer "VP" 4 "N") (princ))
;"HIDE" LAYER
(defun c:HI (/) (AT:DummyLayer "HIDE" 210 "N") (princ))
;"0" LAYER
(defun c:L0 (/) (AT:DummyLayer "0" 7 "P") (princ))

但是，如果需要，可以添加其他命令。
如。

copy

(defun c:FART (/) (AT:DummyLayer "FART" 3 "P") (command "_.line") (princ))

这将创建一个名为“FART”的可绘制层，颜色为3（绿色），并执行line命令。

这可能是个糟糕的想法，但也是一个想法。

BlackBox · 发表于 2022-7-6 11:16:18

你在这里看到的是纯粹的、诗意的、和蔼可亲的。

alanjt · 发表于 2022-7-6 11:25:47

纯粹潜意识。也许我午饭后有点醉了。

BIGAL · 发表于 2022-7-6 11:33:38

Titoprax听起来像是你试图制定一些好的起草规则，但很难让人们坚持。利用Alan在上面所做的，制作一个工具栏或菜单，将您试图做的作为标题，而不是层x上的线，例如“pipe”=层管道，然后绘制线，“support”=层支撑，然后绘制多段线。

我们还有一些预先绘制的线条（比如一小组带有文本的线条），并在命令之前使用生成当前图层图标。把它移到我们工作的地方。我们有很多速记程序，这些程序通常是硬编码的，用于层等。

刚刚记住，这里还有一些代码拾取对象，它知道它是直线、圆弧或圆，并设置到该层，然后运行该命令。找到了！这里叫做复制命令搜索论坛。

[编程交流] 有可能吗？层

发表回复

精选推荐