StringGridDrawItem

void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol, int ARow, TRect &Rect,
          TGridDrawState State)
{
if (this->SpinEdit1->Value)
if (this->StringGrid1->Cells[ACol][ARow].ToInt()>this->SpinEdit1->Value)
{
    this->StringGrid1->Canvas->Brush->Color = this->ColorBox1->Selected;
    this->StringGrid1->Canvas->FillRect(Rect);
    this->StringGrid1->Canvas->TextOutA(Rect.left+2,Rect.top+2,this->StringGrid1->Cells[ACol][ARow]);
}
}

StringGrid1->DefaultDrawing=0;

StringGrid1->Options >> goRangeSelect;