[Wendolyn]

var
icol, irow: integer;

begin
for irow := 1 to 10 do
for icol:= 1 to 10 do
begin
StringGrid1.Cells [icol,irow]:= IntToStr(Random(100)+1);

end;


end;

end.



Hice esto y al parecer funcionó... peeero ahora necesito que se sumen las filas y las columnas