Ir para conteúdo
  • Cadastre-se

dev botao

ACBrNFeDANFeESCPOS // ACBrNFeDANFEFR1


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

Recommended Posts

Boa tarde senhores! mas uma vez venho pedir ajuda de vocês,  pois não consegui fazer imprimir corretamente pelo escpos nem pelo danfefr1..

Os dois saem desconfigurados.  já agradeço a atenção de cada um. Lembrando que uso o trunk2 

comandos do escpos :

  frmPedido.LerConfiguracao;
  if not FileExists( ArquivoXML ) then
     raise Exception.Create('Arquivo não encontrado!'+ArquivoXML);

  if frmPedido.lImpressoraBobina then
  begin
     if PrintDialog.Execute then
     begin
       Try
         ConfigurarComponente;
         ACBrNFe1.DANFE                    :=  ACBrNFeDANFeESCPOS;
         ACBrNFeDANFeESCPOS.MostrarPreview := True;
         ACBrNFeDANFeESCPOS.NumCopias      := PrintDialog.Copies;
         ACBrNFeDANFeESCPOS.Impressora     := Printer.Printers[Printer.PrinterIndex];
         if lDanfeResumido then
         begin
      //   ACBrNFeDANFeESCPOS.ImprimirDANFEResumido(Nil)
           ACBrNFe1.DANFE.ImprimirItens := false;
           ACBrNFe1.NotasFiscais[0].Imprimir;
         end
         else
           ACBrNFe1.NotasFiscais[0].Imprimir;
           //  ACBrNFeDANFeESCPOS.ImprimirDANFE(nil);
           //      if chkAbrirGaveta.Checked then
           //        ACBrNFeDANFeESCPOS.AbrirGaveta;
       finally
//           ACBrNFeDANFeESCPOS.Device.Desativar;
       end;
     end;
/////////////////////////////////////////////////////////////////////////////////////////

ACBrNFeDANFEFR1

      if DM_NFCe.cColunas = '40' then
       begin
           ACBrNFeDANFEFR1.FastFile                  := ExtractFileDir(application.ExeName) + '\Report\DANFeNFCe.fr3';
           ACBrNFeDANFEFR1.FastFileEvento            := ExtractFileDir(application.ExeName) + '\Report\EVENTOS.fr3';
           ACBrNFeDANFEFR1.TipoDANFE   := tiNFCe;
       end
       else
       begin
           ACBrNFeDANFEFR1.FastFile                  := ExtractFileDir(application.ExeName) + '\Report\DANFeNFCeA4.fr3';
           ACBrNFeDANFEFR1.FastFileEvento            := ExtractFileDir(application.ExeName) + '\Report\EVENTOS.fr3';
           ACBrNFeDANFEFR1.TipoDANFE   := tiNFCeA4;
       end;
//       ACBrNFe1.DANFE                           := ACBrNFeDANFEFR1;
//       ACBrNFe1.DANFE.imprimirItens             := False;
       ACBrNFe1.NotasFiscais.Clear;
       ACBrNFe1.NotasFiscais.LoadFromFile(ArquivoXML);
//       ACBrNFe1.DANFE.MostrarPreview := True;
//       ACBrNFe1.DANFE.NumCopias      := PrintDialog.Copies;
//       ACBrNFe1.DANFE.Impressora     := Printer.Printers[Printer.PrinterIndex];
       ACBrNFeDANFEFR1.MostrarPreview := True;
       ACBrNFeDANFEFR1.NumCopias      := PrintDialog.Copies;
       ACBrNFeDANFEFR1.Impressora     := Printer.Printers[Printer.PrinterIndex];
       if lDanfeResumido then
       begin
           {
           ACBrNFeDANFEQR1.ImprimeItens := False;
           ACBrNFeDANFEQR1.ImprimirDANFE(nil);
           }
           ACBrNFeDANFEFR1.ImprimirItens := False;
           ACBrNFeDANFEFR1.ImprimirDANFEResumido(nil);
       end
       else
       begin
           {
           ACBrNFeDANFEQR1.ImprimeItens := True;
           ACBrNFeDANFEQR1.ImprimirDANFE(nil);
           }
           ACBrNFeDANFEFR1.ImprimirItens := True;
           ACBrNFeDANFEFR1.ImprimirDANFE(nil);
       end;
     end;
   finally

   end;
 

 

obrigado.

 

 

foto_1615.png

foto_1618.jpg

Link para o comentário
Compartilhar em outros sites

  • Fundadores

O problema do EscPos parece ser o fato de você ter configurado errado o numero de colunas

Use o PosPrinterTest, imprima o "Teste de Carácteres" e veja quantas colunas essa impressora suporta

  • Curtir 1
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

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

Link para o comentário
Compartilhar em outros sites

22 horas atrás, Régys Silveira disse:

O problema do FastReport ao meu ver é que você não instalou o driver de spooler correto da impressora.

Boa tarde Régys , obrigado pela atenção. Instalei o driver como recomendou e ele imprimiu quase que correto, ficou um comendo um pouco o canto esquerdo, mas minha preocupação maior  é que está imprimindo muito lento. Estou usando a Epson  Tm- T81. para impressão. Será que pode ser alguma configuração do componente FR?

22 horas atrás, Daniel Simoes disse:

O problema do EscPos parece ser o fato de você ter configurado errado o numero de colunas

Use o PosPrinterTest, imprima o "Teste de Carácteres" e veja quantas colunas essa impressora suporta

Daniel, muito obrigado pela atenção amigo, funcionou corretamente agora.

22 horas atrás, Régys Silveira disse:

O problema do FastReport ao meu ver é que você não instalou o driver de spooler correto da impressora.

 

22 horas atrás, Daniel Simoes disse:

O problema do EscPos parece ser o fato de você ter configurado errado o numero de colunas

Use o PosPrinterTest, imprima o "Teste de Carácteres" e veja quantas colunas essa impressora suporta

 

FrQuaseShow1.jpg

Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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...