Советы по Delphi

         

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


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

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

    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);

    [001199]



    Содержание раздела