Auflösung des aktuellen Druckers ermitteln |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
uses Printers;
procedure TForm1.Button1Click(Sender: TObject);
var
HorzPixelsPerInch: Integer;
VertPixelsPerInch: Integer;
begin
HorzPixelsPerInch :=
GetDeviceCaps(Printer.Handle, LogPixelsX);
VertPixelsPerInch :=
GetDeviceCaps(Printer.Handle, LogPixelsY);
end;
procedure TForm1.Button1Click(Sender: TObject);
var
HorzPixelsPerInch: Integer;
VertPixelsPerInch: Integer;
begin
HorzPixelsPerInch :=
GetDeviceCaps(Printer.Handle, LogPixelsX);
VertPixelsPerInch :=
GetDeviceCaps(Printer.Handle, LogPixelsY);
end;
Ähnliche Seiten:
- Druckereinstellungen ohne Dialog ändern
- Fenster unter anderen Bildschirmauflösungen und Schriftgröße
- Alle verfügbaren Drucker ermitteln
- Einen Drucker hinzufügen (Dialog)
- Informationen über den Druckertreiber
- Standarddrucker setzen
- Standarddrucker ermitteln
- Schwarz/Weiß-Drucker erkennen
- Ursprungsauflösung wiederherstellen
- Auflösung und Farbtiefe ermitteln