anchor.diff:      S.Read(Letters[I].YOffset, 2);
       S.Seek(2, soFromCurrent); //Unknown field
   
  -    MaxHeight := Math.max(MaxHeight, Letters[I].Height);
  +    maxHeight := Math.max(maxHeight, Letters[I].Height);
   
       if Letters[I].Width * Letters[I].Height = 0 then
         raise Exception.Create('Font data Width * Height = 0'); //Font01.fnt seems to be damaged..
  
positive.code: end;
  
  
  { TResourceFont }
  constructor TKMResFonts.Create;
  var
    F: TKMFont;
  
negative.code:   KM_CommonUtils, KM_Log;
  
  
  const
    LOG_FONTS_RAM_USAGE = False;
  
  
  function NameToFont(const aName: string): TKMFont;
  