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