Hola:
Hay algunos StringGrids que permiten sumar datos de columnas en forma más simple. Yo utilizo TMS String Grid (
www.tmssoftware.com). Este grid tiene un metodo ColumnSum que te puede servir.
Ejemplo:
nSuma := NombreGrid.CullumnSum(Columna;DesdeFila;HastaFila);
Saludos!