Printer auslesen

[peterbelow]

Zitat von OptPrime:

Hallo Zusammen,

ich möchte in meiner Anwendung gerne sehen, wie das Layout (Breite, Höhe) des Druckertreibers vom Standarddrucker oder auch anderen Druckern eingestellt sind.

Delphi-Quellcode:

  WriteLn(
    'Printer name: ', Printer.Printers[Printer.PrinterIndex],
    #13#10,
    'PageHeight: ',  Printer.PageHeight,
    #13#10,
    'PageWidth: ',  Printer.PageWidth);

TPrinter hat mittlerweile eine ganze Menge nützlicher Properties. Wenn Du direkt mit Windows DEVMODE-Records arbeiten willst sieh Dir mal die PB.PrintUtilsU Unit im angehängten Zip-File an.