Source position: jwawingdi.pas line 4805
function EnumFontFamiliesA(
hdc: HDC;
lpszFamily: LPCSTR;
lpEnumFontFamProc: FONTENUMPROCA;
lParam: LPARAM
):Integer;