Добавление строкв СтрингГрид

← →
Quattro © (2005-10-21 15:52) [0]

Ещё раз доброго дня! Можно ли добавлять строки в Стринг Грид не в самый конец таблица а куда нить посередине??

← →
umbra © (2005-10-21 16:07) [1]

Нельзя. Можно добавлять ряды в конец и опускать вниз строки из существующих рядов, освобождая нужный

← →
umbra © (2005-10-21 16:24) [2]

procedure InsertRow(grid: TStringGrid; before: Longint);
var
i: Integer;

begin
grid.RowCount := grid.RowCount + 1;
for i := grid.RowCount - 2 downto before do
grid.Rows[i + 1] := grid.Rows[i];
for i := 0 to grid.Rows[before].Count - 1 do
grid.Rows[before][i] := "";
end;

спасибо!=)

Добавление строкв СтрингГрид Найти похожие ветки