Tratamiento de constantes

[Caminante]

Hola

Pues en delphi 7 lo que haria seria declarar un array.

Código Delphi [-]
Valores:array[No_leida..expirada]of string=('No leida','Aceptada','Rechazada,'Expirada');

Y lo usaria asi:

Código Delphi [-]
memo.Lines.Add('Estado '+ valores[result.Metadatos[i].Estado]);

Bueno no lo he probado asi que tal vez halla que hacerle unos ajustes. Pero creo que se entiende la idea.

Saludos