Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?

Folgende Funktion befindet sich in meinem Code und davon eine für jedes meiner Enums

Delphi-Quellcode:

			// EnumGetString(TWProcesses.wpIdle) würde string 'wpIdle' zurückgeben

function EnumGetString(aEnumValue: TWProcesses): string;

var

 bVal: Byte;

begin

 Move(aEnumValue, bVal, SizeOf(TWProcesses));

 Result := GetEnumName(TypeInfo(TWProcesses), bVal);

end;

Ist es möglich diese Funktion so abzuändern, dass ich alle meine Enums an eine einzige Funktion schicken kann, welche mir dann den String zurückgibt wie oben zu sehen auch?

Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?

Enum in String mehrere Overloaded Funktionen zu einer einzigen zusammenfassen?

Forumregeln