* Fix bug #33256, clear filename on new report

git-svn-id: trunk@57408 -
This commit is contained in:
michael 2018-02-28 08:03:49 +00:00
parent 8ba7fdba64
commit b3dfb935dd

View File

@ -951,8 +951,10 @@ begin
FReport.AddPage(P);
Report.StartDesigning;
FOI.RefreshReportTree;
Result:=True
Result:=True;
end;
if Result then
FFileName:='';
end;
procedure TFPReportDesignerForm.APreviewExecute(Sender: TObject);