Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.297 Beiträge
 
Delphi 12 Athens
 
#5

AW: PrinterIndex gesetzt... trotzdem Standarddrucker

  Alt 27. Jun 2011, 08:44
Danke erst mal...

Printer in PrintOptions ist ein String. Wenn ich mir den String über die ID aus Printer hole funktioniert das ganze...
Delphi-Quellcode:
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[FPrinterID];
    //Printer.PrinterIndex:= FPrinterID;
    if Design then
      Report.DesignReport(True)
    else
      Report.Print;
  end;
end;
Das erklärt aber immer noch nicht weshalb obiger Code unter 2007 via PrinterIndex funktioniert und unter XE nicht mehr...
  Mit Zitat antworten Zitat