Añadir propiedades a TField

[roman]

¡Ah! Esto es excelente andre1569, yo ya nada más añadiría que una tercera opción sería usar Tag para apuntar a un objeto:

type
  TMyFieldData = class
    { propiedades extra }
  end;

  ...

  { Crear los campos }
  Field := TStringField.Create(Self);
  MyFieldData := TMyFieldData.Create;
  MyFieldData.Propiedad := valor;

  Field.Tag := LongInt(MyFieldData);

  ...

  { Usar las propiedades }
  Valor := TMyData(Field.Tag).Propiedad;

  ...

  { Liberar objetos }
  TMyFieldData(Field.Tag).Free;

// Saludos