Añadir propiedades a TField

[altp]

Estoy intentando añadir propiedades a TField pero me da error.

He hecho lo siguiente y me da error:

type
TmyField = class(TField)
private
FGrid: String;
protected
procedure setGrid(const value : string);
public
constructor Create(AOwner: TComponent); override;
published
property Grid: string read FGrid write SetGrid;
end;

implementation

constructor TmyField.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
end;

procedure TmyField.setGrid(const value : string);
begin
FGrid := Value;
end;

Me da error al asignar la variable value a FGrid.

Alguien me puede ayudar? Gracias de antemano