| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Добавление строкв СтрингГрид [D7, XP]
Quattro © (2005-10-21 15:52:00)Ещё раз доброго дня! Можно ли добавлять строки в Стринг Грид не в самый конец таблица а куда нить посередине??
Quattro (2005-10-21 17:18:00) [1]спасибо!=)
umbra (2005-10-21 16:24:00) [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;
umbra (2005-10-21 16:07:00) [3]Нельзя. Можно добавлять ряды в конец и опускать вниз строки из существующих рядов, освобождая нужный
| |
