Добавление строк в StringGrid

@Sheeby · Регистрация: 31.01.2011

Author24 — интернет-сервис помощи студентам

Доброго времени суток!
Подскажите, пожалуйста, как добавить новую чистую строку в StringGrid при нажатии на кнопку в самое начало таблицы или как сдвинуть все имеющиеся данные на строчку вниз.

@julia77 · 01.04.2011, 22:45

хорошо

@i8085 · 02.04.2011, 00:52

Сообщение от Romantik_FM

Sheeby, попробуй так

Delphi

1 2	if stringgrid1.rowcount<=2 then else stringgrid1.rowcount:=stringgrid1.rowcount-1;

В этом коде есть подводный камень: Строка сначала удаляется (rowcount становится меньше 2), а потом опять добавляется. При этом память под строку в общем случае может быть выделена в другом месте, а при этом потеряется содержимое строки. Проверять условие надо до удаления строки.

@qis · 20.03.2013, 13:54

Как строку со значением '1' вставить всегда в первую позицию?

Delphi

1 2	StringGrid1.RowCount:= StringGrid1.RowCount+1; StringGrid1.Cells[0, StringGrid1.RowCount-1]:='1';//???

Добавлено через 31 минуту
Уже сам разобрался:

Delphi

for i:= 0 to StringGrid1.RowCount-3 do // Переносим на одну строчку меньше
for l:=0 to StringGrid1.ColCount-1 do
StringGrid1.Cells[l,StringGrid1.RowCount-1-i]:=StringGrid1.Cells[l,StringGrid1.RowCount-2-i];
for l:=0 to StringGrid1.ColCount-1 do
StringGrid1.Cells[l,1]:='1';

@julia77 85 / 69 / 12 Регистрация: 17.02.2011 Сообщений: 138
	01.04.2011, 22:45	21
	хорошо 0

@Sheeby 15 / 15 / 6 Регистрация: 31.01.2011 Сообщений: 178
		1
	Добавление строк в StringGrid 31.03.2011, 13:57. Показов 40648. Ответов 22 Метки нет (Все метки) Доброго времени суток! Подскажите, пожалуйста, как добавить новую чистую строку в StringGrid при нажатии на кнопку в самое начало таблицы или как сдвинуть все имеющиеся данные на строчку вниз. 0

	20.03.2013, 13:54