• На форуме с 10 июля 2004г.
  • Сообщений: 8,349
  • Спасибо: 4

Re: Почему при измении масштаба меняются размеры?

Приблизительно так...
Не так, а вот как:

Command:  EXPLODE
Select objects: Specify opposite corner: 6 found
6 were not able to be exploded.
Select objects:
None found.

  • Откуда: Израиль / Север Израиля / Кирь
  • На форуме с 3 июня 2005г.
  • Сообщений: 2,359
  • Спасибо: 19

Re: Почему при измении масштаба меняются размеры?

> first
Хотелось бы взглянуть на ваши размеры, которые не взрываются.

  • На форуме с 10 июля 2004г.
  • Сообщений: 8,349
  • Спасибо: 4

Re: Почему при измении масштаба меняются размеры?

Forma пишет:

Например, что бы вставляла "Фаска<>x45%%d".

Ну, вот такая программка:

(defun C:OVERFASKA ( / dim text)
(vl-cmdf "_.undo" "_be")
(setq dim (car (entsel "\n Выберите ассоциативный размер: ")))
(if (and dim (= (cdr (assoc 0 (entget dim))) "DIMENSION"))
    (progn
    (setq dim (entget dim))
    (setq text (cdr (assoc 42 dim)))
    (setq text (rtos text))
    (setq text (strcat "Фаска " text "x45%%d"))
    (setq dim (subst (cons 1 text) (assoc 1 dim) dim))
    (entmod dim)
    (princ "\n Готово.")
    ) ;progn
    (princ "\n Ничего не выбрано или объект не размер.")
) ;if
(vl-cmdf "_.undo" "_e")
(princ)
)

Как она будет выполняться - зависит от размерного стиля. Последствия непредсказуемы.

  • Forma
  • Восстановленный участник
  • На форуме с 9 июня 2005г.
  • Сообщений: 382
  • Спасибо: 0

Re: Почему при измении масштаба меняются размеры?

> Владимир Громов
А можно, что бы в поле "TextOverride" вставлялось в виде "Фаска <>x45%%d". Т.е значение размера вставлялось как <> ?

  • На форуме с 10 июля 2004г.
  • Сообщений: 8,349
  • Спасибо: 4

Re: Почему при измении масштаба меняются размеры?

> Forma
Одни скобки, без размерного текста?

  • Forma
  • Восстановленный участник
  • На форуме с 9 июня 2005г.
  • Сообщений: 382
  • Спасибо: 0

Re: Почему при измении масштаба меняются размеры?

> Владимир Громов
Да. Я сам поменял. На такую строку.

    (setq text (strcat "Фаска <>x45%%d"))

Так правильно будет?

  • На форуме с 10 июля 2004г.
  • Сообщений: 8,349
  • Спасибо: 4

Re: Почему при измении масштаба меняются размеры?

> Forma
Нет, не так, а так:

(setq text "Фаска <>x45%%d")

А сама программа будет выглядеть так:

(defun C:OVERFASKA ( / dim text)
(vl-cmdf "_.undo" "_be")
(setq dim (car (entsel "\n Выберите ассоциативный размер: ")))
(if (and dim (= (cdr (assoc 0 (entget dim))) "DIMENSION"))
    (progn
    (setq dim (entget dim))
    (setq text "Фаска <>x45%%d")
    (setq dim (subst (cons 1 text) (assoc 1 dim) dim))
    (entmod dim)
    (princ "\n Готово.")
    ) ;progn
    (princ "\n Ничего не выбрано или объект не размер.")
) ;if
(vl-cmdf "_.undo" "_e")
(princ)
)

  • На форуме с 10 июля 2004г.
  • Сообщений: 8,349
  • Спасибо: 4

Re: Почему при измении масштаба меняются размеры?

Только маcштабировать размер уже нельзя будет. А вот в предыдущем случае можно.

  • На форуме с 10 июля 2004г.
  • Сообщений: 8,349
  • Спасибо: 4

Re: Почему при измении масштаба меняются размеры?

Зато при растяжении размера число в <> изменяется. Это интересно.

  • Forma
  • Восстановленный участник
  • На форуме с 9 июня 2005г.
  • Сообщений: 382
  • Спасибо: 0

Re: Почему при измении масштаба меняются размеры?

> Владимир Громов
Именно это и нужно было. Большое спасибо.