[Victorovich]

Скажите пожалуйста, как в Lispe выбрать Text и командой DDEDIT отредактировать его. Например была надпись АРД, а нужно программно изменить на НРК.

Заранее благодарю.

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

Тебе готовый код или направление для размышлений?

[Victorovich]

давай для размышлений
сам споткнулся на том , что никак не удается правильно работать с DDEDIT

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

Тогда я бы рекомендовал просто менять DXF-пару с кодом 1 - быстро, дешево и сердито.

[Victorovich]

сори
не въехал совсем
после ввода команды DDEDIT
система выдает
Select an annotation object or [Undo]:

что нужно ввести сюда ???
и как это что-то получить указав на объект ???

[Victorovich]

Сообщение от Кулик Алексей aka kpblc Тогда я бы рекомендовал просто менять DXF-пару с кодом 1 - быстро, дешево и сердито.

вроде въехал
какими командами Lispa менять пару с кодом 1 ???

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

В библиотеке DwgRuLispLib есть готовый вариант

[Дима_]

Сообщение от Victorovich вроде въехал какими командами Lispa менять пару с кодом 1 ???

entmod'ом ее

[Makswell]

Сообщение от Victorovich вроде въехал какими командами Lispa менять пару с кодом 1 ???

Не командами, а функциями. Как здесь правильно сказали entmod

Код:

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

(entmod (subst (cons 1 text_value) (assoc 1 DXF_list_ent) DXF_list_ent))

Где DXF_list_ent - список точечных DXF-пар текстового примитива, получаемый например так:

Код:

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

(setq DXF_list_ent (entget (car (entsel))))

text_value - заменяющий текст

Код:

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

(setq text_value "НРК")

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

#7, http://dwg.ru/f/showthread.php?t=15670

[Victorovich]

Всем спасибо

очень помогли