Hallo,
in meiner Anwendung habe ich ein Druckvorschau selbst erstellt (QuickReport 3).
Wenn ich bereits abgespeicherte Reports (*.qrp) öffnen möchte, bekomme
ich folgende Meldung:
"... Exception der Klasse EAccessViolation ... Zugriffsverletzung bei Adresse 004CB887 Modul Program.EXE, lesen von Adresse FFFFFFFF"
Der Quelltext zum öffnen von Reports lautet:
procedure TForm4.ToolBtnOeffClick(Sender: TObject);
begin
if OpenDialog1.Execute
then
QRPreview1.QRPrinter.Load(OpenDialog1.FileName);
try
QRPreview1.Zoom := QRPreview1.Zoom + 1;
QRPreview1.PageNumber := 2;
QRPreview1.PageNumber := 1;
Label3.Caption := 'Seite ' + IntToStr(QRPreview1.PageNumber);
Label2.Caption := IntToStr(QRPreview1.QRPrinter.PageCount);
finally
free;
end;
end;
Meinebisherigen Versuche den Fehler ausfindig zu machen waren vergebens.
Wer hat einen Rat?
Gruß
Klaus
in meiner Anwendung habe ich ein Druckvorschau selbst erstellt (QuickReport 3).
Wenn ich bereits abgespeicherte Reports (*.qrp) öffnen möchte, bekomme
ich folgende Meldung:
"... Exception der Klasse EAccessViolation ... Zugriffsverletzung bei Adresse 004CB887 Modul Program.EXE, lesen von Adresse FFFFFFFF"
Der Quelltext zum öffnen von Reports lautet:
procedure TForm4.ToolBtnOeffClick(Sender: TObject);
begin
if OpenDialog1.Execute
then
QRPreview1.QRPrinter.Load(OpenDialog1.FileName);
try
QRPreview1.Zoom := QRPreview1.Zoom + 1;
QRPreview1.PageNumber := 2;
QRPreview1.PageNumber := 1;
Label3.Caption := 'Seite ' + IntToStr(QRPreview1.PageNumber);
Label2.Caption := IntToStr(QRPreview1.QRPrinter.PageCount);
finally
free;
end;
end;
Meinebisherigen Versuche den Fehler ausfindig zu machen waren vergebens.
Wer hat einen Rat?
Gruß
Klaus
Comment