Source position: graphics.pp line 1652
function GraphicExtension(
GraphicClass: TGraphicClass
):String;