Mehrere Tasten in einer Procedure abfragen?

[mat72]

Danke für eure Hilfe.
Ich habe das ganze jetzt so gelöst.

Delphi-Quellcode:

procedure TForm3.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if (Key=#13)
    then
      Edit2.SetFocus;
end;

procedure TForm3.Edit1Exit(Sender: TObject);
begin
    try
       ol:=StrToFloat(Edit1.Text);
    except
          ShowMessage('Please enter only Numbers!');
          Edit1.Clear;
          Edit1.SetFocus;
    end;
end;

Gruß
Matthias