Text zur Laufzeit ändern!

[Lehrling]

hi,

ich möchte im Rave Report zur Laufzeit aus Delphi 7 den Text einer Textkomponente ändern. Leider bekomme ich beim ausführen immer eine Schutzverletzung.

Hat jemand noch eine Idee woran das liegen könnte?

....
PageStart:=RvProject1.ProjMan.FindRaveComponent('P age1', nil) as TRavePage;
TextTitel:=RvProject1.ProjMan.FindRaveComponent('T ext26', PageStart) as TRaveText;

if (DM.ZReadOnlyQuery1.FieldByName('abc').AsString) = 'xyz' then
begin
TextTitel.Text:='zz';
end
else
TextTitel.Text:='xx';
RvSystem1.Execute;
RvProject1.Execute;

gruß
lehrling

[Andreas Schilling]

Ich würde erstmal noch den "Report" in eine Variable lesen und als Parameter in Zeile 2 mitgeben und am Schluß mit if texttitel <> nil das Ergebnis abfragen:

var Rep : TRavereport;

Rep := RvProject1.ProjMan.findravecomponent('Report', nil) as TRaveReport;
PageStart:=RvProject1.ProjMan.FindRaveComponent('P age1',rep) as TRavePage;
TextTitel:=RvProject1.ProjMan.FindRaveComponent('T ext26', PageStart) as TRaveText;
if texttitel <> nil
then begin
if (DM.ZReadOnlyQuery1.FieldByName('abc').AsString) = 'xyz' then TextTitel.Text:='zz'
else TextTitel.Text:='xx';
end;

RvSystem1.Execute;
RvProject1.Execute;

Ist der Report fest eingebunden oder wird die Pfadangabe zur Laufzeit gesetzt?

Gruß Andrea