diff --git a/examples/anchordocking/anchordocking.pas b/examples/anchordocking/anchordocking.pas index cfd14a1a7a..a328e890f2 100644 --- a/examples/anchordocking/anchordocking.pas +++ b/examples/anchordocking/anchordocking.pas @@ -2342,7 +2342,7 @@ function TAnchorDockHostSite.EnlargeSide(Side: TAnchorKind; begin Result:=false; if EnlargeSideResizeTwoSplitters(Side,ClockwiseAnchor[Side], - OnlyCheckIfPossible) then exit; + OnlyCheckIfPossible) then exit(true); if EnlargeSideResizeTwoSplitters(Side,OppositeAnchor[ClockwiseAnchor[Side]], OnlyCheckIfPossible) then exit(true); // ToDo: