From 824ea1274e09a15aee7d7679e4138b8a944c811c Mon Sep 17 00:00:00 2001 From: ondrej Date: Thu, 31 Dec 2015 14:25:07 +0000 Subject: [PATCH] lcl: splitter: make MoveSplitter virtual git-svn-id: trunk@51098 - --- lcl/extctrls.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lcl/extctrls.pp b/lcl/extctrls.pp index a080f94aa5..24f4ea5a8b 100644 --- a/lcl/extctrls.pp +++ b/lcl/extctrls.pp @@ -373,7 +373,7 @@ type procedure AnchorSplitter(Kind: TAnchorKind; AControl: TControl); property ResizeControl: TControl read GetResizeControl write SetResizeControl; function GetOtherResizeControl: TControl; - procedure MoveSplitter(Offset: integer); + procedure MoveSplitter(Offset: integer); virtual; procedure SetSplitterPosition(NewPosition: integer); function GetSplitterPosition: integer; public