"eingabe" ist ein String, also mehrere Zeichen, du willst aber nur ein Zeichen prüfen "eingabe in [...]". Ersetz das "eingabe", also durch "eingabe[1]":
Delphi-Quellcode:
...
eingabe := DEdit[s2,f2,z2].Text;
if not (eingabe[1] in ['0'..'15', ''])
...
MfG Pr0g