Discussion :

[FredericB]

Bonjour,

Voila, pour simplifier les mises à jour de mon programme, je vais créer des dll.
Mon programme principale utilise les fenêtres MDI.
Les différentes fenêtre que je dois afficher dans ma form principale (fsMDIForm), se trouvent dans des dll.

Je sais réaliser l'affichage d'une form provenant d'une dll avec la fonction ShowModal() ou Show(), mais pas en MDI.

J'ai déjà essayer de mettre fsMDIChild dans FormStyle de la fenêtre da ma dll, mais ca plante. Apparament ce n'est pas bon.


Comment fait-on pour afficher une fenêtre fille (fsMDIChild) provenant d'une dll dans ma form principale qui est au format fsMDIForm?

Merci d'avance pour vos réponses.

Fred

[FredericB]

Salut,

Je me suis servi d'un réponse donnée sur le forum.
Si cela peut t'aider :
http://www.developpez.net/forums/viewtopic.php?t=279534


Par contre j'ai une erreur en fermant le programme, que je ne suis pas arrivé à supprimer..... J'ai passer des heures dessus, mais je n'ai rien trouvé... J'ai donc inclus mes fenêtres directement dans mon programme sans passer par la dll...
Si tu trouves, je serais interessé par la solution....


Fred

[henderson]

Salut !

Tout dépend comment c'est contruit.

Par contre il me semble qu'il faut obliger la MDIForm à libérer ses composants avant de libérer la dll :

Code :

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

1
2
3
4
5
6
7
8
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
DestroyComponents();
if(ChildFormDll != NULL)
    {
    FreeLibrary(ChildFormDll); //si la dll a été chargée alors on libère
    }
}

Par ailleurs, je sais qu'il faut jongler avec Application. Voici la fonction qui permet de créer
une première MDIChild (fonction de la dll) :

Les déclarations dans la dll :

Code :

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

1
2
3
USEFORM("Unit2.cpp", Form2); //la MDIChild
extern "C" __declspec(dllexport) void CreerFenetre(TApplication *App);
TApplication *Oldapp;

Code :

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

1
2
3
4
5
6
7
void CreerFenetre(TApplication *App)
{
Oldapp = Application;
Application = App;
TForm2 *F = new TForm2(App);
ShowWindow (F->Handle , SW_SHOW);
}

Au moment du décrochage de la dll :

Code :

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

1
2
3
4
5
6
7
8
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* Use)
{
    if(reason == DLL_PROCESS_DETACH)
        {
        Application = Oldapp; //Rétablir Application
        }
    return 1;
}

J'espère que c'est assez clair...

A plus !