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

[Glados]

Ich möchte gerne einer Funktion einen Enum-Typen als Parameter übergeben.
Das klappt glaube ich

Delphi-Quellcode:

procedure MyFunc<T>(const Param1: string; Enum: T);
begin
end;

Nun möchte ich gerne in einer Schleife auf die einzelnen Inhalte des Enums zugreifen.
Mit einem festen Enum-Typen in der procedure ist das ja einfach. Aber wie sieht das aus, wenn der Enum-Typ jeder Enum sein kann?

Was ich bisher habe und was nicht funktioniert

Delphi-Quellcode:

var i: Integer;
begin
 for i := Low(Enum) to High(Enum) do
 ...