Ver Mensaje Individual
  #11  
Antiguo 26-04-2012
Avatar de PaulaGV
PaulaGV PaulaGV is offline
Miembro
NULL
 
Registrado: mar 2012
Posts: 34
Reputación: 0
PaulaGV Va por buen camino
Exclamation como sumar los elementos de una fila de un StringGrid

hola buenas noches!!!les cuento, tengo un StringGrid, la fila 0 y la columna 0 contienen títulos, así que no deben ser modificados de ninguna manera, eso ya lo tengo controlado, quiero sumar los valores de cada fila y poner el resultado en el ultimo casillero de la fila correspondiente, pero por mas que lo intente no logro que resuelva el calculo por cada fila, si no, que el código que hice realiza el calculo por columna, que estoy haciendo mal? creí conocer el funcionamiento de la sentencia for cuando están anidados pero se me armo lío bárbaro

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
filas, columnas, suma:integer;
begin
with StringGrid1 do
begin
  for filas := FixedRows to RowCount - 2 do
  begin
    suma:=0;
    for columnas := FixedCols to ColCount - 2 do
      suma:=suma+ StrToIntDef((Trim(Cells[columnas,filas])),0);
      cells[filas,colCount-1]:=Inttostr(suma)
  end;
end;
end;

desde ya, muchas gracias!!!
Responder Con Cita