mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-07 08:58:23 +02:00
* Fix bug #33656, add report loop to reportdata
git-svn-id: trunk@57793 -
This commit is contained in:
parent
e18cac9559
commit
3dc90f88f3
@ -223,6 +223,7 @@ begin
|
||||
InitialiseData;
|
||||
|
||||
FReport:=TFPReport.Create(Self);
|
||||
FReport.ReportData.AddReportData(lReportData);
|
||||
FReport.Author := 'Andreas';
|
||||
FReport.Title := 'LCL Report Demo';
|
||||
FReport.Variables.AddVariable('Var1').AsString:='Value1';
|
||||
|
Loading…
Reference in New Issue
Block a user