Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 1774 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Consultores
Postado

Bom dia Luiz,

Por incrível que pareça essa alteração foi feita a pedido de usuários que acharam que as informações estavam muito próximas, criando assim muitas confusões.

Bom, gosto não se discute.

Se eu voltar no que era antes, você concorda que vai ter desenvolvedores e usuários que vão pedir novamente para voltar no que é hoje?

Sei que é difícil alegrar a todos, sendo assim tenho uma ideia que pode resolver o seu problema.

Hoje só temos o DABPE feito em EscPos, sendo assim é apenas uma Unit que se encontra na pasta: ...\Fontes\ACBrDFe\ACBrBPe\DABPE\EscPos com o nome de: ACBrBPeDABPeESCPOS.pas

Na pasta: ...\Pacotes\Delphi\ACBrDFe\ACBrBPe\DABPE\EscPos temos o pacote responsável pela instalação do componente no Delphi.

A minha ideia é:

Você voltar a Unit ACBrBPeDABPeESCPOS.pas para Revision 18275 (19/11/2019).

Renomeie o arquivo para ACBrBPeDABPeESCPOSx.pas

Não esqueça de também abrir esse arquivo e alterar o nome da Unit conforme abaixo:

unit ACBrBPeDABPeESCPOSx;

interface
(...)

Depois faça uma copia dos arquivos que compõe o pacote de instalação e faça a mesma alteração, tanto no nome do arquivo quanto no seu conteúdo:

ACBr_BPeDabpeESCPOSx.dpk

package ACBr_BPeDabpeESCPOSx;
(...)

contains
  ACBrBPeDABPeESCPOSx in '..\..\..\..\..\..\Fontes\ACBrDFe\ACBrBPe\DABPE\EscPos\ACBrBPeDABPeESCPOSx.pas';

Feito essas alterações atualize novamente os fontes e reinstale a suíte ACBr, por fim através do Delphi abra o pacote: ACBr_BPeDabpeESCPOSx, compile e instale.

Pronto, você agora tem no seu Delphi os dois DABPE, o atual e o antigo.

Para usar o componente do DABPE atual basta inserir o componente ACBrBPeDABPeESCPOS, caso deseja o antigo basta inserir o ACBrBPeDABPeESCPOSx.

Você pode inserir os dois e ter na sua tela de configuração uma opção para escolher qual dos dois deseja utilizar.

Desta forma o seu único trabalho quando atualizar os fontes e reinstalar a suíte ACBr, vai ser através do Delphi abrir o pacote do seu DABPE compilar e instalar.

O que você achou dessa ideia?

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

  • Administradores
Postado

Bom dia.

Antes de fazer isso tente ajustar as configurações, no teste feito pelo @Italo Jurisato Junior o relatório não ficou como na sua imagem.

Att.

  • Curtir 1
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Membros Pro
Postado
Agora, Juliana Tamizou disse:

Bom dia.

Antes de fazer isso tente ajustar as configurações, no teste feito pelo @Italo Jurisato Junior o relatório não ficou como na sua imagem.

Att.

Estava pensando nisso, o problema vou ter quando houver alterações no componente, a não ser que o acbr mantenha dois modelos atualizados, o que acredito que não irão fazer. Vou ver se consegui ajustar o modelo atual para mim.

Grato pela atençao

Agora, Italo Jurisato Junior disse:

Luiz,

Veja como ficou o DABPE atual impresso em uma impressora Epson TM-T20X.

Tem inclusive o logo.

IMG_20200206_110912.jpeg

Este ficou com bom, mas testando na Bematech MP-4200.

  • Curtir 1
  • Moderadores
  • Solution
Postado
19 horas atrás, Luiz Carlos de Lima disse:

Os usuários preferem economia de papel. 😉

Uma forma de reduzir é ajustar o espaçamento entre linhas.

ACBrBPeDABPeESCPOS1.PosPrinter.EspacoEntreLinhas := <x>;

 

  • Curtir 1
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

  • Membros Pro
Postado

Obrigado a todos pela atenção, voltei a Revision 18275 que resolveu o problema no momento.

Depois vou fazer ajustes no ACBrBPeDABPeESCPOS1.PosPrinter.EspacoEntreLinhas := <x> para adequar a minha necessidade como sugerido.

Abraços

  • Curtir 3
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...