Delphi-Quellcode:
IF (b[i3] = '1') //Wenn b[i3] eine Zahl ist...
OR (b[i3] = '2')
OR (b[i3] = '3')
OR (b[i3] = '4')
OR (b[i3] = '5')
OR (b[i3] = '6')
OR (b[i3] = '7')
OR (b[i3] = '8')
OR (b[i3] = '9')
OR (b[i3] = '0') THEN
das is ja brutal viel code...
wollt net klugscheissern, aber fuer die zukunft, das geht viel kuerzer:
if edit1.text[1] in ['0'..'9'] then...