深入CIV3d风格

BIGAL · 发表于 2022-7-5 20:08:21

也许有人能帮我解决这个问题，CIV3d的深度有时在修改样式时会成为一场噩梦。我们有大约500层，不幸的是，他们是由我们的经销商设置的，试图找到使用该层的风格是一场噩梦。

所以第一个请求真的不期望可以找到具有特定层名称的样式名称。

如果这不起作用，请看这个无法到达下一个级别的linelablestyles。

copy

(vl-load-com)
(load "getver") ; returns *AeccDoc*
(AH:getver)
(setq Align_label_styles (vlax-get *AeccDoc* 'AlignmentlStyles)) 
(setq lblstyl1 (vlax-get Align_label_styles 'Linelablestyles))
; or this (setq lblstyl1 (vlax-get-property Align_label_styles 'item "Linelablestyles"))
; Command: (vlax-dump-object Align_label_styles T)
; IAeccAlignmentLabelStyles: IAeccAlignmentLabelStyles Interface
; Property values:
;   CurveLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 000000003078cbf8>
;   DesignSpeedLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030787ef8>
;   GeometryPointLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030788738>
;   LineLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030781938>
;   MajorStationLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 000000003078cc38>
;   MinorStationLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030781838>
;   SpiralLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030788538>
;   StationEquationLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030786238>
;   StationOffsetLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 0000000030785738>
;   TangentIntersectionLabelStyles (RO) = #<VLA-OBJECT IAeccLabelStyles 00000000307852b8>

hanhphuc · 发表于 2022-7-5 20:13:05

BIGAL（RO）=只读！没有运气
不确定。NET有帮助吗？

Hippe013 · 发表于 2022-7-5 20:18:48

只有父级是只读的。也许下面的代码可以帮助你。

copy

;Get the Alignment Label Styles
(setq als (vlax-get-property *AeccDoc* 'AlignmentLabelStyles))
;Get the Line Label Styles
(setq lls (vlax-get-property als 'LineLabelStyles))
;Get the Style
(setq style (vlax-get-property lls 'Item 0))
;Get the Label Properties
(setq lp (vlax-get-property style 'LabelProperties))
;Get the Aecc Layer Properties
(setq lay (vlax-get-property lp 'Layer))
;Get the Name of the Layer
(setq layname (vlax-get-property lay 'Value))

BIGAL · 发表于 2022-7-5 20:22:21

感谢您，当我开始工作时，如果我在家中使用CIV3d时遇到问题，请立即尝试获取自动化错误消息。当我运行此（vla getinterfaceobject（vlax get acad object）“AeccXUiLand.AecCaplication.10.0”）时，它可能会完全重新加载。

Hippe013 · 发表于 2022-7-5 20:27:09

比加尔

我不仅能够读取“value”的值，还能够更改它。

copy

(vlax-put-property lay 'Value "some-layer-name-that-exists")

BIGAL · 发表于 2022-7-5 20:31:23

是的，这就是我打算做的，做一个配对列表（标签层），正如你说的，如果你能得到它，你通常可以把它。关于更改DWT，我们有大约500个标签，带有som标签样式，最多有4个标签，一个层可以做xxx行xxx弧xxx文本

pBe · 发表于 2022-7-5 20:32:38

这真的很有用。我最近刚开始使用C3D（情景调用），从未想过使用lisp修改C3D提供的众多“样式”。你可能在那里有一些BIGAL，我会订阅这个帖子，看看它如何发展。

BIGAL · 发表于 2022-7-5 20:38:58

我们的dwt非常广泛，但可能有点过头了，每个组合都有一个不同的层，样式为c-dsgn-major、c-dsgn-major-lbl，然后是minor so 4层。

您可以删除未使用的样式，但如果您执行某些操作，则可能会被发现，这与链接到样式的块相同。

hanhphuc · 发表于 2022-7-5 20:42:47

感谢澄清。
虽然不是c3d用户，但该概念是适用的。
BIGAL很幸运，因为HipPe013与HanhPhuc没有运气

BIGAL · 发表于 2022-7-5 20:47:01

谢谢你们明天的工作。将重新加载我的主页版本

[编程交流] 深入CIV3d风格

发表回复

精选推荐