Form mit einem Edit

[Stevie]

Ist das ein Rätsel? Mein Lösungsvorschlag:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
  try
    StrToInt(Edit1.Text);
    TForm.Create(Application).ShowModal;
    Key := #0;
  except
  end;
end;

P.S. Boxen hab ich aber aus gehabt!