es sencillo, veras.
Para los subtotales tienes que poner una banda de tipo
TQRBand y, mediante la propiedad
FooterBand de la banda
TQRGroup ligarla a ésta. Luego sólo tienes que poner un
TQrExp e informar su propiedad
Expression para que realice el cálculo que deseas (por ejemplo una suma que sería más o menos
sum(Dataset.Campo)) y poner la propiedad
ResetAfterPrint a false
Para el tema del total general, sólo tienes que poner otra banda de tipo
TQRBand de tipo (
BandType)
rbSummary y colocar otro
TQrExp con el mismo proceso anteriormente mencionado (pero con la propiedad
ResetAfterPrint a true, aunque realmente daría igual su valor ya que sólo se va a imprimir una vez)
Si no me he explicado bien, sólo has de decirlo
Espero te sirva