Mit dem Pointer finde ich auch nicht so schön...
Enum1 und Enum2 sind ja wie globale Variablen...
Also warum nicht auch so benutzen...
Delphi-Quellcode:
Enum1,
Enum2 : Array of TEnum;
Procedure Init
begin
Enum1 := [eEins, eDrei, eSechs, eSieben, eZehn];
Enum2 := [eZwei, eVier, eFünf, eSechs, eAcht, eNeun, eZehn] ;
end;
Müsste doch auch gehen... Hab gerade keinen Compiler...