[Profan]

При отсутствии этой строки мультивыноска начинается со стрелки. Хотел вместо стрелки задать точку

Код:

[Выделить все]

(vlax-put-property newldrstyle 'ArrowSymbol "_dot")

Получаем сообщение

Ошибка Automation. Ключ не найден.

В интернете эта проблема обсуждалась, однако, похоже, решения нет.
Если же в стиле мультивыноски установить точку вручную, то дамп стиля мультивыноски отображает изменение:

Команда: (vlax-dump-object newldrstyle t) ; IAcadMLeaderStyle: Интерфейс стиля мультивыноски AutoCAD ; Значения свойств: ; AlignSpace = 5.0 ; Annotative = 0 ; Application (RO) = Ошибка ; ArrowSize = 100.0 ; ArrowSymbol = "_Dot" ; BitFlags = 71303200 ; Block = "_Dot" ; BlockColor = #<VLA-OBJECT IAcadAcCmColor 0000000040a70d00> ; BlockConnectionType = 0 ; BlockRotation = 0.0 ; BlockScale = 1.0 ; BreakSize = 12.5 ; ContentType = 2 ; Description = "Вент-Мвыноска" ; Document (RO) = #<VLA-OBJECT IAcadDocument 00000000021e8218> ; DoglegLength = 10.0 ; DrawLeaderOrderType = 0 ; DrawMLeaderOrderType = 1 ; EnableBlockRotation = -1 ; EnableBlockScale = -1 ; EnableDogleg = -1 ; EnableFrameText = 0 ; EnableLanding = -1 ; FirstSegmentAngleConstraint = 0 ; Handle (RO) = "1CA09" ; HasExtensionDictionary (RO) = 0 ; LandingGap = 50.0 ; LeaderLineColor = #<VLA-OBJECT IAcadAcCmColor 0000000040a6cda0> ; LeaderLinetype = 1 ; LeaderLineTypeId = "ByLayer" ; LeaderLineWeight = 15 ; MaxLeaderSegmentsPoints = 2 ; Name = "Вент-Мвыноска" ; ObjectID (RO) = 46 ; ObjectID32 (RO) = 46 ; ObjectName (RO) = "AcDbMLeaderStyle" ; OverwritePropChanged (RO) = -1 ; OwnerID (RO) = 47 ; OwnerID32 (RO) = 47 ; ScaleFactor = 1.0 ; SecondSegmentAngleConstraint = 0 ; TextAlignmentType = 0 ; TextAngleType = 1 ; TextAttachmentDirection = 0 ; TextBottomAttachmentType = 0 ; TextColor = #<VLA-OBJECT IAcadAcCmColor 0000000040a64220> ; TextHeight = 250.0 ; TextLeftAttachmentType = 3 ; TextRightAttachmentType = 3 ; TextString = "" ; TextStyle = "Вент-текст" ; TextTopAttachmentType = 0 ; Поддерживаемые методы: ; Delete () ; GetExtensionDictionary () ; GetXData (3) ; SetXData (2) T

Может, кто-то разобрался этой проблемой?

[Кулик Алексей aka kpblc]

Перед созданием стиля установи значение системной переменной dimblk в нужное состояние, а потом верни обратно. Я воевал с этим: http://autolisp.ru/2009/11/02/dimstyle-create/

[Profan]

Спасибо, посмотрю.

-------
Получилось, спасибо.