Hmm.. I just found this record definition in Font4.pas:

Code:
  FontInfo = record
    A, C: integer;
    Wid, Hgt: cardinal;
    char: WideChar;
    x1,y1,x2,y2: double;
  end;
Why is B missing? By looking at your source, my guess is that it's added to C.

Code:
procedure TFontObj.Draw(const X, Y: single; const Txt: widestring; Lev: single);
var CurX: single;
    Ch: Widechar;
    Chaar, I, Ind: integer;
begin
   CurX := X;

   for I := 1 to length(Txt) do
   begin
       Ch := Txt[I];
       Chaar := integer(ch);

       if Chaar = 32 then
       begin
         Ind := -1;
         CurX := CurX + SpaceWidth;
       end
       else
       begin
         Ind := CharLookup[Chaar];
       end;

       if ind > -1 then
       begin
         CurX := CurX + F[Ind].A;

         DrawQuadRT(CurX, Y, F[ind].Wid, F[ind].Hgt, lev, F[ind].x1,F[ind].x2,F[ind].y1,F[ind].y2);

         CurX := CurX + F[Ind].C;
       end;
   end;

end;
Would be nice if you added some comments to make these things clear.