[Unreal_2007]

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

Можно создать блок (прямоугольник типа кромки листа А4).
Все чертежи вставлять в такой блок.
При печати получать координаты углов блоков (x1,y1)(верхний)-(x2,y2)(нижний). и отправлять на печать, переходить к следующему блоку.
Пока предположим что печатать надо только А4.

Есть у кого-нибудь наработки, мысли....?

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

1. caduser.ru -> форум -> Готовые программы и там искать программу от Владимира Громова. Специально он для этого писал.
2. Учить матчасть и использовать все же листы и подшивки.

[Profan]

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

[Pilot]

Сообщение от Кулик Алексей aka kpblc 2. Учить матчасть и использовать все же листы и подшивки.

Это правильно. Но за тем исключением, если это множество чертежей уже давно описанным выше образом оформлены в модели.
Нет смысла сидеть и их в лист переводить - титаническая работа!

[Залётный]

Сообщение от Pilot Нет смысла сидеть и их в лист переводить - титаническая работа!

Иначе всё повторится в следующем проекте.
Увы, существуют разные законы для больших и малых чисел, но не все это видят и для больших чисел используют то, что даже для малых не всегда хорошо. Потом же тратят титанические усилия на поиски лекарства для залечивания а не вылечивания, с оргументами о титанической работе, забыв, что они сыкономили время на организацию листов и подшивок.

[Profan]

Все это теория. А на практике, оказывается, бывает, что в пространстве модели начерчены сотни (до 1000) форматок. Ради такого случая и родилась моя программа, о которой упомянул Алексей Кулик.

[Pilot]

Profan, Именно так!

[Unreal_2007]

У меня вопрос по програмне Profanа ...
Все классно, но вопрос как реализована печать, т.е.
вписать и центрировать?

[Profan]

Дело в том, что в варианте командной строки (без диалогового окна) команды "_-PLOT" ("-ПЕЧАТЬ") нет опций "Вписать" и "Центрировать". Но эти опции можно задать в параметрах листа с помощью Диспетчера параметров листов. Так я думаю. Но сам не проверял. Попробуйте.
Добавлено.
Опция "Вписать" может задаваться при указании масштаба. Надо посмотреть код, а то я его стал забывать.

[Хмурый]

Сообщение от Profan Дело в том, что в варианте командной строки (без диалогового окна) команды "_-PLOT" ("-ПЕЧАТЬ") нет опций "Вписать" и "Центрировать". Но эти опции можно задать в параметрах листа с помощью Диспетчера параметров листов. Так я думаю. Но сам не проверял. Попробуйте. Добавлено. Опция "Вписать" может задаваться при указании масштаба. Надо посмотреть код, а то я его стал забывать.

Если выбрать область печати "Окно"- то появятся дополнительные настройки

Enter plot area [Display/Extents/Limits/Layout/View/Window] <current>: W

Enter lower left corner of window: Specify a point

Enter upper right corner of window: Specify a point

Enter plot scale (Plotted Inches = Drawing Units) or [Fit] <current>: F

Enter plot offset (x, y) or [center] <current>: C

[Profan]

Просмотрел код в начале той темы. У меня ведь там предусмотрена опция "Вписать".

[Profan]

Хмурый, правильно уточнил! Забываю, нехорошо. Так вот, в моем коде после указания масштаба (или "Вписать") записана пара двойных ковычек, что соответствует вводу текущего значения. Я думаю, что если опция "Центрировать" отмечена в параметрах листа, то она и перейдет в программу. Не хочется мне переделывать код... И не буду, разрази меня гром.

[Unreal_2007]

Либо я старую версию качнул, либо что-то еще опции вписать нет.
А лучше подскажите команду вписать...

[Profan]

Самый первый код в той теме. Вот это место:

Код:

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

 
(initget "Да Нет")
(setq dn (getkword "\n Задать опцию 'Вписать'? [Да/Нет] <Нет>: "))
(if (= dn "Да") (setq scl "_fit") (setq scl (strcat "1:" scl))
)

Сама тема:
http://www.caduser.ru/cgi-bin/f1/board.cgi?t=27776ES
Меня не будет до понедельника.

[evgm]

Здравствуйте
а я для этих же целей пытаюсь написать тоже но на VBA
вроде все работает только вот печатает почему-то только на А4...
вот кусочек кода:

[ssn]

посмотрите.. я тоже писал такое на ВБА...
http://dwg.ru/dnl/126
правда почему то на момент написания я не догадался использовать в виде объекта для поиска форматок блоки... сделал обычную полилинию (прямоугольник) но со специфическим скейл фактором и по ней ищё форматки.
самое приятное в программе, это то, что при переходе на другой комп с другими плотерами и принтерами настроить надо лишь один раз какой формат на какой принтер посылать.... А3 - туда, А1 - туда... и все
и ещё, раз уж сделана возможность выбирать форматы на печать, то ещё я добавил возможность выбирать черновой печати... например, надо А1 для проверки напечатать на А3... просто ставим галочку, и все.... никаких перенастроек листов...
или, например, 2 листа А3 расположены рядом, и их можно распечатать все четыре на А1... это тоже реализовано.
только вот печатать можно только из лейаутов...
ну и сам код не очень красивый, в плане большого количества переменных и всяких корявых конструкций... но работает. код открыт

[LGers]

Во-первых поиск рулит.
Во-вторых см. http://dwg.ru/dnl/1851
VBA. Печать нескольких листов одновременно из пространства модели

[sasha_lif]

LGers,
VBA. Печать нескольких листов одновременно из пространства модели
Подскажите, а можно сделать автоматическую распечатку по порядку листов, но значения листов хранятся в АТРИБУТЕ блока?

[Unreal_2007]

Мой вклад в печать из модели

[Do$]

Хоть бы написал пару слов о том, как пользоваться программой и что она умеет. В идеале - выложил бы исходники.
А загружать в свой рабочий инструмент "кота в мешке" -