ok thx für die hilfe.
hab es jetzt auch geschaft bei mir im code einen fehler error einzubauen falls nicht alle editfelder *edit* meine ausgefüllt sind.
hab jetzt einfach das hinzugefügt.
Delphi-Quellcode:
try
eins:=StrToInt(edit1.text);
zwei:=StrToInt(edit2.text);
drei:=StrToInt(edit3.text);
vier:=StrToInt(edit4.Text);
fuenf:=StrToInt(edit5.Text);
except
ShowMessage('Bitte Fülle alle Felder aus!');
abort;
end;