Thema: Delphi Zahlen im Edit "filtern"

Einzelnen Beitrag anzeigen

Merchator

Registriert seit: 24. Feb 2007
16 Beiträge
 
Delphi 7 Personal
 
#1

Zahlen im Edit "filtern"

  Alt 2. Jun 2007, 18:28
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
<--- Achtung, Anfänger --->
Rechtschreibfehler sind vom Autor beabsichtigt und dienen der allgemeinen Belustigung!
  Mit Zitat antworten Zitat