Что лично я использую, чтобы вызвать какую-то функцию из DLL:
- Объявите тип:
|
|
type
TYourDLLFunc = function(Parm1: TParm1; Parm2: TParm2):
TParm3; |
- Объявите переменную этого типа:
|
|
var
YourDllFunc: TYourDLLFunc; |
- Получаем дескриптор DLL:
|
|
DLLHandle := LoadLibrary('YourDLL.DLL'); |
- Получаем адрес функции:
|
|
@YourDLLFunc := GetProcAddress(DLLHandle, 'YourDLLFuncName'); |
- Для использования функции теперь используйте переменную YourDLLFunc,
например:
|
|
Parm3 := YourDLLFunc(Parm1,
Parm2); | |