Hallo liebe Leute,
Seit Tagen zerbreche ich mir den Kopf mit diesem Problem.
Arbeite mit Delphi 2007
win32 und rave 7.5.1 Borland Edition
Ein einfacher Code um alle seiten vom Report zu entfernen und neue Seiten hinzufûgen.
Das Problem tritt allerdings nur auf wen ich mehr Seiten Entferne als Hinzugefûgt werden und es tritt immer am ende des Codes auf wenn es zum close ankommt. Der Save wird nog gut durchgefürft.
Als beispiel:
Der erste durchgang, also nach einer neu angelegtem rave report im Rave Designer, frage ich 5 Seiten hinzu zu fügen => alles ok, es klappt wunderbar, im Report sind die 5 Seiten da.
Der zweite durchgang würde die hier unten angegebe Message erzeugen, wenn ich nur noch 4 Seiten wünschen würde; es gäbe aber allerdings kein Problem wenn ich 6 Seiten gewünscht hätte. ==> Kopfzerbreschen !!!
Ich bekomme immer diese Fehlermeldung:
Project Project1.exe raised
exception class EAccessViolation with message '
Access violation at address 004B4EF6 in module Project1.exe'. Read of address 525409D8
Hier der Code:
Delphi-Quellcode:
RvProject1.open;
ReportFACTURE := RvProject1.ProjMan.FindReport('Report1',true);
// Alle Seiten entfernen
for i := ReportFACTURE.ComponentCount - 1 downto 0 do begin
ReportFACTURE.Components[i].free;
end;
// Neue Seiten hinzufügen (Simple Eingabe durch eine Form in einer edit1.Text)
With RvProject1.ProjMan do begin
for i := 1 to StrToInt(edit1.Text) do begin
ReportFACTURE.NewPage;
end;
end;
RvProject1.Execute;
RvProject1.Save;
RvProject1.Close;
Ich bin fast am verzweifeln, was mache ich falsch ?
Vielen Dank für Eure Unterstützung.
Max