StringGrid

// для закрашивания отдельной ячейки в StringGrid напишите

// следующий обработчик события OnDrawCell StringGrid

// (Form1 - форма, на которой размещен StringGrid1,

// StringGrid1 - экземпляр TStringGrid, ячейка которого

// закрашивается):
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,

int ARow, TRect &Rect, TGridDrawState State)

{

if (ACol == 2 && ARow == 2) // определяем конкретную ячейку

{

StringGrid1->Canvas->Brush->Color = clRed;

StringGrid1->Canvas->FillRect(Rect);

}

}

// Для очистки содержимого ячеек в StringGrid (TStringGrid)

// напишите следующий обработчик (StringGrid1 - сетка,

// в которой очищаем ячейки, Button1 - кнопка на форме):
void __fastcall TForm1::Button1Click(TObject *Sender)

{

for(int i = 0; i < StringGrid1->ColCount; i++)

for(int j = 0; j < StringGrid1->RowCount; j++)

StringGrid1->Cells[i][j] = "";

}

// Для очистки содержимого ячеек в StringGrid (TStringGrid)

// напишите следующий обработчик (StringGrid1 - сетка,

// в которой очищаем ячейки, Button1 - кнопка на форме):
void __fastcall TForm1::Button1Click(TObject *Sender)

{

for(int i = 0; i < StringGrid1->RowCount; i++)

StringGrid1->Rows[i]->Clear();

}