Zahlen im Edit "filtern"

[Merchator]

Hi!
Ich bins wieder O.o
Ich sitz hier jetzt schon ne Weile und denke über folgendes nach:

Ich habe ein Editfeld. Dort dürfen allerdings nur Zahlen zwischen 0-29 rein.
Allerdings dürfen die Zahlen 1,3,11,13,22,27 auch nicht da rein.

Also ersteres geht ja so

Delphi-Quellcode:

...
var
s:integer;
 begin
 s:= StrToInt(Edit1.text);
   begin
   if s < 29 then
    begin
    ...
   end
  else
  begin
  ...
  end;

Das funktioniert soweit auch ganz gut.
Nur wie "filtere" ich jetzt die oben genannten Zahlen da raus?
Hab schon versucht mit
if s = 11 or 27 or 13 or 1 or 3 or 14 or 22 then Aber ich bekomm dann immer ne Fehlermeldung von Wegen zugriffsverletzung usw.

Hat also jemand einen besseren Vorschlag, dies zu lösen?

mfG
Merchator