FreeLibrary

[Ricardo León]

Tengo otra duda:

Al utilizar la función FreeLibrary se debe primero hacer el cargue de la dll para obtener su identificador (por decirlo asi) con la función LoadLibrary('dllhost.exe')

Ejemplo:
libreria:= LoadLibrary(ConfigInicial.dll');
FreeLibrary(libreria);

Mi duda es si tengo que indicar la ruta donde se encuentra la dll o no? puesto que esta es una dll de un servicio web que tengo montado en IIS.

[dec]

Hola,

Tal vez algo así podría ser lo suyo:

Código Delphi [-]
     // unload file (if its loaded) so we can remove all traces
     if (GetModuleHandle(PChar(FileName)) <> 0) then
       FreeLibrary(GetModuleHandle(PChar(FileName)));

Donde "FileName" sería la librería a liberar.

[Neftali [Germán.Estévez]]

Empezado por Ricardo León

...Al utilizar la función FreeLibrary se debe primero hacer el cargue de la dll para obtener su identificador (por decirlo asi) con la función LoadLibrary('dllhost.exe')

Más que "cargar" la librería (con LoadLibrary, que la carga en memoria) debes obtener su identificador, como ya te han dicho.
Si dec me permite una pequeña modificación:

Código Delphi [-]
 var
 hDLL: THandle;
 begin
   ...
    // acceder al handle de la librería
   hDLL := GetModuleHandle(aName);
   // la ha encontrado?
   if (hDLL <> 0) then
       FreeLibrary(GetModuleHandle(PChar(FileName)));
    ...

Simplemente para no hacer el GetModuleHandle dos veces.

[dec]

Hola,

Empezado por Neftali

Si dec me permite una pequeña modificación:

Código Delphi [-]
 var
   hDLL: THandle;
 begin
   {...}
   // acceder al handle de la librería
   hDLL := GetModuleHandle(aName);
   // la ha encontrado?
   if (hDLL <> 0) then
     FreeLibrary(GetModuleHandle(PChar(FileName)));
   {...}

Yo te permito lo que tú quieras Neftali, ahora bien, ¿cuántos "GetModuleHandle" ves tú en el código de más arriba?

[Neftali [Germán.Estévez]]

...Si es que no tengo dedos, tengo MORCILASSSSS!!!!!!!!!!!!
TORPE es poco.....

Código Delphi [-]
  var
 hDLL: THandle;
 begin
   ...
   // acceder al handle de la librería
   hDLL := GetModuleHandle(aName);
   // la ha encontrado?
   if (hDLL <> 0) then
       FreeLibrary(hDLL);
    ...

...
veo 1 (ahora).