在dbgrid中如何使用随机数，随机选中某一行？？(100分)

在dbgrid中如何使用随机数，随机选中某一行？？
请各位教授，赶快给予回答。万分感激。[]

Randomize;
i:=Random(DataSource1.DataSet.RecordCount-1);
DataSource1.DataSet.DisableControls;
DataSource1.DataSet.First;
DataSource1.DataSet.Moveby(i);
DataSource1.DataSet.EnableControls;