Create/Fill Array in MasterData and Read it in GroupFooter
In the MasterData i fill a Array with String. In the Footer i will work with the Array but it's empty,
why it is empty?
What is the correct way?
How can I clear the Array after work in the GroupFooter or begin in the GroupHeader?
Thanks for Help, Stefan
var belegung: TfrxArray;
var satz : string;
procedure MasterDataOnBeforePrint(Sender: TfrxComponent); {MasterSatz abarbeiten}
begin
..
..
belegung := TfrxArray.create;
belegung := satz;
End;
procedure GroupFooter1OnBeforePrint(Sender: TfrxComponent);
begin
for i1 := 1 to i do begin {Abarbeiten der Tabelle}
memo9.Text := belegung[i1];
..
..
end;
end;
why it is empty?
What is the correct way?
How can I clear the Array after work in the GroupFooter or begin in the GroupHeader?
Thanks for Help, Stefan
var belegung: TfrxArray;
var satz : string;
procedure MasterDataOnBeforePrint(Sender: TfrxComponent); {MasterSatz abarbeiten}
begin
..
..
belegung := TfrxArray.create;
belegung := satz;
End;
procedure GroupFooter1OnBeforePrint(Sender: TfrxComponent);
begin
for i1 := 1 to i do begin {Abarbeiten der Tabelle}
memo9.Text := belegung[i1];
..
..
end;
end;
Comments
begin
end.
block of the code page so the array is global to the events
you can add the strings to the memoviews memo directly in the databand and clear the memo in the oap event of itself or the footerband