Source position: ggi.pp line 539
function ggiSetMode(
visual: TGGIVisual;
var tm: TGGIMode
):Integer;