fpspreadsheet: Disable workbook notifications while moving cells.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8261 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-04-22 21:42:02 +00:00
parent 02bd21629c
commit 25878c44d6

View File

@ -2280,6 +2280,10 @@ begin
if ACell = nil then
exit;
// Avoid misplaced notifications during the copy operations when things could
// not yet be in place.
FWorkbook.DisableNotifications;
// Store old location
fromRow := ACell^.Row;
fromCol := ACell^.Col;
@ -2296,6 +2300,8 @@ begin
// Delete cell at old location
DeleteCell(ACell);
FWorkbook.EnableNotifications;
// Notify visual controls of changes
ChangedCell(AToRow, AToCol);