Ayuda con un StringGrid

[maky]

Ok Gracias

[*Caro*]

Hola Maky, porque quieres guardar los datos en un arreglo, no sería mejor que le permitieras llenar directamente dentro de las celdas y que se vaya sumando y mostrando en tu Label, paar permitir editar la celda del StringGrid debes colocar a True la propiedad Options->goEditing, suponiendo que quieres sumar la columna Valor, puedes hacerlo mas o menos de esta forma

Código Delphi [-]
//Nuestro procedimiento que nos suma todas las celdas de la columna 1 (Valor)
procedure TForm1.SumarCeldas;
var
 Fila, Total : Integer;
 Valor : String;
begin
 if SGNums.Col=1 then //Si estamos en nuestra columna 1
  begin
   Total := 0;
   for Fila:=0 to SGNums.RowCount-1 do
    begin
     Valor := SGNums.Cells[1,Fila];
     if Trim(Valor)='' then
      Valor := '0';
     Total := Total + StrToInt(Valor);
    end;
   Label1.Caption := IntToStr(Total);
  end;
end;
 
//Y luego llamamos en estos dos eventos del StringGrid
procedure TForm1.SGNumsSelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
 SumarCeldas;
end;
 
procedure TForm1.SGNumsExit(Sender: TObject);
begin
 SumarCeldas;
end;

Trata de explicar lo mas que puedas tu problema, para que puedas recibir mas ayuda de todos.

Saluditos

[maky]

Muchas gracias fue de gran ayuda tu respuesta ok