diff --git a/HGM.FMX.SmoothScroll.pas b/HGM.FMX.SmoothScroll.pas index 58533f8..5530230 100644 --- a/HGM.FMX.SmoothScroll.pas +++ b/HGM.FMX.SmoothScroll.pas @@ -134,7 +134,7 @@ procedure TSmoothScroll.ScrollDown; procedure TSmoothScroll.ToEnd; begin - FScroll.ViewportPosition := TPointF.Create(FScroll.ViewportPosition.X, FScroll.ContentBounds.Bottom - FScroll.ClientHeight); + FScroll.ViewportPosition := TPointF.Create(FScroll.ViewportPosition.X, FScroll.ContentBounds.Bottom + 100); end; procedure TSmoothScroll.ScrollEvent(WheelDelta: Single);