Eingabefeld überprüfen, ob es "leer" ist

[DevilsCamp]

Wie wäre es StrToIntDef. Dann werden alle Texteingaben auch gleich abgefangen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin 
Gewicht := StrToIntDef(EGramm.Text, 0); // Ein Brief mit KEINEM Gewicht wird es wohl nicht geben

If Gewicht = 0  Then
begin
    ShowMessage('Bitte geben sie einen Wert ein') ;
    exit ;
end

[...]

end;