Fokus von TEdit aufheben

[hathor]

Delphi-Quellcode:

procedure TForm1.Edit1MouseLeave(Sender: TObject);
begin
bnExit.SetFocus;
end;