Succ(TMyType) Scheint ein falsches ergebniss zu geben.

[himitsu]

Inc erhöht erst Recht nur um 1 -.-''

Es kann sein, daß succ nicht mit solchen predefinierten Sets zurecht kommt?

Notfalls halt sowas versuchen

Delphi-Quellcode:

Repeat
  Reiz := Succ(Reiz);
Until not (Reiz in TReiz);