Discussion :

[david_chardonnet]

Bonjour,

Je programme une DLL dans laquelle je voudrais m'assurer qu'au chargement de celle-ci les objets soient alloués, et qu'au déchargement ils soient désalloués.

Il me semble qu'il existe des fonction initinstance et exitinstance par défaut, auxquelles je voudrais rajouter mon code, mais je ne sais pas comment faire.

Avez-vous une idée?

Merci d'avance

[anapurna]

salut

Tu Cherche un truc dans ce gout la ?

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
21
22
23
24
25
26
27
28
29
 
 library DllEntry;
 
const
  DLL_PROCESS_ATTACH = 1; // Executable attaches to DLL
  DLL_THREAD_ATTACH = 2;   // Thread in exe calls DLL
  DLL_THREAD_DETACH = 3;   // Thread leaves DLL
  DLL_PROCESS_DETACH = 0; // Exe detaches from DLL
 
  procedure PointEntreDLL(Reason: DWORD);
  begin
    case Reason of
      Dll_Process_Attach: MessageBox(DLLHandle, 'Process Attach', 'Info', mb_Ok);
      Dll_Thread_Attach: MessageBox(DLLHandle, 'Thread Attach', 'Info', mb_Ok);
      Dll_Thread_Detach:MessageBox(DLLHandle, 'Thread Detach', 'Info', mb_Ok);
      Dll_Process_Detach:MessageBox(DLLHandle, 'Process Detach', 'Info', mb_Ok);
    end;                                          
  end;
 
  //implementation des fontions d'exportation ici 
 
  //Bloc Principal
  begin                                           //  code d'initialisation
    if DllProc = nil then 
    begin
       DllProc := @PointEntreDLL;
       PointEntreDLL(Dll_Process_Attach);
    end;
  end.

@+ Phil

[denokan]

dans une unité tu peux ajouter un bloc initialization ou finalization :
http://www.marcocantu.com/epascal/Fr...h11unitfr.html

[david_chardonnet]

anapurna,

Ca ressemble à ça, mais en fait dans ton code, je ne vois pas à quel moment je peux désallouer la mémoire.

J'ai besoin en quelque sorte d'un "FormCreate" et d'un "FormDestroy" sur la DLL. Je vois où je peux allouer la mémoire, mais en ce qui concerne la désallocation je ne vois pas.

[david_chardonnet]

denokan,

mon problème ne s'applique pas à une unité mais à une DLL, une "library". Je ne suis pas certain que ces blocs d'intialisation de de finalisation s'appliquent dans ce cas là.

[anapurna]

salut

dans le PointEntreDLL la ou je fait un case bin c'est a toi de faire tes test moi je n'affiche que des message

@+ Phil

[david_chardonnet]

Ok, je viens de piger le truc. Merci beaucoup à vous deux...