Erro: dllcall Parameter error! xBase

[jelias]

Olá amigos! Desejo e espero encontra-los bem!

Estou fazendo os primeiros testes com a ACBrBoleto32.dll. Sou programador xHarbour (xBase) e a partir dos exemplos para Harbour fiz o seguinte código abaixo:

// Teste ACBrLIB
buffer:=spac(256)
bufferlen:=256
nLoad=DLLLOAD("ACBrBoleto32.dll")
? nLoad
if EMPTY(nLoad)
   ? "Erro ao carregar lib"
   inkey(0)
end
nResult:=DLLCALL(nLoad, DLL_OSAPI, "Boleto_Inicializar", "", "")
? nResult
inkey(0)
nResult:=DLLCALL(nLoad, DLL_OSAPI, "Boleto_UltimoRetorno", @buffer, @bufferLen)
? nResult
? buffer
? bufferlen
inkey(0)

 

Ao executar retorna a seguinte mensagem de erro: 

Dllcall parameter error!

Unknown Parameter Type!

O erro ocorre durante a execução desta linha de código: 

nResult:=DLLCALL(nLoad, DLL_OSAPI, "Boleto_UltimoRetorno", @buffer, @bufferLen)

Desde já agradeço a todos!

 

Saudações,

 

Júlio

 

[Juliomar Marchetti]

não funcionou o exemplo em harbor?

https://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/Harbour/Boleto/

[lucimauro]

Ola,

Esta usando StdCall ou Cdecl?

aqui usando Harbour uso Cdecl 32 bits

[jelias]

Aqui estou usando Cdecl 32bits também.

 

[Juliomar Marchetti]

4 horas atrás, jelias disse:

Aqui estou usando Cdecl 32bits também.

 

não funcionou o exemplo? qual o erro?

[lucimauro]

Ola,

Experiente trocar 

nLoad=DLLLOAD("ACBrBoleto32.dll")

por

 

hb_libLoad('ACBrBoleto32.dll')

 

[jelias]

Resolvido a mensagem de erro com a sua sugestão Lucimauro. 

nLoad=hb_libLoad("ACBrBoleto32.dll")

Entretanto, ao enviar o comando abaixo:

nResult:=DLLCALL(nLoad, DLL_OSAPI, "Boleto_Versao", @buffer, @bufferLen)

? nResult

? buffer

? bufferlen

Está retornando da seguinte maneira, ou seja, não retornou a versão.

NILL para variáveil nResult

Espaço em branco para variável buffer

256 para variável bufferlen

Saudações,

Júlio.