Wie bekomme ich den ausgewählten Drucker zurück?

motion · Beiträge: 295 XP, Linux D7 Prof

Ich zeige dem Anwender den TFilePrintsetup Druckerauswahl-Dialog.
Laut Doku braucht man keine OnAccept Action zu schreiben, weil der Dialog "den Drucker selbst richtig konfigueriert" (was und wie? Irgendwas in TPrinter?)
Trotzdem brauche ich das OnAccept Ereignis, weil ich den ausgewählten Druckernamen brauche.
Hat da jemand einen Tip?

Gerd Kayser · Verfasst: Do 19.05.11 21:03

motion hat folgendes geschrieben :

Trotzdem brauche ich das OnAccept Ereignis, weil ich den ausgewählten Druckernamen brauche.

Versuchs mal damit:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

// uses Printers;
procedure TForm1.Button1Click(Sender: TObject);
begin
  if PrinterSetupDialog1.Execute then
    Label1.Caption := Printer.Printers[Printer.PrinterIndex];
end;

motion · Beiträge: 295 XP, Linux D7 Prof

Tatsächlich, der printerindex wird geändert!
Pretty simple.
Danke für die schnelle Antwort!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme