Выделенные ячейки StringGrid

[Basic_]

Уважаемые знающие люди! Помогите незнающему
Программа изменяет цвет ячеек StringGrid в зависимости от значения (0 - зеленый, 1 - красный). Вопрос интересует следующий: как выделить область ячеек и при помощи контекстного меню изменить значения выделенных ячеек?

Вот код:

void __fastcall SaveCells( TStringGrid* StringGrid, const AnsiString& FileName)
{
std::auto_ptr<TStrings> SaveStrings( new TStringList());
const int col_count =StringGrid->ColCount;
for (int index = 0; index < col_count; ++index)
{
SaveStrings->AddStrings(
StringGrid->Cols[index]);
}
SaveStrings->SaveToFile(FileName);
}
//----------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char x[15]="d:\ploshad1.txt";
SaveCells( StringGrid1, x );
}
//---------------------------------------------------------------------------
void __fastcall LoadCells(TStringGrid* StringGrid, const AnsiString& FileName)
{
std::auto_ptr<TStrings> LoadStrings( new TStringList());
LoadStrings->LoadFromFile(FileName);
int index = 0;
const int col_count = StringGrid->ColCount;
const int row_count = StringGrid->RowCount;
for (int col=0;col<col_count;++col)
{
for (int row=0;row<row_count;++row)
{
StringGrid->Cells[col][row] = LoadStrings->Strings[index++];
}
}
}
//----------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
char x[15]="d:\ploshad1.txt";
LoadCells( StringGrid1, x );
}
//---------------------------------------------------------------------------
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
int ARow, TRect &Rect, TGridDrawState State)
{
int i, j;
for (i=0; i<40; i++)
for (j=0; j<40; j++)
if (StringGrid1->Cells [i][j] == 1)
{
if(ACol == i && ARow == j)
{
StringGrid1->Canvas->Brush->Color = clRed;
StringGrid1->Canvas->FillRect(Rect);
}
}
else
{
if(ACol == i && ARow == j)
{
StringGrid1->Canvas->Brush->Color = clLime;
StringGrid1->Canvas->FillRect(Rect);
}
}
}
//---------------------------------------------------------------------------