Erstmal an den Threadersteller: Du musst dringend mehr Eigeninitiative zeigen! Es geht so einfach nicht, dass du nach einem kurzen Blick in die Hilfe aufgibst, prober doch mal was aus. Lies nach, welchen Parameter TryStrToInt noch erwartet!
Lösen würde ich es dann so:
Delphi-Quellcode:
Zahl := StrToIntDef(TEdit(Sender).Text, -1);//in Zahl umandeln, wenn es keine Zahl ist, kommt -1 raus (Nicht in 0..15)
if not (Zahl in [0..15]) then//wenn die Zahl nicht zwischen 0 und 15 ist..
ShowMessage('Fehlerhafte Eingabe');//.. ist es eine fehlerhafte Eingabe