Variablen-Abfrage in Integerbereich

[ThorZten]

Guten Abend!
Habe folgendes Problem:
Ich möchte eine Integer-Abfrage machen die wie folgt aussieht:

Delphi-Quellcode:

var zahl:Integer;

...
//zahl wird mehrfach modifiziert
if zahl in [0..50] then ...
if zahl in [350..400] then ...

Die erste Abfrage bereitet keine Probleme, bei der zweiten meckert aber Delphi mit "Constant expression violates subrange bounds", also sprenge ich die Grenzen mit dieser Abfrage.

Meine Frage: wie umschiffe ich dieses Problem?
Muss ich wirklich jede Zahl so umständlich abfragen:
if (zahl=350)or(zahl=351)or(zahl=352)or... oder gibt es da eine schönere Lösung?

Danke schon einmal