tFontPrefs

type tFontPrefs = record

  fp_Reserved: array [0..2] of LongInt;

  fp_Reserved2: Word;

  fp_Type: Word;

  fp_FrontPen: Byte;

  fp_BackPen: Byte;

  fp_DrawMode: Byte;

  fp_TextAttr: tTextAttr;

  fp_Name: array [0..FONTNAMESIZE-1] of Char;

end;