mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-11 13:56:05 +02:00
* Allow to load report that misses design data definitions
git-svn-id: trunk@55995 -
This commit is contained in:
parent
fd4150950b
commit
5ac6230db9
@ -1213,7 +1213,8 @@ begin
|
||||
rs.JSON := lJSON; // rs takes ownership of lJSON
|
||||
try
|
||||
DD:=lJSON.Get('DesignData',TJSONObject(Nil));
|
||||
FReportDesignData.LoadFromJSON(DD);
|
||||
if Assigned(DD) then
|
||||
FReportDesignData.LoadFromJSON(DD);
|
||||
// We must do this before the report is loaded, so the pages/bands can find their data
|
||||
CreateReportDataSets;
|
||||
FReport.ReadElement(rs);
|
||||
|
Loading…
Reference in New Issue
Block a user