Source position: scrollbox.inc line 44
public procedure TScrollingSupport.DefVertScrollHandler(
Sender: TObject;
var APosition: Integer
);