ich hab ein Editfeld, in das ein integer wert geschrieben werden soll, wird nun z.b. ein string eingegeben wird über showmessage fehlermeldung ausgegeben
Delphi-Quellcode:
procedure TForm1.Edit4KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
begin
bevel4.Hide;
try aanzahl:=strtoint(edit4.Text)
except
begin showmessage('Das ist kein gültiger Wert');exit; end;
edit4.Hide;
radiogroup1.Show;
radiogroup1.setfocus;
aber wie kann ich, nachdem die message angezeigt wird, wieder an den anfang der prozedur zurückkehren, dass ein neuer wert eingegeben werden kann?