para las sumas finales, deberias hacer consultas, antes o despues, como
Código Delphi
[-]
q.Active := false;
q.SQL.Text := 'select pago, sum(total) as TOTAL_CHEQ from tabla where PAGO = ''CHEQUES''';
q.Active := true;
total_cheq := q.FieldByName('TOTAL_CHEQ').Asfloat
etc...
y poner unos QRLabel en un summary band con esos valores.
saludos.