Correção ao cancelar a impressão do boleto

[Filipe Sortica]

Olá!

Estamos começando a utilizar o ACBrBoleto em nosso sistema.

Gostaria de aproveitar para parabenizar o trabalho de todos os que estão contribuindo para o ACBr.

Bom..

Estamos utilizando o TACBrBoletoFCQuick para a geração dos boletos.

As propriedades estão setadas assim:

- Filtro := fiNenhum;

- MostrarPreview := False;

- MostrarSetup := True;

Quando mandamos imprimir, ele abre as configurações para impressão.

Porém, se cancelamos a impressão, ele mesmo assim imprime o boleto.

Gostaria de sugerir uma correção.

Ao verificar se deve mostrar o preview, o código segue assim:

            if MostrarPreview then

               RLLayout.PreviewModal

            else

             begin

               if MostrarSetup then

                  RLLayout.PrinterSetup; // Aqui ele chama as configurações.


               RLLayout.Print; // Observe que independente de continuar ou cancelar, ele imprime.

             end ;

O código poderia ficar assim:

            if MostrarPreview then

               RLLayout.PreviewModal

            else

             begin

               if MostrarSetup then

                  RLLayout.PrinterSetup;

               [b]if (RLLayout.Tag = 0) then[/b]

                 RLLayout.Print;

             end ;

A propriedade Tag do RLLayout (da classe TQuickRep) é setada 0 ao clicar em OK, e é setada 1 ao clicar em cancelar.

Atualizei hoje os fontes pelo svn.

Mais uma vez parabenizo a todos pelo ACBr!

[Daniel Simoes]

Muito obrigado pela sua contribuição... vou aplicar nos fontes...

[Filipe Sortica]

Olá Daniel!

Pretendo iniciar a implementação de Remessa/Retorno do CNAB 240 para o Banrisul.

Att

Filipe Sortica

[Daniel Simoes]

Bacana... Qualquer duvida é só postar...