Geração de PDF do Extrato com FortesReport em aplicação ISAPI

[Allan Wolski]

Bom dia!

Ao tentar gerar o PDF do Extrato com FortesReport em uma aplicação ISAPI, recebo o erro "There is no default printer currently selected".
O erro persiste mesmo definindo uma impressora padrão no Windows.

Segue correção em anexo para análise.
Obrigado.

ACBrSATExtratoFortesFr.pas

Editado 21 Janeiro, 2019 por Allan Wolski
Faltou anexo

[Daniel Simoes]

Não compreendi a solução proposta... poderia por favor justificar ?

Pelo que li, ela poderá afetar o funcionamento de cópias, em uma exportação para PDF

[Allan Wolski]

Bom dia, @Daniel Simoes

A propriedade RLPrinter.Copies acessa diretamente a propriedade Printer.Copies da unit Printers.pas, disparando o erro mencionado em aplicações ISAPI, onde o nível de permissão é limitado.
Acredito que o número de cópias é utilizado apenas quando enviamos uma impressão direta, pois não faz sentido gerar o PDF com mais de uma cópia sendo que isso ficará a critério de quem for imprimir o mesmo.

De qualquer forma, a verificação pode ser alterada para

if NumCopias > 1 then
   RLPrinter.Copies := NumCopias;

Obrigado.

[Daniel Simoes]

Parece bem melhor... notei o mesmo caso em várias outras Units, e apliquei correções no SVN... rev:16359

[Allan Wolski]

Em 22/01/2019 at 13:48, Daniel Simoes disse:

Parece bem melhor... notei o mesmo caso em várias outras Units, e apliquei correções no SVN... rev:16359

Perfeito!

Muito obrigado @Daniel Simoes

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.