Source position: ggi.pp line 574
function ggiGetGCForeground(
vis: TGGIVisual;
var Color: TGGIPixel
):Integer;