Wie aktivier man ein edit fenster ??

[faux]

Delphi-Quellcode:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Length(Edit1.Text) = 5 then //statt 5 halt die maximale Anzahl...
    Edit2.SetFocus;
end;