Edit Felder mit Rechenfunktionen erstellen aber wie?

[Prym]

wenn eine zahl zugelassen sein soll würde ich


try
Zahl1 := strtofloat (edt.text);
except
else showmessage ('Bitte eine Zahl eingeben/Nur Eine Zahl Eingeben');
edt.text := '0';
end;

anstadt if nehmen da bei dem if noch buchstaben zugelassen sein können