Discussion :

[pointer]

Salut
Dans Mon projet il ya

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
  Application.Initialize;
  FSplash:= TFSplash.Create(Application);
  Application.CreateForm(TFLogin, FLogin);
  Application.CreateForm(TFmain, Fmain);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.Run;

Comment je fais si je veux selon Flogin je crée les autres fenetres (FLogin est une fenetre de mot de passe si le mot de passe est juste je crée les autres fenetres)
et merci!

[tourlourou]

au lieu de les créer dans le dpr, au démarrage de l'appli, il faut les créer dans la fiche FLogin, en dynamique, si autorisé !

[slimjoe]

Salut
Dans Mon projet il ya

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
  Application.Initialize;
  FSplash:= TFSplash.Create(Application);
  Application.CreateForm(TFLogin, FLogin);
  Application.CreateForm(TFmain, Fmain);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.Run;

Comment je fais si je veux selon Flogin je crée les autres fenetres (FLogin est une fenetre de mot de passe si le mot de passe est juste je crée les autres fenetres)
et merci!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
  Application.Initialize;
  FSplash:= TFSplash.Create(Application);
  Application.CreateForm(TFLogin, FLogin);
 
  FLogin.Showmodal;
  if FLogin.UsagerValide then
  begin
    Application.CreateForm(TFmain, Fmain);
    Application.CreateForm(TForm1, Form1);
    Application.CreateForm(TForm2, Form2);
    Application.CreateForm(TForm3, Form3);
    Application.CreateForm(TForm4, Form4);
    Application.Run;
  end
  else
    Application.Terminate;

Bon dev!

[Sub0]

Salut!

J'avais fait une démo à ce sujet :
http://sub0.developpez.com/delphi/login.zip

N'oubli pas d'ajouter le tag [Résolu], à+