Fejlhåndtering

Følgende ( jeg har en knap og et editbox i form1):

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
  try
    i:=strtoint(edit1.text);
  except
    on E:EConvertError do MessageDlg(\'En eller flere af de indtastede værdier er ikke korrekte\', mtInformation, [mbOK], 0);
  end;
end;

Virker fint for mig, prøv at quitte delphi og kør programmet og se om det hjælper.

/Afshin