From de469955b33a22d4f47f53bb4b20d8aca805684b Mon Sep 17 00:00:00 2001 From: michael Date: Sun, 20 Aug 2017 19:04:03 +0000 Subject: [PATCH] * Test statements removed git-svn-id: trunk@36978 - --- packages/fcl-report/src/fpreportfpimageexport.pp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/packages/fcl-report/src/fpreportfpimageexport.pp b/packages/fcl-report/src/fpreportfpimageexport.pp index 2df694ad46..1b9dae3144 100644 --- a/packages/fcl-report/src/fpreportfpimageexport.pp +++ b/packages/fcl-report/src/fpreportfpimageexport.pp @@ -857,8 +857,8 @@ var ImageFiles : TStringList; D : String; begin - HTMLOptions:=[hoEnabled,hoTOCPage,hoFramePage,hoExternalJS]; - BaseFileName:='mydemo/image.png'; +// HTMLOptions:=[hoEnabled,hoTOCPage,hoFramePage,hoExternalJS]; +// BaseFileName:='mydemo/image.png'; D:=ExtractFilePath(BaseFileName); if (D<>'') and not DirectoryExists(D) then If not ForceDirectories(D) then