PrinterIndex gesetzt... trotzdem Standarddrucker

[haentschman]

Moin...

Eher durch Zufall bin ich auf ein Problem gestoßen, weil ich mir nicht vorstellen konnte daß da etwas nicht funktionieren sollte.

Delphi-Quellcode:

procedure TdBK_Print.Print(Report: TfrxReport; Design, Dialog: Boolean);
begin
  if Report.PrepareReport(True) then
  begin
    Printer.PrinterIndex:= FPrinterID;
    Report.PrintOptions.ShowDialog:= Dialog;
    if Design then
      Report.DesignReport(True)
    else
      Report.Print;
  end;
end;

FPrinterID ist richtig gesetzt entsprechend einer Auswahl aus dem Drucker Dialog in den Einstellungen. Trotzdem kommen alle Ausdrucke auf dem Standarddrucker an

Was unter 2007 noch problemlos funktionierte geht unter XE nicht mehr ? Wo ist der Trick ?

Danke für Tipps...