Enum-Typ als Parameter übergeben und mit einer Schleife durchgehen

[Glados]

Mit dem genauen Typen vorher bin ich mit Low(DerEnumTyp) und High(DerEnumTyp) durchiteriert.
Und mit der Funktion hier unten habe ich mir den aktuellen Wert als String geholt. Mehr passiert da nicht

Delphi-Quellcode:

function GetName<T>(Value: T): string;
begin
 Result := System.Rtti.TRttiEnumerationType.GetName(Value);
end;

var: i: DerEnumTyp;
begin
for i := Low(DerEnumTyp) to High(DerEnumTyp) do
 s := GetName(DerEnumTyp(i));