TTStringGrid часть1 стр.6

TStringGrid, часть I

Автор Деймон Чандлер перевод Виктор Алексеев aka prom

Примечание переводчика: рассмотрим пример-схему на удаление строки грида. Удалять будем ту строку, индекс которой введен в контрол эдит формы. Ниже приведен код, он ещё проще, чем вставка строки:

void __fastcall TForm1::FormCreate(TObject *Sender)

// Инициализация грида.

{

StringGrid1 -> Rows[1] -> CommaText =",111,111,111,111";

StringGrid1 -> Rows[2] -> CommaText =",Delete,Delete,Delete,Delete";

StringGrid1 -> Rows[3] -> CommaText =",333,333,333,333";

StringGrid1 -> Rows[4] -> CommaText =",444,444,444,444";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)

// Удалить строку.

{

int row_count = StringGrid1 -> RowCount;

for (int i = StrToInt(Index -> Text);i<row_count-1;i++)

StringGrid1 -> Rows[i] = StringGrid1 -> Rows[i + 1];

StringGrid1 -> RowCount = row_count-1;

}

Исходный грид: