Source position: winapih.inc line 95
function EnumFontFamiliesEx(
DC: HDC;
lpLogFont: PLogFont;
Callback: FontEnumExProc;
Lparam: LPARAM;
Flags: dword
):LongInt;