关于DBGrid一个用法有关问题，多谢

关于DBGrid一个用法问题，谢谢
我有一个DBGrid，加载了一些行数据，现在我想用按钮控制选中行，比如上，下按钮，按一下上，DBGrid就从当前焦点行移动到上一行，就像用鼠标点中的效果一样，我试了一下，用ADODataSet的Move函数可以移动左边的箭头，但不能选中整行，我用鼠标点就可以选中，请提供下思路，谢谢了
[解决办法]

void __fastcall TForm1::btn1Click(TObject *Sender)
{
   DBGrid1->DataSource->DataSet->Prior();
}
//---------------------------------------

void __fastcall TForm1::btn2Click(TObject *Sender)
{
   DBGrid1->DataSource->DataSet->Next();
}