impossible d'intégrer un UNIT dans mon projet, problème d'exécution

Bonjour,

Je suis étudiant en informatique et je développe en delphi une application formulaire avec de la POO.
Je dispose d'un unit : 'U_joueur.pas' dans lequel j'ai ma classe joueur.
'P_demarrage.dpr' mon formulaire
'U_demarrage.pas' le unit de mon formulaire dans lequel je fais appel à U_joueur.pas :

unit U_demarrage;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, U_joueur, StdCtrls;

...

j'ai également modifié P_demarrage pour y inclure U_joueur.pas :

program P_demarrage;

uses
Forms,
U_demarrage in 'U_demarrage.pas' {EC},
U_joueur in 'U_joueur.pas';

{$R *.res}

begin
Application.Initialize;
Application.CreateForm(TEC, EC);
Application.Run;
end.




Problème, lorsque je lance mon application j'obtiens le message d'erreur :

Le projet P_demarrage.exe a provoqué une classe d'exception EInvalidOperation avec le message 'Impossible de focaliser une fenêtre désactivée ou invisible'.Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.

Bref là je bloque, j'ai passé 2heures sur le problème et je commence à lâcher le bout =/

non, non et non.

1) ne mets pas d'underscore "_" dans les noms d'unité ou de projet!
2) n'ajoute pas manuellement d'unité dans le projet! on peu le faire dans la clause Uses de l'interface ou implementation d'une unité, mais pas dans le DPR! ajoute l'unité via le menu "projet > ajouter au projet"
3) le message d'erreur indique un probleme de creation d'objet alors que la fenetre n'est pas encore visible, verifie les declaration de creation qui precede le constructeur de la fiche principale.

---

4) l'erreur peut aussi signifier que tu crée un objet soit dans le mauvais conteneur, soit avec un owner a nil :

TButton.Create(nil);

par exemple, ou TButton.Create(TTimer) (ttimer n'etant pas un composant visuel)

---

J'ai respecté tes les deux premiers points, mais je ne vois pas quoi modifier pour le 3e :

" le message d'erreur indique un problème de création d'objet alors que la fenêtre n'est pas encore visible, vérifie les déclaration de création qui précède le constructeur de la fiche principale."

Je ne sais pas comment rendre ma fiche "visible".

voici le code de ma fiche principale :

unit Udemarrage;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Ujoueur, StdCtrls;                 

type
  TEC = class(TForm)
    B_commencer: TButton;
    L_JEU: TLabel;
    e1: TEdit;
    e2: TEdit;
    e3: TEdit;
    e4: TEdit;
    B_quitter: TButton;
    E_C4: TEdit;
    E_C3: TEdit;
    E_C2: TEdit;
    E_C1: TEdit;
    L_C1: TLabel;
    L_C2: TLabel;
    L_C3: TLabel;
    L_C4: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure B_quitterClick(Sender: TObject);
    procedure B_commencerClick(Sender: TObject);
    procedure E_C1Change(Sender: TObject);
    procedure E_C2Change(Sender: TObject);
    procedure E_C3Change(Sender: TObject);
    procedure E_C4Change(Sender: TObject);
    procedure continuer();
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;

var
  EC: TEC;
  C1 , C2 , C3 , C4 : T_joueur;

implementation

{$R *.dfm}

procedure TEC.FormCreate(Sender: TObject);
begin

        e1.Text := '';
        e2.Text := '';
        e3.Text := '';
        e4.Text := '';

        E_C1.SetFocus;

end;
...
end.

Merci, j'ai retiré mon SetFocus et appelé ma fiche joueur en premier dans mon .dpr

Maintenant ça fonctionne merci pour la rapidité des réponses !!