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

LCL/Grids: Increase visibility of TrySmoothScrollBy (issue #40523).

Browse Source
This commit is contained in:
wp_xyz 2023-09-28 12:32:41 +02:00
parent e2f9f0c8ef
commit cc97670486
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/grids.pas
View File

@ -960,7 +960,6 @@ type
function StartColSizing(const X, Y: Integer): boolean;
procedure ChangeCursor(ACursor: TCursor; ASaveCurrentCursor: Boolean = true);
function TitleFontIsStored: Boolean;
function TrySmoothScrollBy(aColDelta, aRowDelta: Integer): Boolean;
procedure TryScrollTo(aCol,aRow: Integer; ClearColOff, ClearRowOff: Boolean);
procedure UpdateCachedSizes;
procedure UpdateSBVisibility;
@ -1201,6 +1200,7 @@ type
procedure StartPushCell;
procedure TopLeftChanged; virtual;
function TryMoveSelection(Relative: Boolean; var DCol, DRow: Integer): Boolean;
function TrySmoothScrollBy(aColDelta, aRowDelta: Integer): Boolean;
procedure UnLockEditor;
procedure UnprepareCellHints; virtual;
procedure UpdateHorzScrollBar(const aVisible: boolean; const aRange,aPage,aPos: Integer); virtual;