Einzelnen Beitrag anzeigen

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

Fastreport Script Dynamischer Feldname

  Alt 2. Mai 2011, 16:34
Ich habe eine Fastreport und möchte da in einem OnBeforeprint eine Schleife zum generieren von Summen laufen lassen.

Delphi-Quellcode:
Var
  Summen : Array[0..12] of Double;
  SummenG : Array[0..12] of Double;
  i : Longint;
        
procedure GroupHeader1OnBeforePrint(Sender: TfrxComponent);
begin
  For i:=0 To 12 do
  Begin
    SummenG[i]:=0;
  End;
end;

procedure Hauptdaten1OnBeforePrint(Sender: TfrxComponent);
begin
  For i:=0 To 12 do
  Begin
    SummenG[i]:=SummenG[i]+D_Data."F"+IntToStr(i)+""> //Hier
  End;
end;

begin
                
end.
Wie kann ich einen Feldnamen übereinen String ansprechen ?
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat