Source position: jwawingdi.pas line 4526
type OLDFONTENUMPROC = function(
lpelf: LPLOGFONT;
lpntm: LPTEXTMETRIC;
FontType: DWORD;
lParam: LPARAM
):Integer;