[Neftali [Germán.Estévez]]

Basta con que añadas las funciones de conversión.

Código Delphi [-]
function TipoVallaToStr(TipoValla:TTipoValla):String;
begin
  // valla de madera, valla de metal, sin valla
  case TipoValla of
    tvVallaMetal:   Result := 'valla de metal';
    tvVallaMadera:  Result := 'valla de madera';
    tvSinValla:     Result := 'sin valla';
  end;
end;


function StrToTipoValla():TTipoValla;
begin
...Equivalente a la anterior
end;

Otra opcion y si no tienes que tratar mucho con ésto en tu programa, es que definas tres constantes para los diferentes valores y utilices esas constantes olvidandete del tipo TTipoValla, para leer y grabar.

Código Delphi [-]
  STR_VALLA_METAL = ' valla de metal';
  STR_VALLA_MADERA = ' valla de madera';
  STR_VALLA_SINVALLA = 'sin valla';