FastReport ohne Datenbank

[juergen]

Ich hab das mit einer StingList() mal so gemacht

Delphi-Quellcode:

TYPE
  Tfrm_Main = class(TForm)
    ... 
    frxReport1: TfrxReport;
    StringDS: TfrxUserDataSet;
    

 
PROCEDURE Tfrm_Main.frxReport1GetValue(
  CONST
  VarName:
  STRING;
  VAR
  Value:
  Variant );
BEGIN
  IF CompareText( VarName, 'element' ) = 0 THEN Value := sl[StringDS.RecNo];
END;
 
 


 Procedure....
.....   
      Screen.Cursor := crSQLWait;
    TRY
      BEGIN        
        StringDS.RangeEnd := reCount;
        StringDS.RangeEndCount := sl.Count;
        frxReport1.ShowReport;
      END;
    FINALLY
      Screen.Cursor := crDefault;
    END;

Edit: Das ist in der Demo von FastReport auch so beschrieben (...FastReport6\Demos\PrintStringList\)