function FntIsAppDefined(fnt : FontID) : boolean;

    begin
       FntIsAppDefined:=longint(fnt)>=longint(fntAppFontCustomBase);
    end;