Boa tarde Juliomar,
Peço desculpas pelo post em duplicidade, pois na minha primeira consulta não tinha visto o post sobre o FortesReport.
Mas analisando melhor consegui encontrar o problema.
Na procedure ImprimirDACTE(CTE: TCTe); da unit ACBrCTeDACTEFR está com o valor fixo 1, e por isso não atribui o valor informado na propriedade NumCopias.
Creio que o ideal também seria passar o valor do número de cópias para o início da procedure, assim o valor será atribuído mostrando o preview ou não.
Segue procedure corrigida e unit em anexo.
procedure TACBrCTeDACTEFR.ImprimirDACTE(CTE: TCTe);
begin
if PrepareReport(CTE) then
begin
dmDacte.frxReport.PrintOptions.Copies := NumCopias;
if MostrarPreview then
dmDacte.frxReport.ShowPreparedReport
else
begin
// dmDacte.frxReport.PrepareReport(false);
if MostrarStatus then
dmDacte.frxReport.PrintOptions.ShowDialog := True
else
dmDacte.frxReport.PrintOptions.ShowDialog := False;
dmDacte.frxReport.PrintOptions.Printer := Impressora;
dmDacte.frxReport.Print;
end;
end;
end;
Atenciosamente.
ACBrCTeDACTEFR.pas