Forum: Object-Pascal / Delphi-Language
Delphi
by haentschman,
27. Jun 2011
Danke erst mal...
Printer in PrintOptions ist ein String. Wenn ich mir den String über die ID aus Printer hole funktioniert das ganze...8-)
procedure TdBK_Print.Print(Report: TfrxReport; Design, Dialog: Boolean);
begin
if Report.PrepareReport(True) then
begin
Report.PrintOptions.ShowDialog:= Dialog;
Report.PrintOptions.Printer:= Printer.Printers;
Forum: Object-Pascal / Delphi-Language
Delphi
by haentschman,
27. Jun 2011
Hallo Satty67...
ein Versuch war es Wert... Ich habe die 2 Zeilen auch vertauscht. Leider ist kein positives Ergebnis zu verzeichnen. :(
Zum Zeitpunkt Report.Print ist der Inhalt von Printer.PrinterIndex so wie er sein soll :gruebel:
Danke
Forum: Object-Pascal / Delphi-Language
Delphi
by haentschman,
27. Jun 2011
Moin... :hi:
Eher durch Zufall bin ich auf ein Problem gestoßen, weil ich mir nicht vorstellen konnte daß da etwas nicht funktionieren sollte.
procedure TdBK_Print.Print(Report: TfrxReport; Design, Dialog: Boolean);
begin
if Report.PrepareReport(True) then
begin
Printer.PrinterIndex:= FPrinterID;
Report.PrintOptions.ShowDialog:= Dialog;