Fórum Alguém pode ajudar com esse código ? #374220

Gostaria de ajuda para resolver a seguinte situação no código abaixo. Ao executar o ApplyUpdates aparece a seguinte mensagem.
Must apply updates before refreshing data.

Ou seja, mandando dar o ApplyUpdates antes do refresh, mas já está assim e continua dando este erro.

Alguma sugestão ?

Obrigado a todos os amigos Delphianos.

DstitAceitos.DataSet.Refresh;
DstitAceitos.DataSet.First;
If Ufuncoes.pergunta(Ufuncoes.Wusuario,´Deseja realmente excluir os títulos desta data e banco ?´) Then
Begin
While not Dm.CdTitulosAceitos.Eof do
Begin
If Copy(DstitAceitos.DataSet.FieldByName(´ccLINHAREGISTRO´).Value,2,3) = Dm.CdApresentantesWCODIGO_BANCOCENTRAL.Value Then
Begin
Try
Dm.CdTitulosAceitos.Delete;
Dm.CdTitulosAceitos.ApplyUpdates(-1);
Except on e:Exception do
Begin
Ufuncoes.Aviso(Ufuncoes.Wusuario,´Erro ao excluir registro !´+E.Message);
End;
End;
End;
Dm.CdTitulosAceitos.Next;
End;
End;
Dm.CdTitulosAceitos.Refresh;