From d3f2c24886d6c63bc3b32d5cd30437a3f40ba33a Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Thu, 9 Feb 2017 18:44:58 +0000 Subject: [PATCH] fpspreadsheet: Less warnings git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5741 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas b/components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas index 1e3426da1..c6046b88b 100644 --- a/components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas +++ b/components/fpspreadsheet/source/visual/fpspreadsheetctrls.pas @@ -2757,12 +2757,12 @@ begin ExtractFromCell(Worksheet.ActiveCellRow, Worksheet.ActiveCellCol); end; ftRow: - if (([lniRow] * AChangedItems <> []) and (PtrInt(AData) = Worksheet.ActiveCellRow)) or + if (([lniRow] * AChangedItems <> []) and ({%H-}PtrUInt(AData) = Worksheet.ActiveCellRow)) or (lniSelection in AChangedItems) then ExtractFromRow(Worksheet.ActiveCellRow); ftCol: - if (([lniCol] * AChangedItems <> []) and (PtrInt(AData) = Worksheet.ActiveCellCol)) or + if (([lniCol] * AChangedItems <> []) and ({%H-}PtrUInt(AData) = Worksheet.ActiveCellCol)) or (lniSelection in AChangedItems) then ExtractFromCol(Worksheet.ActiveCellCol);