Descarregar DLL da mem�ria..

Question

Ae galera... Eu criei uma dll no delphi, da� eu carrego o programa, mando carregar ela, o problema, � que eu quero que ela descarregue, quando eu fechar um form(que � a �nica coisa que ela tem), como fa�o isso?
Valeu.. Falows

Aroldo Zanela · Answer

[code:1:dbcdb9a983]function KillDll(aDllName: string): Boolean; var   hDLL: THandle;   aName: array&#91;0..10&93; of char;   FoundDLL: Boolean; begin   StrPCopy(aName, aDllName);   FoundDLL := False;   repeat     hDLL := GetModuleHandle(aName);     if hDLL = 0 then       Break;     FoundDLL := True;     FreeLibrary(hDLL);   until False;   if FoundDLL then     MessageDlg(�Success!�, mtInformation, &91;mbOK&93;, 0)   else     MessageDlg(�DLL not found!�, mtInformation, &91;mbOK&93;, 0); end; [/code:1:dbcdb9a983]...

Aroldo Zanela · Answer

[code:1:8a81eda02f]function KillDll(aDllName: string): Boolean; var   hDLL: THandle;   aName: array&#91;0..10&93; of char;   FoundDLL: Boolean; begin   StrPCopy(aName, aDllName);   FoundDLL := False;   repeat     hDLL := GetModuleHandle(aName);     if hDLL = 0 then       Break;     FoundDLL := True;     FreeLibrary(hDLL);   until False;   if FoundDLL then     MessageDlg(�Success!�, mtInformation, &91;mbOK&93;, 0)   else     MessageDlg(�DLL not found!�, mtInformation, &91;mbOK&93;, 0); end; [/code:1:8a81eda02f]FreeLibrary � uma API do Windows (Kernell32.DLL)...