Ir para conteúdo
  • Cadastre-se

dev botao

Mostra o preview só que quando manda imprimir não vai !!!


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

Recommended Posts

Olha esta instalado no Quick Report 5.05 consigo ate ver o boleto e imprimi-lo direto, mas não consigo imprimir ele no preview isso só acontece com o boleto pq a AcbrNF-e esta imprimindo lindo!!!

Por favor me dê uma luz!!!

mas uma coisa andei mexendo nas propriedades do componente mas nada então voltei com foi baixado!!

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Por favor tente debugar... e se possível corrigir...

Apesar de ter ajudado no desenvolvimento da versão do Quick do ACBrBoleto... não uso ele no meu dia a dia...

Uso Lazarus e o Boleto com o LazReport ou FortesReport... Tenho apenas o Quick que vem com o Delphi 7, pode ser que seja necessário algum ajuste para essa nova versão do Quick, mas não terei ambiente necessário para realizar testes...

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

Ae pessoal, consegui resolver o meu problema, coloquei um outro quickreport, copiei a detail de um para o outro, exclui a original e bastou renomear com o mesmo nome da excluida. Para mim, com estas alterações resolveu o problema da impressão.

Deve ser alguma incompatibilidade de algo no quick!!

Valeu!!

Obs.: Alguém já desenvolveu algo para o HSBC??

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia.

Para o HSBC ainda não foi desenvolvido nada, caso queira contribuir estou a disposição para tirar suas dúvidas.

Att

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 !!

Link para o comentário
Compartilhar em outros sites

  • 4 meses depois ...

o valor do findice esta sendo incrementado para 2 na hora da impressão , como não tem pagina 2 ele não imprime

voce deve tirar ele do oncreate do quickrep e colocar ele no beforeprint ai vai da certo!!

obs

O problema todo foi só o lugar que foi setado o findice, mudando para esse local, pronto tudo certo .

qualquer coisa [email protected]

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia Nelson.

Você poderia anexar aqui, suas correções para o boleto em Quick, para que sejam disponibizadas no svn para os demais usuários?

Att.

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 !!

Link para o comentário
Compartilhar em outros sites

Você comenta ou retira a variável FINDICE que estava no OnCreate do Form e coloca no BeforePrint do QR conforme abaixo:

procedure TACBrBoletoFCQuickFr.FormCreate(Sender: TObject);

begin

// fIndice := 0;

fBoletoFC := TACBrBoletoFCQuick(Owner) ; // Link para o Pai

txtSwHouse.Caption := BoletoFC.SoftwareHouse ;

ACBrBarCode1.Width := imgBarra.Width ;

ACBrBarCode1.Height:= imgBarra.Height ;

end;

procedure TACBrBoletoFCQuickFr.LayoutBoletoBeforePrint(Sender: TCustomQuickRep;

var PrintReport: Boolean);

begin

fIndice := 0;

end;

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde.

Suas correções para o QuickReport já estão disponiveis no svn.

Att.

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 !!

Link para o comentário
Compartilhar em outros sites

  • 2 anos depois...
  • Moderadores

Várias são as possibilidades! removeu a versão que vem com o delphi?

os pacotes estão corretos? você tem o ACBr.inc descomentado a linha pra gerar o pdf quando for quick report??

  • Curtir 1
Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

Resolvi da Seguinte forma:

 

ACBRBoletoFCQuickFr

 

Inclui o componente: QRPDFFilter

 

em

 

procedure TACBrBoletoFCQuick.Imprimir;
 

Inclui a variavel para exportação

 

Var   AExportFilter : TQRPDFDocumentFilter;

 

alterei as linhas, elas estavam desativadas com //

 

        case Filtro of
          fiPDF  :
            begin
               AExportFilter := TQRPDFDocumentFilter.Create(NomeArquivo);
               try
                  RLLayout.ExportToFilter(AExportFilter);
               finally
                  AExportFilter.Free;
               end;
            end ;

Editado por Diogo Beraldi
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3677 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...