We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 5031f47 commit 7b1e166Copy full SHA for 7b1e166
Source/VirtualTrees.StyleHooks.pas
@@ -93,7 +93,7 @@ TScrollWindow = class(TWinControl)
93
procedure MouseLeave; override;
94
procedure PaintScroll; override;
95
function PointInTreeHeader(const P: TPoint): Boolean;
96
- procedure UpdateScroll;
+ procedure UpdateScroll;{$if CompilerVersion >= 34}override;{$ifend}
97
public
98
constructor Create(AControl: TWinControl); override;
99
destructor Destroy; override;
0 commit comments