Ist das Dein Ernst? Mit Eurem Info-Lehrer würde ich gern mal ein paar Takte reden.
Delphi-Quellcode:
if (zaehler.Text = '') or (zaehler2.Text = '') then
begin
ShowMessage('Da fehlt etwas!');
end
else
begin
a:= StrtoFloat(zaehler.Text);
b:= StrtoFloat(zaehler2.Text);
//usw.
end;
Wobei damit auch noch nicht sichergestellt ist, dass es klappt (was ist denn, wenn jemand Buchstaben eingibt?), aber zumindest Leerstrings sollten keine Fehler mehr verursachen.