delphi - 从内存单元加载 DLL - 如何使用？

Question

我找到了一个单元，其功能允许直接从内存加载 DLL，但我不知道如何使用它..

这是单位:http://www.delphibasics.info/home/delphibasicssnippets/udllfrommem-loadadllfrommemory

我知道这个函数是:

function memLoadLibrary(FileBase : Pointer) : Pointer;

但我不知道如何使用它，我需要定义什么 FileBase 等等。

有人可以帮助我吗？

Answer 1

您只需将 DLL 放入内存中，并将指向 DLL 在内存中的位置的指针传递给 memLoadLibrary。

例如，来自资源:

hRes := LoadResource(HInstance, 'MYRESNAME');
if hres=0 then
  RaiseLastOSError;
BaseAddress := LockResource(hRes);
if BaseAddress=nil then
  RaiseLastOSError;
lib := memLoadLibrary(BaseAddress);
.....