Ir al contenido


Foto

[TRUCO DELPHI] Cargar una DLL en tiempo de Ejecucion.


  • Por favor identifícate para responder
No hay respuestas en este tema

#1 sir.dev.a.lot

sir.dev.a.lot

    Advanced Member

  • Miembros
  • PipPipPip
  • 545 mensajes
  • Location127.0.0.1

Escrito 10 diciembre 2016 - 04:01

[TRUCO DELPHI] Cargar una DLL en tiempo de Ejecucion.


delphi
  1. Type
  2. TDLLProc = procedure(Var Param: String);
  3. Var
  4. hDLL : Integer;
  5. MyProc: TDLLProc;
  6. s : String;
  7. begin
  8. hDLL := LoadLibrary('MiDLL.dll');
  9. @MyProc := GetProcAddress(hDLL, 'DLLProc');
  10. If @MyProc <> Nil Then
  11. MyProc(s);
  12. FreeLibrary(hDLL);
  13. end;

Saludos!


  • 1