Danke, Himitsu!
[Edit]
Anzahl := Ord(Succ(High(MyType)));
liefert die Meldung:
[dcc32 Fehler]E1012 Konstantenausdruck verletzt untere Grenzen
Anzahl := Succ(Ord(High(MyType)));
Succ(High(MyType)) wird von Compiler als vom Typ MyType interpretiert und das gibt natürlich einen Overflow oder Range Check Fehler.