Wenn du unbedingt den Enumwerten eine Zahl zuordnen musst dann geht das so:
Delphi-Quellcode:
TEnumErrors = (NOERROR=0, FILEERROR=104, NETERROR=200, ...);
TErrorInfo = record
err: TEnumErrors;
txt: String;
end;
const
ErrorInfo: array[0..2] of TErrorInfo = (
(err:NOERROR; txt:"kein Fehler"),
(err:FILEERROR; txt:"Dateifehler"),
(err:NETERROR; txt:"Netzwerkfehler")
);
Um jetzt von einem TEnumError zu der Beschreibung zu kommen verwendet man eine For-Schleife über das Array
ErrorInfo und holt sich den passenden
txt raus.
Der Code dazu spare ich mir -> Hausaufgabe.
Man kann den Record auch um weitere Infos erweitern wie z.B. die Schwere des Fehlers.