[Lenich]

Уважаемые!

Постоянно приходят чертежи с разбитыми размерами (надоело уже, уговоры делателей не помогают). Чертежи приходиться изменять и отправлять обратно. Так вот: при изменении графики размер тоже меняется (сами понимаете, что разбитые размеры не меняются. такая фигня надоела уже). Приходиться все образмеривать заново (а еще если размер с текстом то ваще красота)
Может кто сталкивался с прогой которая собирает из рабитого размера (т.е. из линий и текста) нормальный размер.

С уважением! Заранее спасибо.

[TeDii]

Насчет проги не знаю может кто подскажет. А вот насчет как от этого избавится лично для себя выход нашел. тоже такой ерундой когда то страдал, например когда надо было и до размера и под размерной линией чЁйно написать. В то время стоял мехеникал пауэр, а он зараза тормоз еще тот. Потом поставил примочку в виде мехеникса и все проблемы решились. И теперь нет нужды "взрывать" размеры.
Так что я думаю проще не прогу найти, а с людьми прийти к компромису. :roll:
Удачи.

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

Есть другой вариант: прямо править свойства размера (через окно свойств). Правда, под размерной линией хрен чего напишешь, но многострочный текст получить можно. Например, собственно размер 500 мм. Над ним надо поставить текст "Размер", под - "для справок", перед - знак диаметра. Тогда клик на размере, свойства, префикс:
Размер\P%%c суффкис: \Pдля справок
\P - на английском
Получаем:
Размер
<диаметр>500
для справок
Значка диаметра нет, поэтому написал словом.
А программы нет, кажется... Ведь при разбитии размера стрелки могут быть как solid, так и просто примимтивами када.

[Startrek]

>>kpblc
Чтобы писать вторуйы (под размером) строчку если <> истиный размер а вторая строчка к примеру (ТИПОВОЙ РАЗМЕР)то в размерах (kоммандой EDIT) получить текстовое окно и написат вслед за <>
<>\Х(ТИПОВОЙ РАЗМЕР) - Х всегда должен быть заглавной буквой

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

Startrek: можно и размер править, не спорю, только 2002-й кад у меня ненормально воспринимал символы <> в строке размера, я от них и отказался, поэтому и использовал префиксы и суффиксы размеров.
А за \X спасибо, не знал

[Serge Krasnikov]

Сообщение от TeDii .... когда надо было и до размера и под размерной линией чЁйно написать. В то время стоял мехеникал пауэр, ....

В Ентом самАм механикале павуэр, если посмотреть опции размерного ткста, то можно найти возможность написания текста под размерной линией

[str02]

Короче если размер взорван, назад его уже не собрать.

[TeDii]

Сообщение от Serge Krasnikov В Ентом самАм механикале павуэр, если посмотреть опции размерного ткста, то можно найти возможность написания текста под размерной линией

А я и не спорю есть. но меня он раздражал за то что, допустим ставлю размер 2x45%%d \X4 фаски. по идеи размер будет выглядеть следующим образом: 2 размерные линии стрелочки и размерная линия на которй непосредственно написан размер. Допустим я захотел её разместить в право. причем 2x45%%d написано над линией, а 4 фаски - под. так вот если теперь я захочу повернуть этот размер и разместить его в лево, то весь текст включая 4фаски лезут вверх - и нечего я больше поделать не могу, как удалить его и заново поставить, но теперь уже вправо. А если вот надо поставить размер: %%c 50H14 \X4 отв. , так я вооще молчу. сколько не пробывал - не получилось.


За то в мехеникал пауэр есть замечательная команда, аналога которой в 2005акаде+мехеникс пока найти не могу, МОЖЕТ КТО ПОДСКАЖЕТ????
Короче суть в следующем, допустим стоит несколько пересекающихся размеров, для полной наглядности и разборчивости в мехеникал пауэр была команда: _amdimbreak (прерывание размерности). Короче размерные линии можно было прерывать как душе угодно. а вот 05акад найти не могу - она там вооще есть?

[Lenich]

Дааа. Тема вильнула нехило. (и куда только модераторы смотрят )

[Serge Krasnikov]

Сообщение от TeDii А я и не спорю есть. но меня он раздражал за то что, допустим ставлю размер 2x45%%d \X4 фаски. по идеи размер будет выглядеть следующим образом: 2 размерные линии стрелочки и размерная линия на которй непосредственно написан размер. Допустим я захотел её разместить в право. причем 2x45%%d написано над линией, а 4 фаски - под. так вот если теперь я захочу повернуть этот размер и разместить его в лево, то весь текст включая 4фаски лезут вверх - и нечего я больше поделать не могу, как удалить его и заново поставить, но теперь уже вправо.

Ну это есть такое .
В принципе если ты начинаешь ставить размезмер справо на лево, т.е. размерные точки, то он на лево и уйдет, это давно уже так с более ранних версий

[TeDii]

Сообщение от Serge Krasnikov В принципе если ты начинаешь ставить размезмер справо на лево, т.е. размерные точки, то он на лево и уйдет, это давно уже так с более ранних версий

Это понятно, я так и работаю. справа на лево - в лево. а с лева на право - в право.
Мня интересует как в 2005акаде разрывать размерные линии, может кто подскажет. :cry: Ну просто не могу жить без этого [sm3227]

[Mikhail]

Сообщение от TeDii Мня интересует как в 2005акаде разрывать размерные линии, может кто подскажет. :cry: Ну просто не могу жить без этого

может поможет http://dwg.ru/forum/viewtopic.php?t=2593&start=30
конечно немного запарно, но в конечном итоге думаю получится то что надо.

[Vova]

С пол-года назад я давал лиспик для разрыва размеров, покопайтесь в поиске. Если не найдется, могу повторить

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

Vova: ну и память!
Собственно код приводить уж не имеет, наверно, смысла.

Простите знатоки!
насчёт \Х прекрасно!!!!!!!!!!!
а можно сделать подобное с выноской?
очень часто нужна такая операция.
Спасибо!

[Grinzaid]

Когда-то написал себе такую мульку: пишет под размерной линией и переносится с размера на размер кисточкой (чего нельзя сделать с изменённым текстом).

Код:

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

;
;*** UK ***
;*** OK ***
;*** HO ***
;Writing underline text for DINENSIONS and reverting TEXTPLACE.
;27.6.2002

(defun c:uk ()
(setq ukuser (getstring "\Enter a down line value: "))
(setq uk (strcat "\\X" ukuser))
)

(defun c:ok ()
(command "select" pause "")
(command "dimpost" uk)
(command "dim1")
(command "up" "p" "")
(command "dimpost" " ")
)

(defun c:ho ()
(command "select" pause "")
(command "dim1")
(command "home" "p" "")
)

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

Кстати, по поводу \X: на выноске не сработало, при редактировании положения текста размера текст становится как при использовании \P

[Der конструктор]

Не срабатывает при простановке диаметра отверстия. Выдает 2 строки над размерной линией. Можно лик как обойти или может другая команда есть?[[/b]

[Lenich]

Тоже внесу лепту насчет подчеркивания:

Код:

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

(defun c:LeadAll  (/ obj i sslen i_lead i_noann ss1 ss2)
  (setq	i 0
	i_lead 0
	i_noann	0
	)
  (setq ss1 (ssget '((0 . "LEADER")))
	ss2 (ssadd))
  (if ss1
    (progn
      (setq sslen (sslength ss1))
      (while (< i sslen)
	(setq obj (ssname ss1 i))
	(if (and (= "MTEXT" (ent_type (entget (ent_nametext (entget obj)))))
		 (= 0 (ang_text(entget (ent_nametext (entget obj))))))
	  (progn
	    (podch obj)
	    (setq i_lead (+ 1 i_lead)))
	  (progn
	    (setq i_noann (+ 1 i_noann))
	    (setq ss2 (ssadd obj ss2))
	    )
	  )
	(setq i (+ i 1))
	)
      (if (> i_lead 0)
	(prompt (strcat "The " (itoa i_lead) " Leader(s) have been modified with LeadAll.")))
      (princ "\n")
      (if (> i_noann 0)
	(progn
	  (prompt (strcat "The " (itoa i_noann) " Leader(s) have not annotation text. These Leaders have been grip selected."))
	  (sssetfirst 0, ss2)
	  )
	)
      (princ)
      )
    (progn
      (prompt "The Leader was not selected")
      (princ)
      )
    )
  ) ;_ end of defun

;====================================================================================
; main programm
(defun podch (obj / entn entnt shrift_h	text_h move_var	x_lead y_lead
	      z_lead y_213 x_213 y_t qq
	      )
  (vl-load-com)
  (vla-put-verticaltextposition (vlax-ename->vla-object obj) 1)
  (setq entn (entget obj))
  (vla-put-attachmentPoint (vlax-ename->vla-object (ent_nametext entn)) acAttachmentPointBottomLeft)
  (setq entnt (entget (ent_nametext entn)))
  (setq	shrift_h (H_text entnt)		;Всота шрифта
	text_h	 (H_text entn))		;Высота текстового поля
  (setq move_var (+ text_h (* -1.4 shrift_h)))
					; На сколько двинуть выносную
					; линию
					; (princ move_var)
  (setq coord (ent_coord entn))
  (setq	y_213 (caddr (assoc 213 entn))
	x_213 (cadr (assoc 213 entn))
	) ;_ end of setq
  (setq	x_lead (car coord)
	y_lead (cadr coord)
	y_t    (caddr (assoc 10 entnt))
	z_lead (caddr coord)
	x_lead (- x_lead x_213)
					; y_lead (+ (- y_lead y_213)
					; move_var);Относительно
					; Выноски
	y_213  (+ y_t (- move_var (- y_lead y_213)))
	y_lead (+ y_t move_var)		;относительно текста

	) ;_ end of setq

  (setq	entn (subst (list 10 x_lead y_lead z_lead)
		    (assoc 10 (reverse entn))
		    entn
		    ) ;_ end of subst
	) ;_ end of setq
  (setq entn (subst (list 213 0.0 y_213 0.0) (assoc 213 entn) entn))
  (entmod entn)
)

;=========================================================================

(defun ent_type (e) (cdr (assoc 0 e)))		;Тип выбранного примитива.
(defun ent_nametext (e) (cdr (assoc 340 e)))	;Имя текстового примитива.
(defun h_text (e) (cdr (assoc 40 e)))		;Высота текста.
(defun ent_coord (e) (cdr (assoc 10 (reverse e))));Координаты выноски последней точки.
(defun ang_text (e) (cdr (assoc 50 e)));Угол текста

;=========================================================================
(defun c:la () (c:leadall))
(princ "\nAvailable command LEADALL (or short LA)\n(c) Lenich - 2004.") ;_ end of princ
(princ)

Редактирует выноску: подчеркивает только первую строчку.

[Startrek]

>>kpblc
\Х только для размеров, а еще можно так: написать две строчки НАД размерной а потом
kоммандой DIM>HОМЕ (from pulldown или с коммандной строки) - vova предпочитает таким способом.
С НОВЫМ ГОДОМ! :P