[emailx45]

Esto debería redirigir la salida a una impresora física instalada y utilizada por defecto en el sistema.

Código Delphi [-]
 var
        LPrinterName: string := 'HP LaserJet Pro M404'; // 'Microsoft Printer PDF'
        //
      LProgram := AnsiString( 'gs' );                         // ghostscript program
      LBatch   := AnsiString( '-dBATCH' );                    // -d
      LNoPause := AnsiString( '-dNOPAUSE' );                  // -d
      LDevice  := AnsiString( '-sDEVICE=mswinprn' );          // '-sDEVICE=pdfwrite' );              // -s
      LOutPut  := AnsiString( '-s%printer%' + LPrinterName ); // '-sOutputFile=' + APDFFileOutput ); // -s
      LInPut   := AnsiString( APDFFileInput );                // -s
..