Amigos do Forum,
Alguém poderia me dar uma luz? É o seguinte o meu cliente comprou esta impressora da bematech não fiscal, USB, para emissão de recibos/comprovantes, tem a dll mp2032.dll.
Pergunto, alguém tem alguma rotina para esta impressora? Usando esta dll?
[]´s
Impressora MP-4000TH USB (bematech não fiscal)
Moderador: Moderadores
Impressora MP-4000TH USB (bematech não fiscal)
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
- alaminojunior
- Colaborador

- Mensagens: 1717
- Registrado em: 16 Dez 2005 21:26
- Localização: Ubatuba - SP
Re: Impressora MP-4000TH USB (bematech não fiscal)
Sem querer fazer chover no molhado...a programação para este tipo de impressora não é difícil.
A Bematech disponibiliza um manual com todas as funções da DLL, bem prático.
E também...acredito que você possa enviar os textos para ela atravéz da função printfileraw(), pois me parece que ela se comporta como uma "Generic Text Only".
Abraços.
A Bematech disponibiliza um manual com todas as funções da DLL, bem prático.
E também...acredito que você possa enviar os textos para ela atravéz da função printfileraw(), pois me parece que ela se comporta como uma "Generic Text Only".
Abraços.
Compilador xHarbour 1.2.3 + Embarcadero C++ 7.30
MySQL c/ SQLRDD
HwGui + GTWVG
MySQL c/ SQLRDD
HwGui + GTWVG
Re: Impressora MP-4000TH USB (bematech não fiscal)
Pessoal,
Já resolvi, e estou postando os comandos aqui para quem quiser testar e usar.
Já resolvi, e estou postando os comandos aqui para quem quiser testar e usar.
Código: Selecionar todos
FUNCTION Main
LOCAL CR_LF:=CHR(13)+CHR(10), cLinha, nHandleDLL
nHandleDLL:=LoadLibrary("MP2032.DLL")
DLLCALL(nHandleDLL,32,"IniciaPorta","USB")
FT_FUSE( "C:\TEMP\ITBI.TXT" )
DO WHILE ! FT_FEOF()
cLinha:=FT_FREADLN()+CR_LF
DLLCALL(nHandleDLL,Nil,"FormataTX",FT_FREADLN()+CHR(13)+CHR(10),2, 0, 0, 0, 0)
FT_FSKIP()
ENDDO
FT_FUSE()
DLLCALL(nHandleDLL,Nil,"AcionaGuilhotina",1)
FREELIBRARY(nHandleDLL)
RETURN
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)