[bulc]

Tengo un TForm personalizado para entrada de datos y me gustaría que al abrirlo el Foco se colocara en el Editor. No sé cómo hacerlo. Aquí pongo el código:

Código Delphi [-]
procedure TForm1.BitBtn3Click(Sender: TObject);  // TForm de recogida de datos.
Var
  FModal: TForm;   Boton: TButton;   Lbl : TLabel;   Edito : TEDit;
begin
  FModal:= TForm.Create(Application);   FModal.Caption:= 'Recoger Nº EDIFIL';
  FModal.BorderStyle:= bsDialog;          FModal.Position:= poScreenCenter;
  Boton := TButton.Create( FModal);
  With Boton do
  begin
    Caption:= 'Salir y Guardar';
    Left:= 85;         Top:= 140;     
   Width:= 180;     Parent:= FModal;     
   Default:=True;    ModalResult:= mrClose;
  end;
  Lbl := TLabel.Create( FModal);
  with Lbl do
  begin
     Caption := 'Escribe tu Nº Edifil: ';      Left:= 90;      
    Top:= 60 ;      Parent:= FModal;
  end;
  Edito:= TEdit.Create(FModal);
  With Edito do
  begin
    Edito.Text:= '9999';     Edito.Font.Size :=18;     
    Edito.Left := 85;          Edito.Top := 80 ;     
    Parent:= FModal;
  end;
  try
    FModal.ShowModal; //Soy Modal y me tienes que cerrar.
  finally
    begin
     Edifil:= Copy(Edito.Text, 1, 5);
     FModal.Free;
    end;
       //Libera todo su contenido
  end;
end;