Case-Anweisung - Zwingen alle Elemente des Typen auszuprogrammieren

[dummzeuch]

Zitat von lxo:

Zitat von dummzeuch:

Zitat von lxo:

Zitat von himitsu:

    {$IF High(TEnum) <> t2} {$MESSAGE Error 'peng'} {$IFEND}

Vielleicht ganz banal:

{$IF Ord(High(TENum) <> 1}{$MESSAGE Error 'peng'} {$IFEND}

Ist doch erstmal das gleiche wie von himitsu oder wo soll da der Unterschied sein?

Es erkennt auch, wenn jemand einen enum-Wert einfügt, nicht nur wenn jemand einen Wert anhängt. Bei beidem ändert sich Ord(High(TENum)), aber nur bei letzterem ändert sich High(TENum).