Hola.
Para versiones mas antiguas de Delphi, otra opcion es:
Código Delphi
[-]
uses TypInfo;
...
function StateName( const Estado: EstadoTipo ): string;
begin
Result := GetEnumName( TypeInfo( EstadoTipo ), Ord( Estado ) );
end;
Uso:
Código Delphi
[-]
...
Estado := StateName( result.Metadatos[i].Estado );
Estado := GetEnumName( TypeInfo( EstadoTipo ), Ord( result.Metadatos[i].Estado ) );
Saludos