Entwickler-Ecke
Sonstiges (Delphi) - Druckername ermitteln
uli - Di 26.11.02 13:19
Titel: Druckername ermitteln
Mit der Methode Printer.Handle kann ich den Gerätekontext des Standard-Druckers ermitteln.
Über den Kontext kann ich dann verschiedene Eigenschaften wie Auflösung
usw. mit der Function GetDeviceCaps ermitteln.
Kann ich darüber auch den Druckernamen abfragen?
Wenn ja, wie? :?!?:
Gruß Uli.
Cashels - Di 26.11.02 16:58
Hiermit kannst du alle Druckernamen ermitteln:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
| uses printers ;
procedure GetPrinterNames(PrinterNames : TStringList);
var
i : integer ;
Prt : TPrinter ;
begin
PrinterNames.clear ;
Prt := TPrinter.create ;
for i := 0 to Prt.Printers.count-1 do PrinterNames.Add (Prt.Printers[i]) ;
Prt.Free ;
end; |
Gruss,
Tom
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!