Discussion :

[portu]

Bonjour a tous,

Je fais un projet qui se compose d'une application qui utilise des dll (qui comporte des fiche).

Je charge les dll dynamiquement (loadLibrary) .
Ma question est de savoir, lorsque l'on ferme la fiche principale de la DLL , est ce que celle ci (la dll) est dechargée ou faut il faire un FreeLibrary pour la decharger.
Si il faut quand meme la decharger avec FreeLibrary, la dll devra communiquer avec l'application, dans ce cas, la seule solution est d'envoyer un message (SendMessage)si je ne me trompe.

Et c'est là que est mon probleme. Comment créer ce message perso qui une fois envoyé l'applic le receptionnera et executera la procedure de dechargement de la dll ?

Merci d'avance. Et bonne journée

[gord's]

tu as aussi la solution du callback

[portu]

tu as aussi la solution du callback

C'est à dire ????

[gord's]

une procédure qu'appelera ta dll, un peu comme les events des composants.

tu peux la rajouter en param à une fonction existantes de ta dll, ou faire une fonction specifique pour l'initialiser. Un truc du genre :

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
18
19
20
//dans la dll et le prog utilisateur :
type
    TmonCallback = procedure(parametres si necessaire) of objetc
 
// dans la dll
var  // globale, ou dans un objet global
ZeCallback : TmonCallback=nil;
 
procedure setCallback(p: TmonCallBack) stdcall;  // à exporter
 
 
// dans le prog utilisateur
 
procedure TForm1.SurFermetureDll(les memes para que TMonCallback)
begin
    // actions sur fin dll
end;
 
// à l'init
setCallBack(SurFermetureDll);

c'est un peu fouillis, pour faire + précis il faudrait connaitre l'interface de ta dll et savoir comment tu l'utilises

[TMuet]

En principe la charge de la désallocation revient à celui qui a effectué l'allocation.

Donc si tu as effectué le LoadLibray, tu devrais également effectuer le FreeLibrary.

Si tu ouvres tes fiches par des ShowModal, il n'y a aucun problème, tu peux enchaîner avec FreeLibrary.
Le cas échéant, cela est un peu plus subtil. Tu peux alors utiliser un TApplicationEvents.

[portu]

Bon je pense que c'est un peu trop le bord?? avec le callback , Un simple envoie de Message perso ferait l'affaire , non ???? Pouvez vous m'indiquer la marche a suivre svp.
merci

[portu]

ReBonjour a tous, voila, j'ai decidé de decharger la dll par un envoi de message, j'ai procedé comme ceci :
Dans ma Dll :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Const Wm_QuitDll = Wm_User +30; //Mon message Perso
Var HAppli : Hwnd; // Handle De La fenetre qui doit recevoir le message qui est initialisée lors de l'appel.
....
.....
....
Procedure MaFiche.QuitBnt(sender :Tobject);
begin
SendMessage(HAppli,Wm_QuitDll,0,0);
end;

Dans L'application qui fait l'appel

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
 
Const Wm_QuitDll = Wm_User +30; //Mon message Perso
 
type
  TMenuForm = class(TForm)
 .....
......
......
  Procedure QuitDll(Var Msg : TMessage); message Wm_QuitDll;
 ......
 
Procedure TMenuForm.QuitDll(Var Msg : Tmessage);
begin
FreeLibrary(HDll);// Hdll recupere le Handle de la Dll qui a ete chargée
end;

en mode Debug, lorsque j'execute le sendmessage de la dll , une belle fenetre CPU avec Différente adresses mémoires s'affiche+Violation d'acces .
Pq ? Pouvez vous m'aider ?

Et quand J'execute le programme , si je fais la meme manip , l'application ce ferme. C'est tres etrange non ? la reception du message a bien lieu pourtant !

[gord's]

il faut faire un postMessage, pas un SendMessage, car le send est synchrone: c'est comme si tu faisais un appel de procedure

[portu]

il faut faire un postMessage, pas un SendMessage, car le send est synchrone: c'est comme si tu faisais un appel de procedure

Et oui , merci Bcp , c parfait a+