erro com dll bemafi32.ini

[pena]

boa noite pessoal, sou novato aqui, mas estou tentando usar a dll da bematech, onde estou errando?


If File("bemafi32.dll")
hDll:=DllLoad("bemafi32.dll")
Else
Alert("Falha carregando bemafi32.dll")
return
EndIf

retorno:= dllcall(hDll,32,"Bematech_FI_AbreCupom","")

aqui da o seguinte erro
0x10000000 0x000C7000 C:\TESTE\BEMAFI32.DLL

Called From DLLCALL(0)
Called From Main(23) in C:\TESTE\Teste.prg

[Pablo César]

Não tenho certeza, mas já experimentou usar assim ?

DllCall("Bemafi32.dll",32,"Bematech_FI_AbreCupom","")

Eu nunca mexi coim isto, mas procurando no fórum você acha.

[lucimauro]

voce esta com a bemafi32.dll dentro da pasta de trabalho no na pasta windows, e voce esta com a ultima versao da bemafi32.dll e bemafi32.ini

Qual versao do harbour?

Eu uso aqui e funciona na boa!

[pena]

harbour 2.0

bemafi32 5.10.6.5 e estao dentro da pasta do sistema tanto a dll como o ini

[pena]

Ja fiz assim tb Pablo, eu ja utilizo a bematech com a minigui, mas ae é totalmente diferente, tentei usar mas nem compila

[lucimauro]

Qual o retorno do DLLLOAD?

[pena]

bei que locuragem rsrsrs
olha só

If File("bemafi32.dll")
hDll:=DllLoad("bemafi32.dll")
alert(str(hDll,9))
Else
Alert("Falha carregando bemafi32.dll")
return
EndIf
*
retorna 268435456

[lucimauro]

Sua porta é COM1 esta usando notbook ou desktop,?

[pena]

Notebook, tem mais um detalhe, eu estou usando o emulador da bematech, só que com a minigui eu uso normalmente, outra coisa pq da erro quando tento usar o codigo que uso na minigui, exemplo:

DECLARE DLL_TYPE_INT Bematech_FI_AbreCupom(DLL_TYPE_LPCSTR bemadocumento) IN BEMAFI32.DLL

[lucimauro]

Entao no seu notbook tem configurado uma porta COM1, porque no meu caso so consigo me comunicar com o emulador se eu colocar um cabo adaptador de usb para com1, ai no gerenciador de dispositivos aparece a porta COM[x] ai o emulador funciona.


Execute esse comando para ver qual retorno
ecf_ligada:=DllCall( nLib32, 32, "Bematech_FI_VerificaImpressoraLigada")

[pena]

bah nao retorna nada e da o erro direto, mas olha só, eu não tenho porta com no note, eu uso um emulador de porta virtual, funciona certinho, e voltando a dizer que na minigui eu uso sem problemas

[Imatech]

Inclua a rotina abaixo e seja feliz

DLLBEMAC.C

[pena]

Santa ignorancia rsrsrs, mas não tenho nem idéia de como usar isso, vou procurar um help, vlw

[pena]

Bah, na boa, nao descobri como faz isso não, eu to usando a ide do roberto lopez com harbour 2.0, e eu simplesmento acrescento os prgs que eu possuo la nos modulos, e compilo la pela ide, como faço para acrescentar este .c ?

[Pablo César]

eu to usando a ide do roberto lopez com harbour 2.0, e eu simplesmento acrescento os prgs que eu possuo la nos modulos, e compilo la pela ide, como faço para acrescentar este .c ?

Calma tchê ! Não se apavore... rsrs

Lembre: para implementar código em C em Harbour, você precisa apenas colar o código fonte em C no seu prg entre estes comandos:

Código: Selecionar todos

#pragma BEGINDUMP

// Inserir código em C

#pragma ENDDUMP

Fácil, não ?

Olha eu baixei li e implementei assim como está, só deu erro por causa de: undefined reference to strcpy_s

Daí saí em procura do que se tratava isso e encontrei no WIKIPEDIA a sua substituição: http://en.wikibooks.org/wiki/C_Programm ... g.h/strcpy

Depois de ter lido ao que se referia, substitui todos os "strcpy_s" pelo "strncpy" gravei e bingo ! Eu como você utilizo muito a IDE da HMG, é uma mão na roda. Mas não sei quanto a versão sua instalada, se irá funcionar, pois o Harbour sofreu algumas mudanças. Senão der instale a ultima versão 3.0.41.

Só não sei como usar, pois não tenho equipamento para testar e nunca o fiz, como tinha te dito antes. Faltaria o amigo dar uma luz, como é acionado/desativado mediante esse código em C. Os nomes das funções em C é fácil de entender, só não sei ao certo os parâmetros, iria demandar algum tempo para entender tudo isso.

Anexei o arquivo fonte com as adaptações e o executável para sua apreciação. Espero ter ajudado !