Source position: agraphics.pas line 2102
procedure FontExtent(
Font: PTextFont;
FontExtent: PTextExtent
);