Source position: winapih.inc line 93
function EnumFontFamilies(
DC: HDC;
Family: Pchar;
EnumFontFamProc: FontEnumProc;
LParam: Lparam
):LongInt;