fpspreadsheet: Fix worksheet ignoring cell borderstyle if cell borderstyle is set before calling WriteBorders. Add '.' to package unit path (seems to fix compilation issue of several laz versions using the same fpx sources).

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4411 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/fpspreadsheet/fpsclasses.pas

@@ -1271,7 +1271,7 @@ begin
 
     // Border styles can be set even if borders are not used --> don't check uffBorder!
     equ := true;
-    for b in AItem.Border do begin
+    for b in TsCellBorder {AItem.Border} do begin
       if (P^.BorderStyles[b].LineStyle <> AItem.BorderStyles[b].LineStyle) or
          (P^.BorderStyles[b].Color <> Aitem.BorderStyles[b].Color)
       then begin

components/fpspreadsheet/laz_fpspreadsheet.lpk

@@ -9,6 +9,7 @@
       <Version Value="11"/>
       <PathDelim Value="\"/>
       <SearchPaths>
+        <OtherUnitFiles Value="."/>
         <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
       </SearchPaths>
       <Parsing>
@@ -204,7 +205,7 @@ This package is all you need if you don't want graphical components (like grids
       </Item43>
       <Item44>
         <Filename Value="fpsregfileformats.pas"/>
-        <UnitName Value="fpsregfileformats"/>
+        <UnitName Value="fpsRegFileFormats"/>
       </Item44>
     </Files>
     <RequiredPkgs Count="2">

components/fpspreadsheet/laz_fpspreadsheet_visual.lpk

@@ -9,6 +9,7 @@
       <Version Value="11"/>
       <PathDelim Value="\"/>
       <SearchPaths>
+        <OtherUnitFiles Value="."/>
         <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
       </SearchPaths>
       <Other>

components/fpspreadsheet/laz_fpspreadsheetexport_visual.lpk

@@ -9,6 +9,7 @@
       <Version Value="11"/>
       <PathDelim Value="\"/>
       <SearchPaths>
+        <OtherUnitFiles Value="."/>
         <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
       </SearchPaths>
       <Parsing>