Discussion :

[draiah]

saluts;
bon, j'ai une application MDI. cette dernière a une fenêtre principal (parant) avec un menu qui appel d'autre fenêtre (enfant).
je veut intégrer un fenêtre de identification (login / password). dans ce cas j'ai changer dans les option du mon projet pour faire apparaître la fenêtre d'identification comme fenêtre principal. le problème c'est que au lancement des autre fenêtre a partir de menu un message d'erreur s'affiche pour me dire que aucune fenêtre MDI est activé.
c'est un problème bloquant
Merci d'avance, bon cordage.
saluts.

[pinson]

dans les propriétés de tes fenêtres mettre pour ta fenêtre principale :

Code :

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

1
2
 
FormStyle := fsMDIForm;

et pour l'ensemble de tes fenêtres enfants :

Code :

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

1
2
 
FormStyle := fsMDIChild;

[pinson]

Malgré tout, je ne comprends pas ton déroulement, peux-tu préciser quelle est ta fenêtre principale. Ta fenêtre de Login, est-elle principale ou une enfant de ta fenêtre principale. Elle est fermée dès le début ou à la fin de ton appli ???

Donne nous le déroulement d'ouverture et de fermeture de tes forms.

[Tardiff Jean-François]

Bonjour,
Je suppose que vous avez quelque chose de ce genre dans votre DPR.

Code :

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

1
2
3
4
5
6
 
APpplication.Initialization;
Application.CreateForm(TFLogin, FLogin);
Application.CreateForm(TMDIParent, FMain);
Application.CreateForm(TMDIChild1, FChild1);
Application.Run;

Vous pouvez essayer :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
APpplication.Initialization;
FLogin := TFLogin .Create;
try
  if FLogin.ShowModal = mrOk then begin
    Application.CreateForm(TMDIParent, FMain);
    Application.CreateForm(TMDIChild1, FChild1);
    Application.Run;
  end;
finally
  Flogin.Free;
end;

Inconvénient.
A chaque fos que vous ajouter une forme ou un database, vous devez vérifier le dpr manuellment (le placement automatique ne fonctionne plus).

[Sub0]

Peut-être peux-tu t'inspirer de cette démo :

http://sub0.developpez.com/delphi/login.zip