Konstantenausdruck verletzt untere Grenze

[MagiC_Creator]

Servus erstma

Hab eine Prozedur geschrieben, die prüft ob die angegebene Auflösungsbreite einen gültigen Wert (640, 720, 800, 1024, 1152 oder 1280) hat und ihn dann dem Feld zuweist. Wenn der Wert ungültig ist soll die Breite 800 verwendet werden. Mein Code sieht folgendermaßen aus:

Delphi-Quellcode:

procedure TSettings.SetResWidth(Value: Integer);
begin
  if Value in [640, 720, 800, 1024, 1152, 1280] then FResWidth := Value
  else FResWidth := 800;
end;

Mein Delphi 7 Personal meckert dann:
[Fehler] Settings.pas(180): Konstantenausdruck verletzt untere Grenze

Ich verstehe nicht warum !?

thx & cya