[CFIFT]

Всем доброго времени суток!
Помогите пожалуйста, нужно в чертеже преобразовать все "неправильные" мультивыноски в "правильные".
В "правильной"мультивыноске меняется цвет текста и линий. В неправильной - только линий.
Копирование свойств, выставление свойств текста "по блоку" и strip mtext не помогают.
Помогает только копирование текста из неправильной в правильную, что очень трудоемко.
Пользоваться динамическими блоками мультивыноски не предлагать, необходимо решить конкретную задачу.

[Tamerlan_MZO]

В некоторых неправильных мультивыносках установлено принудительное форматирование в виде указания цвета. На них не получится перенести свойства правильных мультивыносок.
Для удаления ненужного форматирования воспользуйтесь http://forum.dwg.ru/showthread.php?t=24790.

[CFIFT]

Сообщение от Tamerlan_MZO В некоторых неправильных мультивыносках установлено принудительное форматирование в виде указания цвета. На них не получится перенести свойства правильных мультивыносок. Для удаления ненужного форматирования воспользуйтесь http://forum.dwg.ru/showthread.php?t=24790.

Спасибо.
StripMtext v5-0c.lsp
change text styles (cts) 1.9.LSP
Давно ими пользуюсь, но они не помогают в даном случае.
Команда UNF-MTEXT не работает с мультивыноской. StripMtext работает, но нужного эффекта нет.

[Tamerlan_MZO]

Сообщение от CFIFT Команда UNF-MTEXT не работает с мультивыноской.

Тогда просить, чтобы знатоки дописали. Или удалять форматирование вручную.

[CFIFT]

Сообщение от CFIFT Помогите пожалуйста, нужно в чертеже преобразовать все "неправильные" мультивыноски в "правильные".

Сам спросил, сам отвечаю. небольшой лисп делает цвета текста и линий мультивыноски одинаковым:

Код:

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

 (defun c:MleaderColorByLayer ( / ss i)

  (if (setq ss (ssget "_:L" '((0 . "MULTILEADER"))))
    (repeat (setq i (sslength ss))
      (setpropertyvalue (ssname ss (setq i (1- i))) "TextColor" 0)
      (setpropertyvalue (ssname ss i) "LeaderLineColor" 0)))
  (princ)
)