| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
GustavoAlves1993 Novato

Registrado: Segunda-Feira, 10 de Junho de 2013 Mensagens: 64
|
Enviada: Ter Nov 11, 2014 8:08 am Assunto: Abrir gaveta com impressora não fiscal na porta serial |
|
|
OLÁ BOM DIA A TODOS,
ESTOU TENDO DIFICULDADES EM ABRIR UMA GAVETA EM UMA IMPRESSORA NÃO FISCAL PELA PORTA SERIAL (COM1), JÁ DEI UMA VASCULHADA NA INTERNET E NÃO CONSEGUI RESOLVER MEU PROBLEMA. SE ALGUÉM PUDER AJUDAR FICAREI IMENSAMENTE GRATO.
GAVETA: BEMATECH GD-56
IMPRESSORA: BEMATECH MP-4000 TH |
|
| Voltar ao Topo |
|
 |
Ghost_Rider Colaborador

Registrado: Segunda-Feira, 6 de Outubro de 2003 Mensagens: 4437
|
Enviada: Ter Nov 11, 2014 1:56 pm Assunto: |
|
|
Tá...no site da bematech tem o manual da citada gaveta, dizendo que a mesma é compatível com a não fiscal que você citou, que pode ser observado nesse link
http://www.bematech.com.br/equipamentos/produto/gd-56, clicando em Manuais. Se a mesma é compativel, basta conectar o cabo da gaveta ne não fiscal (cabo que parece um cabo telefonico) e pela DLL usar o metodo chamado abre-gaveta...é bem simples amigo..
Se estiver usando o acbr é mais facil ainda...
Abraço... |
|
| Voltar ao Topo |
|
 |
GustavoAlves1993 Novato

Registrado: Segunda-Feira, 10 de Junho de 2013 Mensagens: 64
|
Enviada: Ter Nov 11, 2014 2:07 pm Assunto: |
|
|
| Ghost_Rider escreveu: | Tá...no site da bematech tem o manual da citada gaveta, dizendo que a mesma é compatível com a não fiscal que você citou, que pode ser observado nesse link
http://www.bematech.com.br/equipamentos/produto/gd-56, clicando em Manuais. Se a mesma é compativel, basta conectar o cabo da gaveta ne não fiscal (cabo que parece um cabo telefonico) e pela DLL usar o metodo chamado abre-gaveta...é bem simples amigo..
Se estiver usando o acbr é mais facil ainda...
Abraço... |
Olá Ghost_Rider, então ja tinha visto esse manual, a gaveta está conectada com a minha impressora e pelo aplicativo que a Bematech disponibiliza para testes ela funciona certinho, eu estou tentando fazer pela dll MP2032 agora, porém não venho obtendo exito. Segue o codigo.
//1° - CONFIGURA MODELO DA IMPRESSORA
iRetorno := ConfiguraModeloImpressora( 5 );
case iRetorno of
1:ShowMessage('Modelo Configurado com Sucesso.');
-2:ShowMessage('Parâmetro inválido.');
end;
//2° - INICIA PORTA DA IMPRESSORA
iRetorno := IniciaPorta(pchar('COM1'));
if iRetorno <= 0 then
begin
ShowMessage('Problemas ao abrir a porta de comunicação.');
end
else
if iRetorno = 1 then
begin
ShowMessage('Porta de comunicação iniciada sem problemas.');
end;
//3° - VERIFICA STATUS DA IMPRESSORA
iRetorno := Le_Status();
case iRetorno of
0:ShowMessage('Erro de comunicação/"OFFLINE"');
5:ShowMessage('Impressora com pouco papel');
24:ShowMessage('Impressora "ONLINE"');
32:ShowMessage('Impressora sem papel');
end;
//4° - VERIFICA STATUS DA GAVETA
iRetorno := Le_Status_Gaveta();
case iRetorno of
0:ShowMessage('Erro de comunicação');
1:ShowMessage('Gaveta Aberta');
2:ShowMessage('Gaveta Fechada');
end;
//ABRI GAVETA
sComando := #27 + #118 + #140;
iRetorno := ComandoTX( sComando, Length( sComando );
case iRetorno of
0:ShowMessage('Erro na comunicação');
1:ShowMessage('Sucesso, função executada sem problemas');
end;
Ela não chega nem a iniciar a conexão com a porta de erro de comunicação. |
|
| Voltar ao Topo |
|
 |
Ghost_Rider Colaborador

Registrado: Segunda-Feira, 6 de Outubro de 2003 Mensagens: 4437
|
Enviada: Ter Nov 11, 2014 2:20 pm Assunto: |
|
|
| Da uma olhada na versão da DLL e na pasta que esta a dll..verifique se existe mais de uma versão da dll.... |
|
| Voltar ao Topo |
|
 |
GustavoAlves1993 Novato

Registrado: Segunda-Feira, 10 de Junho de 2013 Mensagens: 64
|
Enviada: Ter Nov 11, 2014 3:22 pm Assunto: |
|
|
| Ghost_Rider escreveu: | | Da uma olhada na versão da DLL e na pasta que esta a dll..verifique se existe mais de uma versão da dll.... |
Acabei de testar com todas as dll MP2032 disponíveis no site da Bematech, a unica que funciona com o aplicativo deles próprio e a versão 4.2.0.0, e no meu sistema nenhuma executo o código com sucesso, não passam da 2° Etapa. |
|
| Voltar ao Topo |
|
 |
GustavoAlves1993 Novato

Registrado: Segunda-Feira, 10 de Junho de 2013 Mensagens: 64
|
Enviada: Qua Nov 12, 2014 9:51 am Assunto: |
|
|
| Ghost_Rider escreveu: | | Da uma olhada na versão da DLL e na pasta que esta a dll..verifique se existe mais de uma versão da dll.... |
Ghost_Rider, baixei um exemplo da bematech e por ele também não abriu a gaveta, no exemplo a impressora ativa na COM1 porém quando tento abrir a gaveta ela não abri, já no aplicativo disponibilizados pela propria bematech para testes com a impressora ela funciona perfeitamente.
Eu abri o exemplo e segui os códigos, estão idênticos e no meu ela não ativa, o que pode ser? será que estou declarando as functions da dll errado, elas devem ser declaradas depois do implementation correto?
implementation
function ConfiguraModeloImpressora( ModeloImpressora: integer ): integer; stdcall; far; external 'MP2032.DLL';
function IniciaPorta( Porta: string ): integer; stdcall; far; external 'MP2032.DLL';
function Le_Status: integer; stdcall; far; external 'MP2032.DLL';
function Le_Status_Gaveta: integer; stdcall; far; external 'MP2032.DLL';
function ComandoTX( BufTrans: string; TamBufTrans: integer ): integer; stdcall; far; external 'MP2032.DLL';} |
|
| Voltar ao Topo |
|
 |
Ghost_Rider Colaborador

Registrado: Segunda-Feira, 6 de Outubro de 2003 Mensagens: 4437
|
Enviada: Qua Nov 12, 2014 12:16 pm Assunto: |
|
|
| Me passa seu e-mail por MP que vou te mandar um exe pra teste... |
|
| Voltar ao Topo |
|
 |
GustavoAlves1993 Novato

Registrado: Segunda-Feira, 10 de Junho de 2013 Mensagens: 64
|
Enviada: Qua Nov 12, 2014 1:34 pm Assunto: |
|
|
| Ghost_Rider escreveu: | | Me passa seu e-mail por MP que vou te mandar um exe pra teste... |
Mandei Ghost_Rider |
|
| Voltar ao Topo |
|
 |
rique_neves Mestre


Registrado: Sexta-Feira, 17 de Fevereiro de 2012 Mensagens: 873
|
Enviada: Sex Jan 02, 2015 3:21 pm Assunto: Re: Abrir gaveta com impressora não fiscal na porta serial |
|
|
Espero que ainda te ajude, busco os parametros no arquivo INI. Verifico o modelo da IMPRESSORA e passo o parametro.
Este trecho funciona em todas as impressoras bematech.
Caso utilize outro modelo ou queira parametrizar me avise.
Tenho para Bematech,Daruma, Epson, Diebold/Mecaf
| Código: | //ACIONANDO GAVETA BEMATECH NAO FISCAL
if GAVETA.ReadString('IMPRESSORA','GAVETA','') = 'S' THEN
begin
Result:= #027+'v'+#140; //GAVETA
end;
if GUILHOTINA.ReadString('IMPRESSORA','GUILHOTINA','') = 'S' THEN
begin
Result:= #27 + #119 + #1; // GUILHOTINA BEMATECH
end
end; |
bye _________________ Atrás de todo problema a uma oportunidade brilhantemente disfarçada!
Compartilhar Imagens .: http://s124.photobucket.com/ |
|
| Voltar ao Topo |
|
 |
|