Показать сообщение отдельно
  #1  
Старый 09.02.2016, 16:56
-=#PupaJr#=- -=#PupaJr#=- вне форума
Новичок
 
Регистрация: 17.08.2010
Сообщения: 74
Репутация: 518
По умолчанию "Теневая" печать документа в PDF

Delphi6.
При составлении отчёта в виде текста и графика рисую на канве принтера сам отчёт и вывожу его на лазерный принтер. Всё работает ОК.
Возникла задача тоже самое делать скрытым образом от пользователя параллельно печатая в PDF. В принципе в PrintDialog выбирая PDFwriter можно сделать требуемое.. но часто забывают и остаётся лишь бумажная версия.
Сделал - вызываю дважды печать - первый раз с принтером по умолчанию "LaserJet" а второй раз "PDFwriter". Всё срабатывает, но надо вводить путь и имя файла для сохранения PDF - НО ЭТОГО НЕ должно быть видно - должно проходить незаметно для пользователя, имя файла - дата и время (сделал), путь - в папку спрограммой (тоже просто), но от появления диалога немогу избавится... как???
Таже проблема если беру XPSwriter - тоже самое, появляется диалог сохранения и погасить его незнаю как... ???
Можно попробывать FindWindow и хендл диалога и искать кнопку "ОК/SAVE" -но это изврат..
Спасибо.
Ответить с цитированием