PC Toledo

Pessoal boa tarde, estou tentando usar a bemafi32.dll , desta maneira :

function teste2()

cVersao:= Space(9)
iRetorno:=dllcall("BEMAFI32.DLL",32,"Bematech_FI_VersaoDll","cVersao",0)
Alert(cVersao+' '+str(iretorno,2))

Na primeira execução: o alert me mostra o conteudo de cVersao vazio , já na segunda execução (em seguida , estou mandando a funcao teste2() do menu) ela dá esse erro :

|Error BASE/1078 Argument error: .AND. Arguments: ( [ 1] = Type: C Val: Bematech|
|_FI_VersaoDll [ 2] = Type: C Val: 5,4,1,0) |
| |
|Error at ...: TESTE2(1624) in Module: VENDAS.PRG |
|Called from : (b)MAIN(412) in Module: VENDAS.PRG |

Alguem poderia me dar uma luz .

Desde já agradeço
Abs
Jarbas

Esqueci de dizer , estou usando xharbour 0.99.70 .

Valeu

Opa...

Sugiro partir para comunicação direta com HBCOMM que além de ser muito mais seguro e estável, é MAIS FÁCIL!

Falou!

Stanis, vc poderia me arrumar a hbcomm ou o link para baixa-la , já procurei mas nao encontrei , vou tentar fazer a impressao direta como vc sugeriu .

Muito Obrigado

Abs
Jarbas
jsjsoft@terra.com.br