Показаны различия между двумя версиями страницы.
Предыдущая версия справа и слеваПредыдущая версия | Последняя версияСледующая версия справа и слева | ||
автомат_листы [2013-10-29 18:02] – swell | автомат_листы [2013-11-28 13:50] – swell | ||
---|---|---|---|
Строка 9: | Строка 9: | ||
**Необходимые условия для работы скрипта: | **Необходимые условия для работы скрипта: | ||
- | - Рамки листов должны быть начерчены в масштабе 1:100. \\ Готовые рамки можно {{: | + | - Рамки листов должны быть начерчены в масштабе 1:100. \\ Готовые рамки |
- Рамки для чертежей должны быть в блоке. Скрипт заточен под 4 вида листов: | - Рамки для чертежей должны быть в блоке. Скрипт заточен под 4 вида листов: | ||
* А1 альбомный (блок " | * А1 альбомный (блок " | ||
Строка 15: | Строка 15: | ||
* А3 альбомный (блок " | * А3 альбомный (блок " | ||
* А4 книжный (блок " | * А4 книжный (блок " | ||
- | - Должен быть установлен PDFCreator | + | - Должен быть установлен PDFCreator |
**Алгоритм действий скрипта: | **Алгоритм действий скрипта: | ||
Строка 26: | Строка 26: | ||
Запустить на печать все листы разом можно через Файл - Пакетная печать... | Запустить на печать все листы разом можно через Файл - Пакетная печать... | ||
+ | |||
+ | ===== Встроенный PDF-принтер ===== | ||
+ | |||
+ | В архиве присутствует вариант скрипта для печати на встроенный в nanoCAD принтер | ||
===== Решения для AutoCAD ===== | ===== Решения для AutoCAD ===== | ||
Строка 31: | Строка 35: | ||
* [[http:// | * [[http:// | ||
- | <file vb CreateLayoutsForPDF.vbs> | + | <file vb CreateLayoutsFor_PDFCreator.vbs> |
on error resume next | on error resume next | ||
Dim ms | Dim ms | ||
Строка 77: | Строка 81: | ||
CreateLayout myobj, 420, 297, " | CreateLayout myobj, 420, 297, " | ||
else if (myobj.name = " | else if (myobj.name = " | ||
- | CreateLayout myobj, 210, 297, " | + | CreateLayout myobj, 210, 297, "ISO A4", 2 |
end if | end if | ||
end if | end if |