Definieren von Byte-Bereichsüberschreitungen

[DevidEspenschied]

Hallo,

ich habe eine Byte-Variable deklariert, welche nur Werte im Bereich zwischen 30 und 122 annehmen darf:

Delphi-Quellcode:

VAR ByteVariable : 30..122;
BEGIN
  ByteVariable:=120;
  Inc(ByteVariable, 10);
END;

Leider führt die Inkrementation dazu, dass aus den zugewiesenen 120 eine 130 gemacht wird, obwohl ich das mit der Variablendeklaration eigentlich ausschließen wollte. Wie kann ich eine Byte-Variable so deklarieren, dass die Erhöhung um 10 hier die 38 liefert ? Der Wert soll also am Anfang wieder hinaddiert werden.