| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Как автоматически распечатать все файлы чертежей из каталога?

Как автоматически распечатать все файлы чертежей из каталога?

Ответ
Поиск в этой теме
Непрочитано 10.10.2008, 15:00 #1
Как автоматически распечатать все файлы чертежей из каталога?
leoroma
 
Регистрация: 09.10.2008
Сообщений: 3

Кто может помочь в решении такой задачи:
есть папка(католог), в которой записаны файлы чертежей;
надо автоматизировать их поочередную распечатку, т.е.загружать в ACAD распечатывать, закрывать, загружать следующий...
Файлов очень много (сотни), поэтому нужна программа.
Спасибо.
Просмотров: 4428
 
Непрочитано 10.10.2008, 15:04
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848


Создавай подшивку или используй _publish.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 10.10.2008, 18:16
#3
Andi55

инженер-электрик
 
Регистрация: 12.08.2005
Иркутск
Сообщений: 523
<phrase 1=


Кто может помочь в решении такой задачи:
есть папка(католог), в которой записаны файлы чертежей;

=Полагаю, файлы dwg?

надо автоматизировать их поочередную распечатку, т.е.загружать в ACAD распечатывать, закрывать, загружать следующий...

=Полагаю, ДОПОЛНИТЕЛЬНЫХ настроек печати делать не надо? Т.е. присланные файлы настроены на ВАШ принтер.

Файлов очень много (сотни), поэтому нужна программа.

=Делайте скрипт. Т.е. последовательность команд, вводимых вручную. Для обработки пачки файлов есть Автодесковская прожка СкриптПро, помнится, была бесплатная.
Andi55 вне форума  
 
Непрочитано 10.10.2008, 20:31
#4
Vova

Engineer
 
Регистрация: 05.09.2003
New-York
Сообщений: 10,288


Чтобы дать правильный совет не хватает информации. Подготовлены-ли файлы к печати, то есть выполнен-ли заранее page setup. Имеются-ли в наличии все стили печати. Существуют-ли те принтеры, под которые была первоначальная настройка (если была). Раз чертежей сотни, то и авторов у них были десятки, а значит работали они кто в лес, а кто по-дрова. Кто в модели, кто в листе. Цвета самые разнообразные. Таким образом, если в дальнейшем повторять печать не потребуется, надо делать все вручную. То есть все сотни файлов поочередно обрабатывать.
Vova вне форума  
 
Непрочитано 13.10.2008, 08:51
#5
Makswell

Инженер-строитель
 
Регистрация: 15.08.2007
Киров
Сообщений: 2,204


На самом деле дополнительный вопрос только один: выполнены ли рисунки по типу - один лист чертежа расположен на одной вкладке листа?
Если да, то пошивка рулит. Сотню файлов можно загнать в подшивку и послать на печать без каких-либо особых дополнительных настроек.
Если нет, то вариантов много, и под каждый вариант нужна, ИМХО, куча программного кода.
Makswell вне форума  
 
Непрочитано 15.10.2008, 22:33
#6
SERG V


 
Регистрация: 15.10.2008
Сообщений: 18


Вот давным давно такую простенькую написал для печати файлов
У нас как раз они номерные генерятся и по порядку. Модифицируйте и пользуйтесь. Очень быстро и удобно.



; Предполагается, что , например, файлы для печати находятся в каталоге c:\temp
;
(defun c:qp() ; qp - quick print
(setvar "CMDECHO" 0)
(prompt "\nНомер первого .dwg файла : ")
(setq First_Name (getint))
(prompt "\nНомер последнего .dwg файла : ")
(setq Last_Name (getint))
(setq F_Name (getfiled "Выберите SCRIPT файл (*.scr)" "" "scr" 8))
(setq Scr (open F_Name "w"))
(setq _l "C:\\temp\\")
(repeat (+ 1 (- Last_Name First_Name))
(write-line "Open" Scr)
(princ "\"" Scr)
(princ (strcat _l (itoa First_Name) ".dwg" ) Scr)
(write-line "\"" Scr)
(write-line "Plot E " Scr)
(write-line "redraw" Scr)
(setq First_Name (1+ First_Name))
)
(close Scr)
(command "SCRIPT" "c:\\temp\\poper.scr")
(princ)
)
SERG V вне форума  
 
Непрочитано 18.11.2009, 23:08
#7
Alex II


 
Регистрация: 27.11.2007
Сообщений: 126


Народ, а у меня такая проблема:
Имеется много файлов, в каждом файле около 10 лэйаутов. Если ставить их печататся через _publish, то САД зависает даже если ставить только все листы одного файла. Поэтому приходится печатать 3-4 листа, закрывать САД, откпывать и продолжать в том же духе. Может есть какая прога, которая могла бы печатать все выбранные файлы (с настроенными page setup'ами), причём после распечатки каждого листа она закрывала бы АСАД, открывала бы заново, печатала следующий и тд? или может есть какая альтернатива?

AutoCAD MAP3D 2010
Intel Core 2 Duo E7300 2,67GHz, 2024MB PC2-6400 800MHz DDR2
Alex II вне форума  
 
Непрочитано 18.11.2009, 23:10
#8
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848


Подшивку делай и печатай именно ее.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 19.11.2009, 11:15
#9
Alex II


 
Регистрация: 27.11.2007
Сообщений: 126


большое спасибо, действительно лучше. Получаетса, что при печати через publish и при печати через подшивку используютса разные принципы?
Alex II вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Как автоматически распечатать все файлы чертежей из каталога?

Размещение рекламы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как скомпоновать все чертежи на 1 лист перед печатью? Помоги Pokep AutoCAD 47 06.12.2011 10:51
Стройки встали что делать проектировщикам dextron3 Организация проектирования и оформление документации 1033 07.12.2008 12:09
Как бы это попроще слить все файлы из папки в один чертеж ? bdfy AutoCAD 3 16.11.2006 22:00