Динамическая загрузка DLL

← →
Ega23 © (2005-02-03 14:50) [0]

Есть DLL с экспортируемой функцией
function GetNewParam(Param1, Param2 : DWord):PChar; StdCall;

Как прописать динамическую загрузку этой библиотеки?

LoadLibrary, GetProcAddress, FreeLibrary - это я знаю. А вот что присвоить GetProcAddress ?

← →
Lord Zmiy © (2005-02-03 14:52) [1]

...
var
...

procedure USE(Sender: TObject);
type
TNameFunction = function(Par1: Par1Type; ...): ReturnType; stdcall;
var
FunctionName: TNameFunction;
LibHandle: THandle;
Begin
@FunctionName := nil;
LibHandle := LoadLibrary("DllName.dll");
if LibHandle >= 32 then
begin
@FunctionName := GetProcAddress(LibHandle, "FunctionName");
if @FunctionName <> nil then
begin
UseDllFunction;
end;
end;
FreeLibrary(LibHandle);
End;

← →
Alx2 © (2005-02-03 14:54) [2]

>Ega23 © (03.02.05 14:50)

@MyFunc := GetProcAddress(Handle,"GetNewParam"); ?

← →
Ega23 © (2005-02-03 14:54) [3]

Понял, спасибо.

:)

@FunctionName := GetProcAddress(LibHandle, "FunctionName");

:) ну извините не стал переименовывать думал имя функции все поймут :)

Динамическая загрузка DLL Найти похожие ветки