Указатель на функцию 2

Что лично я использую, чтобы вызвать какую-то функцию из DLL:

1. Объявите тип:

type TYourDLLFunc = function(Parm1: TParm1; Parm2: TParm2): TParm3;




2. Объявите переменную этого типа:

var YourDllFunc: TYourDLLFunc;




3. Получаем дескриптор DLL:

DLLHandle := LoadLibrary('YourDLL.DLL');




4. Получаем адрес функции:

@YourDLLFunc := GetProcAddress(DLLHandle, 'YourDLLFuncName');




5. Для использования функции теперь используйте переменную YourDLLFunc, например:

Parm3 := YourDLLFunc(Parm1, Parm2);