diff --git a/components/fpspreadsheet/examples/fpsspeedtest/mainform.pas b/components/fpspreadsheet/examples/fpsspeedtest/mainform.pas index 895e753f3..8c1409cf6 100644 --- a/components/fpspreadsheet/examples/fpsspeedtest/mainform.pas +++ b/components/fpspreadsheet/examples/fpsspeedtest/mainform.pas @@ -153,12 +153,6 @@ begin if not CgFormats.Checked[i] then continue; - // Currently no reader support for xlsx, skip test to avoid the exception. - if SPREAD_FORMAT[i] = sfOOXML then begin - Log := Log + ' n/a '; - continue; - end; - FCurFormat := SPREAD_FORMAT[i]; StatusMsg('Reading ' + GetFileFormatName(FCurFormat)); diff --git a/components/fpspreadsheet/xlsxooxml.pas b/components/fpspreadsheet/xlsxooxml.pas index bc64d680c..9dbe66616 100755 --- a/components/fpspreadsheet/xlsxooxml.pas +++ b/components/fpspreadsheet/xlsxooxml.pas @@ -611,6 +611,9 @@ begin raise Exception.Create('unknown error type'); end else raise Exception.Create('Unknown data type'); + + if FIsVirtualMode then + Workbook.OnReadCellData(Workbook, rowIndex, colIndex, cell); end; procedure TsSpreadOOXMLReader.ReadCellXfs(ANode: TDOMNode);