DbGrid Não Atualiza

Olá amigos...

Toda vez quando eu deleto um registro(ele deleta)e volta para o topo do primeiro registro.

Como faço para ele ficar no proximo registro na sequência no Grid?

este e o código !



with DMDados.ADOQryDelete do
begin

close;

Parameters.ParamByName(´cd_matricula´).Value := DMDados.ADOQryTemp.FieldByname(´CD_MATRICULA´).AsString;

Parameters.ParamByName(´cd_HORARIO_ESPECIAL´).Value := DMDados.ADOQryTemp.FieldByname(´CD_HORARIO_ESPECIAL´).AsString;

cd_HORARIO := DMDados.ADOQryTemp.FieldByname(´CD_MATRICULA´).Value;

//--------------------------------------------------------------------//
ExecSQL;

DMDados.ADOQryTemp.Close;
DMDados.ADOQryTemp.Open;

DBGrid2.SelectedIndex := cd_HORARIO;

DBGrid2.Refresh;









Desde já obrigado.