okay das -1 hatte ich mal creativ überlesen
In der delphi hilfe steht aber eindeutig
function High(var X: Type): Integer;
War einfach mal davon ausgegangen das das pauschal gilt und nicht getestet/weitergelesen, aus dem was weiter unten steht könnte man schliessen das tatsächlich der Typ zurückgegeben wird
Ich nehme alles zurück und behaupte das Gegenteil!
Abgesehen vom succ
succ(ord(high(FruchtTyp))) = ord(high(FruchtTyp) + 1