Componente Stringgrild

[[duilioisola]]

Si quieres más información sobre el error puedes agregarla al mensaje de la exceción

Código Delphi [-]
for renglones:=0 to 3 do 
begin
   for columnas:=0 to 2 do 
   begin
      try
         totmes[columnas] := totmes[columnas] + strtofloat(StringGrid1.Cells[renglones,columnas]);
      except
         on e:Exception do
         begin
            {Si falla te mostrara el valor del StringGrid y pondrá el valor a 0}
            if (Trim(StringGrid1.Cells[renglones,columnas]) = '') then
               ShowMessage('No puedo convertir el valor del renglon '+IntToStr(rengloses)+ 'y columna '+IntToStr(columnas)+' porque esta vacio');
            else
               ShowMessage('No puedo convertir el valor '+ StringGrid1.Cells[renglones,columnas] + ' del renglon '+IntToStr(rengloses)+ 'y columna '+IntToStr(columnas));
            totmes[columnas] := 0;
         end;
      end;
   end;
end;