Indy+WriteBuffer

[roman]

DarKraZY está totalmente en lo correcto. Tendrás que agregar variables específicas al record para almacenar las propiedades qe te interesen del Font:

Código Delphi [-]
registro = record
  id:integer;
  mensaje:string[50];
  nombre_fuente: TFontName;
  color_fuente: TColor;
  tamaño_fuente: Integer;
  
  etc.
end;

Cuando el servidor reciba el registro llenará un objeto Font con estos valores.

// Saludos