удаление из stringgrid

← →
Серый © (2006-12-23 14:31) [0]

Как можно по щелчку на кнопке мыши удалить ячейку(и) из stringgrid

← →
Anatoly Podgoretsky © (2006-12-23 14:41) [1]

> Серый (23.12.2006 14:31:00) [0]

И что должно получититься в гриде при удалении ячейки - дырка?

← →
Серый © (2006-12-23 14:53) [2]

Хорошо.Тогда как копировать 1,3 и 5 строки из одного stringgrid"а в другой так, чтобы они находились друг за другом и между ними не было разрыва

← →
Anatoly Podgoretsky © (2006-12-23 14:55) [3]

> Серый (23.12.2006 14:53:02) [2]

Ну и вопросики ты задаешь, видимо никогда справку вживую не видел.
Конечно же методом присваивания.

← →
Серый © (2006-12-23 14:59) [4]

Методом присваивания между строками будут разрывы-на первой строке будет значение, а на второй пусто, на третьей опять значение.А мне это нужно избежать.

← →
Anatoly Podgoretsky © (2006-12-23 15:11) [5]

> Серый (23.12.2006 14:59:04) [4]

Зачем присваиваешь третей, присваивай второй.

← →
Anatoly Podgoretsky © (2006-12-23 15:11) [6]

> Серый (23.12.2006 14:59:04) [4]

Ознакомься в книжке, что такое индексы

Ну так я незнаю как это сделать.
for a:=1 to SG1.rowcount-1 do
if (sg1.Cells[1,a]>"4") then
begin
stringgrid1.Cells[1,a]:=sg1.Cells[1,a];
stringgrid1.Cells[0,a]:=sg1.Cells[0,a];
end;
Вот как я присваиваю.

> Серый (23.12.2006 15:15:07) [7]

Неправильно присваиваешь, требуется два индекса, один для чтения, второй для записи.

Добавь -

Var
I:Integer;
......

А теперь так попробуй -

I:=1;
For a:=1 to SG1.RowCount-1 do
IF (sg1.Cells[1,a]>"4") then
Begin
stringgrid1.Cells[1,I]:=sg1.Cells[1,a];
stringgrid1.Cells[0,I]:=sg1.Cells[0,a];

I:=I+1;

end;

удаление из stringgrid Найти похожие ветки