[gool]

Подскажите, пожалуйста, можно ли через lisp вставить новый атрибут в уже существующий блок и как это сделать?

[Alaspher]

Можно, но есть нюансы:

Позволяет добавить атрибуты во вствку блока, включая блоки не имеющие атрибутов в определении, без переопределения самого блока. В качестве атрибутов могут использоваться определения атрибутов и/или однострочные тексты. При расчленении блока с атрибутами, добавленными этой утилитой, такие атрибуты не сохраняются ни в каком виде. Блокировка слоёв - игнорируется. Рекомендуется применение компилированной версии.

[Makswell]

Наверно как-то так

Код:

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

(vla-CopyObjects
  (vla-get-ActiveDocument (vlax-get-acad-object))
  (vlax-safearray-fill
    (vlax-make-safearray vlax-vbObject (cons 0 (1- (length lst1))))
    lst1
  )
  blk
  'idpairs
)

где:
lst1 - список vla-указателей на объекты атрибутов
blk - vla-указатель на блок

PS сам не проверял. Это в качестве догадки.

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

Можно и в описание вставлять
---
Добавлено: Makswell, у тебя blk это указатель на вхождение блока или его описание?
---
Добавлено 2:
Если честно, я не знаю, как программно добавлять атрибуты в описания динамических блоков. Не требовалось как-то..