fpspreadsheet: Undo unintentional change of xlsbiff5 in previous commit

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

components/fpspreadsheet/xlsbiff5.pas

@@ -387,7 +387,6 @@ begin
     CurStreamPos := AStream.Position;
 
     case RecordType of
-
       INT_EXCEL_ID_BLANK         : ReadBlank(AStream);
       INT_EXCEL_ID_BOOLERROR     : ReadBool(AStream);
       INT_EXCEL_ID_MULBLANK      : ReadMulBlank(AStream);
@@ -749,6 +748,9 @@ begin
 
     // Final preparations
     Inc(FCurrentWorksheet);
+    if FCurrentWorksheet = FWorksheetNames.Count then BIFF5EOF := True;
+    // It can happen in files written by Office97 that the OLE directory is
+    // at the end of the file.
   end;
 
   if not FPaletteFound then