Уж больно сложно вы катаетесь по вашему TDataSet.
Что мешает напрямую обратиться к TTable или TQuery (смотря чем выбираете данные их БД) строчками:
Код:
TTable.Next;
TTable.Prior;
вместо:
Код:
DBGrid.DataSource.DataSet.Next;
DBGrid.DataSource.DataSet.Prior;