Quickreport - Eigenes Preview Problem

[Jelly]

Hallo,

ich hab ein Problem mit QuickReport.

Ich will meinen Report in einem eigenen Preview darstellen, welches ich innerhalb eines Panels plaziert habe. Damit nicht der Standardpreview aufgerufen wird, habe ich mich an die Anleitung von qusoft gehalten, und folgenden Code geschrieben...

Code:

qrProzess.OnPreview := MeinPreview ;

wobei MeinPreview deklariert ist als

Code:

procedure MeinPreview (Sender : TObject) ;
begin
     qrPreview.QrPrinter := TQRPrinter (Sender) ;    { qrPreview : TQRPreview }
end ;

Das klappt auch wunderbar beim ersten Aufruf von qrPreview.preview.

Rufe ich den Report ein 2. mal auf, bleibt er leer? Schliesse ich anschliessend mein Fenster, krieg ich eine Exceptionmeldung?

Wie krieg ich das hin, damit auch bei einem 2. Aufruf der korrekte Preview dargestellt wird.

Gruss,
tom

[MrSpock]

Hallo Jelly,

ich vermute, dass es gar nicht an dem eigenen Preview liegt. Es kommt häufiger vor, dass du, damit der Report korrekt erstellt wird, bestimmte Initialisierungen vornehmen musst. So könnte es sein, dass du z.B. mit myTable.First den Datensatzzeiger wieder auf den ersten Datensatz setzen musst oder, dass du bestimmte Variablen zurücksetzen musst.

Basiert dein Report auf Daten einer (oder mehrerer) Tabelle(n) oder wird er bei OnNeedData versorgt?

[Jelly]

Die Tabellen werden initialisiert. Klappt ja auch alles prima, solang ich keine TQRPreview Komponente benutze. Die Exceptionmeldungen rühren also definitv daher.

Tom