Zitat von
Amateurprofi:
Integer(High(TFarbe)) + 1
Danke für deinen Vorschlag, aber es tut nicht das was ich will;
Dein Code addiert zu dem Wert des letzten Elements eins dazu, was aber nicht unbedingt gleiche der Anzahl der Element in dem Typ ist.
Gruß
Thomas