Componente Stringgrild

[JLMN22]

Buenas tardes, en un manual que me descargue de delphi, me pone ue haga un ejercicio con el coponente srtinggrild. Lo copio para que lo entendais:

2.- Construir un concentrado que contenga los ingresos por ventas mensuales de los 3 primeros meses del año de 4 sucursales de una cadena refaccionaría, agregar listas de ingresos totales por mes e ingresos promedios por sucursal.

Tengo el sigiente codigo:

Código Delphi [-]
procedure TForm1.CalcularClick(Sender: TObject);
var
totsuc: array [1..4] of real;
promsuc: array [1..4] of real;
totmes: array [1..3] of real;
prommes: array [1..3] of real;
columnas:integer;
renglones:integer;

begin


for renglones:=0 to 3 do begin
for columnas:=0 to 2 do begin
  totsuc[renglones]:=totsuc[renglones]+strtofloat(stringgrid1.Cells[renglones,columnas]);

end;
end;
for renglones:=0 to 3 do begin
promsuc[renglones]:=totsuc[renglones]/3;
end;


for renglones:=0 to 3 do begin
for columnas:=0 to 2 do begin
totmes[columnas]:=totmes[columnas]+strtofloat(stringgrid1.Cells[renglones,columnas]);
end;

end;
for columnas:=0 to 2 do begin

prommes[columnas]:=totmes[columnas]/4;
end;

for renglones := 0 to 3 do begin
listbox1.Items.Add(floattostr(totsuc[renglones]));
listbox1.Items.Add(floattostr(promsuc[renglones]));
end;
for columnas := 0 to 2 do begin
listbox3.Items.Add(floattostr(totmes[columnas]));
listbox4.Items.Add(floattostr(prommes[columnas]))


end;

end;

end.

Al ejecutarlo me va todo bien pero cuando le doy al boton calcular me da el siguente error:

raised excemtio class econverterror with message is not vaid floating point value.

He mirado y no he encontrado el fallo, aunque seguro que sera una tonteria como siempre me suele pasar.

Un saludo y gracias de antemano