外部参照图层。LSP[移动外部参照

alanjt · 发表于 2022-7-5 16:48:49

灵感来源于此线。

将根据“0-XREF_”（可以更改为任何名称）的名称和前缀，将所有外部参照移动到图层。

提示用户选择锁定外部参照图层。

完成后，打印移动到每个层的外部参照数。

创建的图层示例：

欢迎评论和批评。
享受男人们。
外部参照图层。LSP

Patrick_35 · 发表于 2022-7-5 16:53:33

你好

一个例子

+

alanjt · 发表于 2022-7-5 16:59:43

谢谢

精简版。顺便说一句，您正在为每个对象定义图层数据库，您将解锁图层。没什么大不了的，我只是想让你知道。

Patrick_35 · 发表于 2022-7-5 17:05:46

我做得很简单，因为通过多次检查，你会失去效率和速度
如果层已锁定，则不会像我们希望的那样严重
我还使用了图层和外部参照列表，更容易处理，速度更快。
由于ssget，我只保留了strcat变量s，否则它将作为一个列表
我还使用了微妙或作为多重条件

还要看看lisp和逻辑的结构

你有一个很好的水平，很少学习Lisp程序。
只会稍微简化您的操作，因为您有一个错误处理程序，这是不合理的。

@+

alanjt · 发表于 2022-7-5 17:09:21

我感谢你的评论，但我想说的是，我唯一多余的是最后的清单检查。我可以在对所有外部参照层和警报发出锁定之前删除它，但这是最小的，最多是一个纳秒的倒退。

我喜欢你用or表示你的条件。

您确实意识到，您修改代码的目的是仅锁定/解锁外部参照所在的图层。Mine实际上创建并将其放置在与外部参照名称相关的图层上。

我想说，我的“错误”处理程序是合理的。
如。

copy

然而，如果通过活动的selectionset在progn和步骤之间移动undomark，则可以避免这种情况，但我更喜欢将其包装在错误处理程序中，以避免这一切。