solved issue #164 (unitbgraimagemanipulationdemo.pas does not compile)

test/test_bgraimagemanipulation/ProjectBGRAImageManipulationDemo.lpi

@@ -53,11 +53,6 @@
               </Win32>
             </Options>
           </Linking>
-          <Other>
-            <ConfigFile>
-              <WriteConfigFilePath Value="$(ProjOutDir)/fpclaz.cfg"/>
-            </ConfigFile>
-          </Other>
         </CompilerOptions>
       </Item2>
     </BuildModes>
@@ -138,11 +133,6 @@
         </Win32>
       </Options>
     </Linking>
-    <Other>
-      <ConfigFile>
-        <WriteConfigFilePath Value="$(ProjOutDir)/fpclaz.cfg"/>
-      </ConfigFile>
-    </Other>
   </CompilerOptions>
   <Debugging>
     <Exceptions Count="3">

test/test_bgraimagemanipulation/unitbgraimagemanipulationdemo.pas

@@ -192,7 +192,7 @@ implementation
 
 {$R *.lfm}
 
-uses BGRAWriteBMP;
+uses BGRAWriteBMP, BGRAReadWriteConfig;
 
 const
   ResUnitStr :array[TResolutionUnit] of String = ('ruNone', 'ruPixelsPerInch', 'ruPixelsPerCentimeter');
@@ -571,8 +571,8 @@ var
 
 begin
   if edUnit_Type.ItemIndex=0
-  then newCropArea :=BGRAImageManipulation.addCropArea(Rect(50, 50, 100, 100))
-  else newCropArea :=BGRAImageManipulation.addCropArea(Rect(1, 1, 2, 2), TResolutionUnit(edUnit_Type.ItemIndex));
+  then newCropArea :=BGRAImageManipulation.addCropArea(RectF(50, 50, 100, 100))
+  else newCropArea :=BGRAImageManipulation.addCropArea(RectF(1, 1, 2, 2), TResolutionUnit(edUnit_Type.ItemIndex));
 
   newCropArea.BorderColor :=VGALime;
 end;
@@ -760,6 +760,7 @@ var
    img, img2:TBGRABitmap;
    wr:TBGRAWriterBMP;
    wp:TFPPalette;
+   ReadWriteConfig, ReadWriteConfig2: TBGRAReadWriteConfig;
 
 begin
   //BGRAImageManipulation.SetEmptyImageSizeToCropAreas(False);