[Liamana]

Чертежи на А1 ,распечатать надо на А3 . Уменьшаю блоком - шрифт размера и привязки становятся маленькими соответственно. Но они нужны в натуральную величину. Как их увеличить, не меняя все размеры вручную?

[Сергей Богатов]

Делай текстовые и размерные стили аннотативными. Забивай помимо правильного аннотативного масштаба ещё один в 2 раза больший (это можно сделать массово. Выбрать те примитивы - тексты, размеры, выноски которые нужны в увеличенном виде и в свойствах сделать их аннотативными и добавить увеличенный масштаб). Назначай при распечатывании увеличенный масштаб аннотативности
P.S.
это для Autocad 2008 и выше

[AlexV]

Однако, масштабировать чертеж, чтоб впихнуть его в формат, - это крайне извращенный метод работы.. Не в ту сторону смотришь, Liamana!

[engngr]

В поиск, было.

[T-Yoke]

Сообщение от Liamana Чертежи на А1 ,распечатать надо на А3 . Уменьшаю блоком - шрифт размера и привязки становятся маленькими соответственно. Но они нужны в натуральную величину. Как их увеличить, не меняя все размеры вручную?

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

[Profan]

Могу предложить программу:

Код:

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

;**************** overdim.lsp ******************************** 
;       Преобразование размеров для последующего 
;       их масштабирования. 
;       Автор Владимир Громов aka Profan 
; 
(defun C:OVERDIM ( / ss len n dim text) 
(vl-cmdf "_.UNDO" "_be") 
(princ "\n Выберите ассоциативные размеры: ") 
(setq ss (ssget)) 
(if ss 
    (progn 
    (setq len (sslength ss)) 
    (setq n 0) 
    (repeat len 
            (setq dim (entget (ssname ss n))) 
            (if (= (cdr (assoc 0 dim)) "DIMENSION") 
                (progn 
                (setq text (cdr (assoc 42 dim))) 
                (setq text (rtos text 2 0)) 
                (setq dim (subst (cons 1 text) (assoc 1 dim) dim)) 
                (entmod dim) 
                ) ;progn 
                (princ "\n Объект не размер.") 
            ) ;if 
            (setq n (1+ n)) 
    ) ;repeat 
    ) ;progn 
    (princ "\n Ничего не выбрано.") 
) ;if 
(vl-cmdf "_.UNDO" "_e") 
(princ) 
)

Макрос на кнопку:

Код:

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

^C^C(if (not C:OVERDIM) (load "overdim")) OVERDIM

[whiteuss]

а не проще поменять масштаб чертежа и изменить размерный стиль?