Eu já. Me parece que ao criar o arquivo que irá imprimir o relatório, o QuickRep passa novamente pelos registros. Sendo assim o somatório é duplicado. Para resolver isso, no BeforePrint do relatório, eu igualo os resultados a zero. Ex.: procedure TRelatorio.RelatorioBeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean); begin TotalLitros := 0; end;
procedure TRelatorios.BndDetaBeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); begin TotalLitros := TotalLitros + dm.qrAbastecimentos.FieldByName ('NRLITRABAS').Value; end; Espero ter ajudado --- Em [EMAIL PROTECTED], "er83pet04" <[EMAIL PROTECTED]> escreveu > > Alguém já viu isso? > > Criei um relatório utilizando o quickreport e no final coloquei uma > band do tipo sumary que possue 4 qrlabels onde passo o somatório dos > valores que quero no before print. Ao dar um preview no relatório > ele exibe tudo certinho com os valores corretos, tudo perfeito. Mas > ao imprimir na impressora, os valores que estão nesses qrLabels > estão saindo duplicados. Como pode? > Na tela está aparecendo um valor e quando mando imprimir está > imprimindo o dobro dos mesmos. > > Se alguém puder me dar um help, agradeço desde já. -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html