Source position: gtkproc.pp line 690
procedure GetWidgetRelativePosition(
aWidget: PGtkWidget;
var Left: Integer;
var Top: Integer
);