Perguntas Utilizar funções da Bemafi32.dll

#Include "Protheus.Ch"
#include "fivewin.ch"

User Function CallDll()

//Local _cMyDllName := "c:\project1.dll"
Local _cMyDllName := "BemaFI32.dll"
Local _aParams    := {}

Local _DllHandle := ExecInDllOpen(_cMyDllName)
                                 
If _DllHandle < 0
   MsgAlert("Nao foi possivel abrir biblioteca " + _cMyDllName + ".")
Else                                      
     
     nRet := ExecInDLLRun2(_DllHandle,; //| Handle da Dll obtida pelo ExecInDllOpen
                          1         ,; //| Indice da função na dll
                          ""         )  //| String Contendo os parâmetros da função deverá ser separado por virgula exemplo ="100 , 'ABC', .T."
           
     ExecInDllClose(_DllHandle)
     
Endif

Return NIL