paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-09 21:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazReport, make lrOfficeImport package compile with previous fpSpreadSheet versions than trunk version, issue #26728

Browse Source 
git-svn-id: trunk@46255 -
This commit is contained in:
jesus 2014-09-19 17:23:12 +00:00
parent 48591ac3cc
commit 0813f5c4ce
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/lazreport/source/addons/lrOfficeImport/lrspreadsheetimportunit.pas
View File

@ -138,11 +138,11 @@ begin
FWorksheet := FWorkbook.GetFirstWorksheet;
Y:=0;
for Row:=0 to FWorksheet.GetLastRowIndex(False)-1 do
for Row:=0 to FWorksheet.GetLastRowIndex-1 do
begin
X:=0;
DY:=CalcRowHeight(FWorksheet.GetRowHeight(Row));
for Col:=0 to FWorksheet.GetLastColIndex(false)-1 do
for Col:=0 to FWorksheet.GetLastColIndex-1 do
begin
Cell := FWorksheet.FindCell(Row, Col);
if Assigned(Cell) then