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

Revert "LCL: Do not Invalidate a CustomGrid in every MouseUp. Merge request !66 by Petr Kristan."

Browse Source 
This reverts commit 7f6c15e911.

It caused an incompatibility for subclassed DrawGrids, issue #40550.


(cherry picked from commit 53f21809d1)
This commit is contained in:
Maxim Ganetsky 2023-10-20 18:10:00 +03:00
parent 688188fe5c
commit eb2b425869
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/grids.pas
View File

@ -7187,6 +7187,8 @@ begin
if FMoveLast.X>=0 then InvalidateRow(0); if FMoveLast.X>=0 then InvalidateRow(0);
if FMoveLast.Y>=0 then InvalidateCol(0); if FMoveLast.Y>=0 then InvalidateCol(0);
end; end;
{$else}
Invalidate;
{$endif} {$endif}
if not (fGridState in [gsColMoving,gsRowMoving]) then if not (fGridState in [gsColMoving,gsRowMoving]) then
RestoreCursor; RestoreCursor;