Textfeld auf Zahl prüfen

[AblukaAlarm]

Delphi-Quellcode:

VAR
zahl:string

Delphi-Quellcode:

try
zahl :=TryStrToFloat(Edit1Masse.text);
except
 showmessage('Geben Sie bitte eine Zahl ein');
end;

habe das hier mal versucht aber das programm starten dann nicht