[Lenich]

Уважаемые!

Есть ли системная переменна для Leader Settings dialog box->Attachment Tab->Underline Bottom Line.?

Заранее спасибо.

А попробуй такой фокус, у меня работает:

(setq str "blah-blah-blah")
(command "_.-qleader" "" "U");здесь минус перед QLEADER!
(setq p1 (getpoint) p2 (getpoint p1))
(command "_.qleader" p1 p2 "" "" str "" "")

Правда, все равно тут что-то тормозит, сам не понял.

[Lenich]

(command "_.-qleader" "" "U");здесь минус перед QLEADER!

У меня чего то такой фокус не прокатывает Кад2002.

Но я вышел из положения следующим образом:

Код:

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

(vla-put-verticaltextposition (vlax-ename->vla-object (car obj)) 1)

Спасибо за участие.