gespeicherten Quickreport in der Source wieder laden

[Jörg Krause]

Hi Leute,

ich möchte gespeicherte Quickreports (*.qrp-Dateien) in der Source wieder laden. Dazu habe ich nur folgendes problematisches Codeschnipsel:

with TQRPHandler.Create do // in Unit qrExtra
try
Filename := 'c:\report.qrp';
Preview; {or}
print;
finally
Free;
end;

Das Problem ist das QR den TQRPHandler nicht kennt, auch nicht wenn ich die Unit qrextra einbinde. Sollte es an der Version liegen (D3 mit Qr2) ?

Wie kann ich das lösen und gibt es dafür noch andere Möglichkeiten ?

gruss jörg

[Klaus Bissinger]

Hallo,<P>
ich habe eine Druckvorschau geschrieben und mit folgenden Quelltext <BR>lade ich über einen Opendialog gespeicherte Reports in die <BR>Druckvorschau:<BR>

procedure TForm4.ToolBtnOeffClick(Sender: TObject);
<PRE>
begin
QRPreview1.Visible :=True;;
if OpenDialog1.Execute
then try
QRPreview1.QRPrinter:= TQRPrinter.Create;
QRPreview1.QRPrinter.Load(OpenDialog1.FileName);
QRPreview1.Zoom := QRPreview1.Zoom + 1;
QRPreview1.PageNumber := 2;
QRPreview1.PageNumber := 1;
Label3.Caption := 'Seite ' + IntToStr(QRPreview1.PageNumber);
Label2.Caption := IntToStr(QRPreview1.QRPrinter.PageCount);</PRE>

Vielleicht hilft dir das weiter.<BR>

Gruß<BR>
Klaus<BR&gt