TPrintDialog [gelößt]

Rund um die LCL und andere Komponenten
Antworten
Netheldrion
Beiträge: 4
Registriert: Sa 16. Feb 2013, 22:31
OS, Lazarus, FPC: Windows8 (Lazarus 1.1 FPC 2.6.0)
CPU-Target: 32Bit

TPrintDialog [gelößt]

Beitrag von Netheldrion »

Hallo zusammen,

Wie vieleicht der ein oder andere schon gelesen hat arbeite ich mit LazReport. Nun möchte ich eigentlich nur aus dem Programm festlegen
auf welchem Drucker der Report gedruckt werden soll. Also hab ich einen TPrintDialog eingebaut, welcher mir tolle Werte zurück liefert die
mich ziemlich alle nicht interessieren ... ich will eigentlich nur wissen welcher Drucker gewählt wurde, kann dazu aber mal rein gar nix
finden !? So ein PrintDialog1.SelectedPrinter oder so. Da muss es doch irgenwas geben das ich übersehe !
Zuletzt geändert von Netheldrion am Mo 18. Feb 2013, 16:15, insgesamt 1-mal geändert.

Benutzeravatar
theo
Beiträge: 10907
Registriert: Mo 11. Sep 2006, 19:01

Re: TPrintDialog

Beitrag von theo »

Der Printdialog setzt die Eigenschaften des globalen Printer Objekts. Eigentlich musst du da gar nichts machen.

Wenn du trotzdem wissen willst, welcher ausgewählt ist, mach es so:

Code: Alles auswählen

 
uses printers;
....
 if PrintDialog1.Execute then ShowMessage(Printer.PrinterName);  

RugiaArt
Beiträge: 41
Registriert: Do 11. Okt 2012, 18:50
OS, Lazarus, FPC: Win7 (L 1.0.0.2 FPC 2.6.0)
CPU-Target: 32Bit
Wohnort: Rügen
Kontaktdaten:

Re: TPrintDialog

Beitrag von RugiaArt »

Moin!
Also ich mach das immer so:

Code: Alles auswählen

 
If PrintDialog1.Excecute then
begin
  ShowMessage(Printer.PrinterName);
  //...
end;
Mfg RugiaArt

RugiaArt
Beiträge: 41
Registriert: Do 11. Okt 2012, 18:50
OS, Lazarus, FPC: Win7 (L 1.0.0.2 FPC 2.6.0)
CPU-Target: 32Bit
Wohnort: Rügen
Kontaktdaten:

Re: TPrintDialog

Beitrag von RugiaArt »

Oh da war Theo eine Minute schneller :)

Netheldrion
Beiträge: 4
Registriert: Sa 16. Feb 2013, 22:31
OS, Lazarus, FPC: Windows8 (Lazarus 1.1 FPC 2.6.0)
CPU-Target: 32Bit

Re: TPrintDialog

Beitrag von Netheldrion »

Oh danke für die schnellen Antworten !
Ja anzeigen kann ich den ausgewählten Drucker mit Printer.PrinterName oder auch den Index mit Printer.Printerindex.
Nur interessiert sich mein LazReport nicht für die Auswahl...
und auch der Versuch über :

Code: Alles auswählen

frReport2.ChangePrinter(0,Printer.PrinterIndex);
bringt nix.

Netheldrion
Beiträge: 4
Registriert: Sa 16. Feb 2013, 22:31
OS, Lazarus, FPC: Windows8 (Lazarus 1.1 FPC 2.6.0)
CPU-Target: 32Bit

Re: TPrintDialog

Beitrag von Netheldrion »

Ok jetzt hab ichs ...
warum auch immer war im Report ein Drucker fest eingestellt und es stand nicht mehr auf Default Printer ... also wieder umgestellt und jetzt gehts

Antworten