Распечатайте документ в формате MS Word на обеих сторонах листа, используя delphi xe3

Question

Как я могу напечатать документ Word на обеих сторонах, используя код в Delphi xe 3?

Ниже показано, как создается слово document:

  try
  { Open the document}
   WrdApp := CreateOLEObject('Word.Application');
   wrdDoc := WrdApp.Documents.Open(document);
  // Wrddoc.SaveAs(SaveToFile);
  except
   on E: Exception do
    begin
     E.Message := 'Could Not Execute MS WORD!';
     raise;
    end;
  end;

Любая помощь будет принята с благодарностью, спасибо

Answer 1

В KB 194306 демонстрируется двусторонняя печать с использованием автоматизации Word. Ключ заключается в том, чтобы вставить поле, а затем ввести код выхода для конкретного принтера, чтобы указать принтеру печатать в дуплексном режиме. В Delphi это может выглядеть примерно так:

wrddoc.Selection.Fields.Add(wrddoc.Selection.Range, -1, 'PRINT 27 &l1S');

Тогда вы можете позвонить Printout как обычно, чтобы Word напечатать документ.

В статье упоминается, что указанный здесь escape-код предназначен для драйверов принтера HP.