Autor Beitrag
Natti
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 50



BeitragVerfasst: Fr 05.11.04 10:50 
Hallo!

Folgendes Problem:

wenn mein QuickReport, der z.B. QRArtListe heißt, nicht ordnungsgemäß geschlossen wurde, dann bekomme ich beim nächstem Aufruf von Preview folgender Fehler:
Zitat:
Eine Komponente mit der Bezeichnung QRStandardPreview existiert bereits

Es hilft nur: Programm schliessen und neu starten.

Ich habe versucht zu überprüfen, ob QRStandardPreview da ist, und wenn ja, dann schliessen. Da kommt aber ein anderer Fehler:
Zitat:
Zugriffsverletzung bei Adresse ....

wenn ich free aufrufe.

Mein Quelltext:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
procedure TForm1.Button1Click(Sender: TObject);
var
   xo: TObject;
begin
xo:=application.findcomponent('QRStandardPreview');
if xo<>nil then
   xo.free; <span style="color: red">//Hier kommt "Zugriffsverletzung bei Adresse ...."</span>
if application.FindComponent('QRStrukturDruck')<>nil then
   qrstrukturdruck.free;
application.CreateForm(TQRArtListe, QRArtListe);
with qrartliste do
begin
    lbmand.caption:='001 - Test';
    reporttitle:='Liste';
    dataset:=Table1;
    txtnr.dataset:=dataset;
    txtbez.dataset:=dataset;
    txtnr.DataField:='NR';
    txtbez.DataField:='BEZ';
    preview; <span style="color: red">//Hier: "Eine Komponente mit der Bezeichnung QRStandardPreview existiert bereits".</span>
    free;
end;
end;

Frage: wie kann ich QRStandardPreview deaktivieren?

Moderiert von user profile iconTino: Quote- & Delphi-Tags hinzugefügt.
Moderiert von user profile iconTino: Topic aus Sonstiges verschoben am Mo 08.11.2004 um 13:18
Natti Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 50



BeitragVerfasst: Do 18.11.04 14:47 
Antworte mir selbst

es hilft, wenn "Application.ProcessMessages" aufgerufen, wird bevor ich mein QuickReport aufrufe.
Amiga-Fan
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 534



BeitragVerfasst: Sa 20.11.04 02:14 
kenne ich. Als 1. mach den QR-Update vom Hersteller drauf, das ist mit der größte Schrott an Delphi *g* 2. benutze besser Previewmodal statt preview.

besser so:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
try 
  previewmodal;
finally
  free oder release;
end;


Moderiert von user profile iconChristian S.: Code- durch Delphi-Tags ersetzt.