Hola...
Pues agrega la linea al final de todo el cálculo, algo como:
Código Delphi
[-]
sgGrafica.RowCount := RowCount + 1;
sgGrafica.Cells[0, Pred(sgGrafica.RowCount)] := 'Resultado Total';
sgGrafica.Cells[1, Pred(sgGrafica.RowCount)] := ResultadoTotal
Saludos...