Source position: gtkproc.pp line 476
function SubtractScoll(
AWidget: PGtkWidget;
APosition: TPoint
):TPoint;