[Gretech89]

Доброе время суток!
Ни в какую не получается сделать текст (величину размера) над размерной линией. Значение при этом присваивается, но текст остается на своем месте. Сталкивался кто-нибудь с такой ситуацией? Проблемный файл во вложении.

Код:

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

 (setq ss (ssget "_x" '((0 . "DIMENSION"))))
 (if ss
   (repeat (sslength ss)
     (if ss
  	(progn
  	  (vla-put-verticaltextposition (vlax-ename->vla-object (ssname ss 0)) 1)
  	)
     )
  	(ssdel (ssname ss 0) ss)
   )
 )

[name02]

Если у размерного стиля стоит ориентация текста горизонтально, то эффекта от указанной манипуляции не будет.
Но твой размер даже при правильной настройке размерного стиля не меняется. Он как у тебя появился, откуда взялся?

[Gretech89]

name02, файлик с этим размером был выгружен из сторонней программы - Vertex. Там часть размеров нормально отображается, а часть нет. Если настроить их всё-таки не получится, то есть идея: по имеющимся размерам строить новые, а старые затем удалить. В эту сторону еще не копал.

[freese]

Сообщение от Gretech89 есть идея: по имеющимся размерам строить новые, а старые затем удалить.

копирование свойств (_MATCHPROP) исправляет размер

[Gretech89]

freese, спасибо, но я так понимаю это только для ручной правки..т.е. нужно указывать объекты, чего хотелось бы избежать.

[Gretech89]

Решено! Похоже я дергал не тот параметр.. Всё дело оказалось в "textrotation".

Код:

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

 (setq ss (ssget "_x" '((0 . "DIMENSION"))))
(if ss
  (repeat (sslength ss)
    (if ss
 	(progn
 	  (vla-put-textrotation (vlax-ename->vla-object (ssname ss 0)) 0.0)
 	)
    )
 	(ssdel (ssname ss 0) ss)
  )
)