Pesquisar na Comunidade

ACBrLibCHQ Visulizar Arquivo ACBrLibCHQ - Biblioteca para impressão de Cheque Faça Download pelo SVN, dos Demos de uso da ACBrLibCHQ em diversas linguagens, usando o endereço: http://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/ Manual On-Line: https://acbr.sourceforge.io/ACBrLib/ACBrLib.html Autor Daniel Simoes Enviado 24-10-2019 Categoria ACBrLib - PRO  

Olá boa tarde. Estou utilizando o ChqTeste pra comunicar com uma impressora de cheque perto 502s, porém quando chega na function TACBrCHQPerto.EnviaComando(cmd: String; SecTimeOut : Integer): String, no seguinte código: try ACK := fpDevice.Serial.RecvByte(SecTimeOut) ; except raise Exception.create(ACBrStr('PertoCheck não responde')); end ; no try o aplicativo trava e logo apos recebo a exception. Estou utlizando a porta serial. 4800 - Baud hsDTR_DSR - handshake none - parity mas tentei varias configurações na porta serial e nada funciona, o problema parece estar no retorno pois aparentemente a impressora é ativada. Se alguém puder me ajudar, agradeço desde já

Olá Tudo Bem!! Estou usando pela primeira vez o componente ACBrCHQ e seguindo o exemplo não estou conseguindo fazer imprimir o cheque em uma impressora na rede. Na configuração do AcbrCHQ no campo porta já tentei de várias maneiras configurar pra enviar a impressão pra uma impressora matricial lx-300 da epson, mas não consegui com nenhuma delas. Exemplo:\\nome do pc\nome da impressora compartilhada \\ip do pc no qual esta conectado a impressora compartilhada \\ip da impressora compartilhada\ É possível mandar uma impressão de cheque em uma impressora compartilhada na rede? Se sim como? Desde já Muito Obrigado pela Atenção e Ajuda! Obrigado!

Boa tarde, estou com problema para me comunicar com a impressora de cheques da Perto. O programa do fabricante funciona perfeitamente, porém o no ACBr não consegue se comunicar e no projeto de exemplo no site do fabricante também não consigo. Alguém faz alguma ideia do pq isso ocorre e como resolver!

Boa tarde galera do fórum, tudo bom? Estamos com um problema aqui na empresa com o componente ACBrCHQ. Estamos com uma DP-20, Bematech e estamos com um problema em que a impressora de cheque imprime a frente do cheque novamente após imprimir o verso. Peço para imprimir a frente , ela imprime e quando peço para imprimir o verso, ela imprime o verso e logo em seguida imprime a frente de novo. Alguém pode dar uma ajuda? Atc, William

Galera me da uma força pq já estou a ponto de enlouquecer de tanto tomar café!!! Estou desenvolvendo a impressão do cheque pela impressora Bematech DP 20 com o acbr e a impressora só imprime o favorecido e ao contrário. Por Exemplo: O NOME DO FAVORECIDO é impresso assim -> ODICEROVAF OD EMON e fora da linha que deveria ser impresso. abaixo segue o código do botão: procedure Tcad_cheque.BitBtn2Click(Sender: TObject); begin ACBrCHQ1.Modelo := chqBematech; ACBrCHQ1.Ativar; ACBrCHQ1.TravarCheque; ACBrCHQ1.Valor := qr_pesquisarVALOR.Value; ACBrCHQ1.Data := dm1.TB_CHEQUEVENCIMENTO.Value; ACBrCHQ1.Favorecido := qr_pesquisarREPASSADO.Value; ACBrCHQ1.Cidade := qr_pesquisarCIDADE.Value; ACBrCHQ1.ChequePronto; ACBrCHQ1.DestravarCheque; ACBrCHQ1.ImprimirCheque; end; quem poder me dar uma força de como faço isso serei muito grato!!!

Bom dia. Preciso integrar uma máquina de cheques da marca PertoCheck com o meu sistema. Utilizo o AcbrMonitor, fiz uns testes de impressão utilizando o AcbrCHQ e funcionou perfeitamente. Porém, gostaria de capturar algumas informações do cheque, como número etc. Existe alguma função no componente AcbrCHQ para fazer essa captura? Ou devo utilizar algum outro método? Abraços

Bom dia , tudo bom? Estou com dificuldade de imprimir um cheque na impressora pertochek do banco safra Problema Quando mando imprimir o cheque não obedece as posições que estou colocando Alguma ideia do que estuo fazendo errado ? Tenho que imprimir conforme nas posições abaixo: Nome do Banco...........SAFRA N° do Banco.................422 Valor Num. / Linha........42 Valor Num. / Col...........125 Valor Ext. 1 / Linha.......33 Valor Ext. 1/ Col...........32 Valor Ext. 2..................25 Lin. Benef....................17 Col. Dia........................116 Linha Ano.....................9 Col. Ano.......................153 Comprimento...............165 Mais modelos http://www.perto.com.br/varejo/pertochek/layout_cheques.htm Então estou configurando o modelo em suas posição de impressão procedure configura_cheque var ModeloModelo : TACBrCHQModelo; begin if not(ACBrCHQ1.Ativo) then ACBrCHQ1.Ativar; ACBrCHQ1.Modelo := chqPerto; ACBrCHQ1.Device.Baud := 4800; ACBrCHQ1.ModelosCheque.Clear; // modelo perto try ModeloModelo := TACBrCHQModelo.Create; ModeloModelo.Banco := '422'; ModeloModelo.LinhaValor := 042; ModeloModelo.ColunaValor := 125; ModeloModelo.LinhaExtenso1 := 033; ModeloModelo.ColunaExtenso1 := 032; ModeloModelo.LinhaExtenso2 := 025; ModeloModelo.LinhaFavorecido := 017; ModeloModelo.ColunaDia := 116; ModeloModelo.ColunaAno := 153; ACBrCHQ1.ModelosCheque.Add(ModeloModelo); finally FreeAndNil(ModeloModelo); end; end; Imprimir cheque nas posições procedure Imprimir_cheque; begin ACBrCHQ1.Banco := '422'; ACBrCHQ1.Valor := edtTOTAL.Asflot ACBrCHQ1.Data := Now; ACBrCHQ1.Favorecido := edtFavorecido.Text; ACBrCHQ1.Cidade := edtNomeCidade.text; ACBrCHQ1.ImprimirCheque; end