DBGridEh兑现右键选中行

DBGridEh实现右键选中行
现在需要在右键点击某一行数据的时候，选中该行
该怎么写？ 右键选中数据
[解决办法]

void __fastcall TForm1::DBGridEh1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
   if( Button == mbRight)
      this->DBGridEh1->SelectedRows->CurrentRowSelected = true;
   Caption =  this->DBGridEh1->SelectedRows->Count;
}