Thanks for the very quick response. I've patched my copy of the file and everything now works. I think I'll stick with this patched version until the next release.
Malcolm > -----Original Message----- > From: Lazarus [mailto:[email protected]] > On Behalf Of Werner Pamler via Lazarus > Sent: 30 October 2017 13:18 > To: [email protected] > Cc: Werner Pamler > Subject: Re: [Lazarus] Fpsreadsheet bug? > > Thanks for sharing the file and for your pre-analysis which > helped me to find the bug quickly. It is fixed in > fpspreadsheet r6047. If you want to stick to your currently > installed version 1.8.4 you must patch the function > TsSpreadBiffReader.Fixfont in unit xlscommon by adding these > lines immediately after the "begin": > > function TsSpreadBIFFReader.FixFontIndex(AFontIndex: > Integer): Integer; var > fnt: TsFont; > begin > // --- begin insert --- > if FFontList.Count = 0 then > begin > Result := 0; > exit; > end; > // --- end insert --- > > fnt := TsFont(FFontList[AFontIndex]); > [...] > > -- > _______________________________________________ > Lazarus mailing list > [email protected] > https://lists.lazarus-ide.org/listinfo/lazarus > -- _______________________________________________ Lazarus mailing list [email protected] https://lists.lazarus-ide.org/listinfo/lazarus
