请问如何获得随层或随块的线型？

cxjcqu · 发表于 2020-12-11 20:35:42

(vla-get-linetype (Vlax-Ename->Vla-Object (Car(Entsel))))显示"BYLAYER"，如何获得"BYLAYER"的线型，谢谢~

wzg356 · 发表于 2020-12-11 21:22:58

本帖最后由 wzg356 于 2020-12-12 21:43 编辑

例如随层的实际线型
(setq ob(Vlax-Ename->Vla-Object (Car(Entsel))))
(setq ltype(vla-get-linetype ob))
(if(= ltype "ByLayer")
(setq ltype(cdr(assoc 6(tblsearch "Layer" (vla-get-Layer Ob)))))
)

cxjcqu · 发表于 2020-12-12 20:23:16

wzg356 发表于 2020-12-11 21:22
例如随层的实际线型
(setq ob(Vlax-Ename->Vla-Object (Car(Entsel))))
(setq ltype(vla-get-linetype ob ...

试了一下，然而显示的还是”BYLAYER“

wzg356 · 发表于 2020-12-12 21:44:17

cxjcqu 发表于 2020-12-12 20:23
试了一下，然而显示的还是”BYLAYER“

大小写没注意"ByLayer"，改了

cxjcqu · 发表于 2020-12-13 15:18:56

wzg356 发表于 2020-12-12 21:44
大小写没注意"ByLayer"，改了

好了，谢谢哈

账号		自动登录	找回密码
密码			注册

[提问] 请问如何获得随层或随块的线型？

评分

浏览过的版块