Как настроить печать XPS файлов через Windows API, сохраняя настройки принтера

Delphi , ОС и Железо , Принтеры и Печать

Настройка печати XPS файлов через Windows API с учетом настроек принтера

При работе с печатью XPS файлов через API Windows, разработчики часто сталкиваются с проблемой: настройки принтера по умолчанию игнорируются системой печати. Это может быть неприятно, так как настройки, такие как цветность, двухсторонняя печать, размеры листа и другие, могут быть критически важны для конечного результата печати.

Описание проблемы

Используя API Windows Print Spooler для печати XPS файлов, мы сталкиваемся с ситуацией, когда настройки принтера по умолчанию не применяются. Это означает, что, несмотря на установленные настройки в панели управления, такие как черно-белый режим, двухсторонняя печать, печать нескольких страниц на одном листе, печать всегда происходит в цвете и на одной странице на листе.

Пример кода на Object Pascal (Delphi)

Для того чтобы учесть настройки принтера при печати XPS файлов, можно использовать следующий пример кода на Object Pascal, который демонстрирует, как можно работать с настройками принтера через Windows API:

uses
  Winapi.WinSpool;

procedure PrintXPSWithSettings(PrinterName, FileNameXPS, JobSettings: string; ParentFormHandle: THandle = 0);
var
  Printer: THandle;
  JobID: Cardinal;
  pDevMode: PDevMode;
begin
  // Инициализация структуры DevMode для указания настроек печати
  GetMemory(pDevMode, SizeOf(DevMode));
  try
    // Заполнение структуры DevMode настройками, которые хотим использовать
    // Например, установка ориентации листа на альбомную
    pDevMode.dmOrientation := DMORIENT_LANDSCAPE;

    // Открытие принтера с указанием структуры DevMode
    Printer_Open(Printer, pDevMode);
    try
      // Создание задания печати
      JobID := JobCreate(Printer, FileNameXPS, pDevMode);
      // Запуск задания печати
      JobStart(Printer, JobID);
    finally
      // Закрытие принтера
      Printer_Close(Printer);
    end;
  finally
    // Освобождение памяти, выделенной под DevMode
    FreeMemory(pDevMode, SizeOf(DevMode));
  end;
end;

procedure Printer_Open(var Printer: THandle; pDevMode: PDevMode);
begin
  if not OpenPrinterW(PWideChar(PrinterName), Printer, pDevMode) then
    RaiseLastOSError;
end;

function JobCreate(Printer: THandle; FileName: string; pDevMode: PDevMode): Cardinal;
var
  lBufferSize: Cardinal;
  lAddJobInfo: PAddJobInfo1W;
begin
  // Код создания задания печати с указанием структуры DevMode
  // ...
end;

procedure JobStart(Printer: THandle; JobID: Cardinal);
begin
  if not StartDocPrinter(Printer, JobID, nil, 1, PWideChar(FileName), pDevMode) then
    RaiseLastOSError;
  // Дополнительный код для запуска задания печати с указанием структуры DevMode
  // ...
end;

Подтвержденный ответ

Чтобы использовать настройки принтера при печати XPS файлов, необходимо передать структуру DevMode в функцию OpenPrinterW. В этой структуре можно указать желаемые параметры печати, такие как ориентация листа, размер бумаги, качество печати и другие.

Альтернативный ответ

Если вы хотите, чтобы ваше приложение напечатало XPS файл, учитывая настройки принтера, как это делают такие программы, как Microsoft Word или Adobe Reader, вам необходимо использовать механизм оболочки (shell) для печати. Это позволит использовать настройки принтера, определенные в системе, без необходимости вручную управлять процессами печати.

Заключение

Для корректной настройки печати XPS файлов с учетом настроек принтера, разработчикам необходимо использовать возможности Windows API для работы со структурами DevMode. Это позволит не только сохранить, но и изменить параметры печати, соответствующие требованиям пользователя. Обратите внимание, что формат XPS предполагает сохранение авторского замысла документа, поэтому изменения могут быть ограничены возможностями самого формата.

Создано по материалам из источника по ссылке.

При работе с печатью XPS файлов через API Windows возникает проблема, когда настройки принтера, такие как цветность и двусторонняя печать, не применяются, несмотря на их установку в панели управления принтера.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Принтеры и Печать ::