chapu12 发表于 2022-7-5 22:50:47

块和层

你好
我对autolisp这个神奇的东西很陌生。仍在学习,并且已经有了各种想法来改进我在autocad的工作方式。我的问题是:
可以根据拾取的图层更改块内的值吗?
示例:“在我的块中,我有一个带有实心图案填充的矩形,现在将这个块放在“layerA”(不知何故,带有一些脚本)中,将de block中的“实心图案填充”更改为“hatch-ansi31”。。希望这能澄清这个问题。,
那么有可能吗?

Tharwat 发表于 2022-7-5 23:45:19

你好
 
您是否在将位于块中layerA上的实心图案填充更改为ANSI31?

7o7 发表于 2022-7-6 00:14:19

我假设“LayerA”是块的名称。如果是这样,请尝试此lisp:
 
(defun c:test()
(vlax for item(vla item(vla get blocks(vla get ActiveDocument(vlax get acad object)))“LayerA”)
(if(=“AcDbHatch”(vla get objectname item))
(程序
(vla SetPattern项acHatchPatternTypePreDefined“ANSI31”)
(vla评估项目)
)
)
)
(vl cmdf“regen”)
)
页: [1]
查看完整版本: 块和层