paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FPSpreadsheet: Fix compilation error after previous commit, issue #39127, patch by paweld.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9769 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2025-06-04 09:33:01 +00:00
parent 2f4ac6f3a7
commit d9fb19d3ca
1 changed files with 2 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
components/fpspreadsheet/source/common/fpschart.pas
View File

@ -3875,9 +3875,9 @@ procedure TsStockSeries.SetOpenRange(ASheet1: String; ARow1, ACol1: Cardinal;
@param ARow2 Index of the bottom row of the range @param ARow2 Index of the bottom row of the range
@param ACol2 Index of the right column of the range @param ACol2 Index of the right column of the range
-------------------------------------------------------------------------------} -------------------------------------------------------------------------------}
procedure TsStockSeries.SetOpenRange(ARow1, ACol1, ARow2, ACol2: Cardinal); procedure TsStockSeries.SetHighRange(ARow1, ACol1, ARow2, ACol2: Cardinal);
begin begin
SetOpenRange('', ARow1, ACol1, '', ARow2, ACol2); SetHighRange('', ARow1, ACol1, '', ARow2, ACol2);
end; end;
{@@ ---------------------------------------------------------------------------- {@@ ----------------------------------------------------------------------------
@ -3891,10 +3891,6 @@ end;
@param ARow2 Index of the bottom row of the range @param ARow2 Index of the bottom row of the range
@param ACol2 Index of the right column of the range @param ACol2 Index of the right column of the range
-------------------------------------------------------------------------------} -------------------------------------------------------------------------------}
procedure TsStockSeries.SetHighRange(ARow1, ACol1, ARow2, ACol2: Cardinal);
begin
SetHighRange('', ARow1, ACol1, '', ARow2, ACol2);
end;
procedure TsStockSeries.SetHighRange(ASheet1: String; ARow1, ACol1: Cardinal; procedure TsStockSeries.SetHighRange(ASheet1: String; ARow1, ACol1: Cardinal;
ASheet2: String; ARow2, ACol2: Cardinal); ASheet2: String; ARow2, ACol2: Cardinal);
begin begin