Как перенести вот эти вот значения из таблицы в первый столбик таблицы,но так чтобы значения были по пять штук?
| Код | with strngrd1 do begin rowcount:=101; colcount:=6; for i:=1 to 100 do for j:=1 to 100 do cells [i,j]:=floattostrf(ss[i,j],fffixed,5,4); strngrd1.rowcount := strngrd1.rowcount + 1; for i := 1 to strngrd1.colcount - 1 Do strngrd1.cells[i, strngrd1.rowcount - 1] := floatToStr(0); strngrd1.MoveRow(strngrd1.rowcount - 1, 1); for i := 1 to strngrd1.rowcount - 1 Do strngrd1.cells[0, i] := IntToStr(i); end; end;
|
по разному пробовал,не помогает |