Source position: gtkproc.pp line 760
function XGetWorkarea(
var ax: gint;
var ay: gint;
var awidth: gint;
var aheight: gint
):gint;