Fórum problema ao retornar o numero de registro em uma tabela com o delphi #558972

Bom dia, estou realizando a importação dos dados da tabela antiga para uma nova, preciso mostrar o número de registros de cada tabela e para isso eu implementei o seguinte código

LbGrupos.Caption:= inttostr(cont)+'. Grupos Ok!, Total '+inttostr(DtMdl.FDGruposNovo.RecordCount);

Na primeira iteração quando o banco está sendo migrado o código em questão realiza a contagem e me retorna o número correto, o problema ocorre na segunda iteração quando o banco já está migrado e o código me retorna apenas os 50 isso para todas as tabelas com mais de 50 registros (eu tenho batelas com mais de 500 mil registros), já nas tabelas com menos de 50 registro como é o caso de USUÁRIOS ele me retorna o valor correto.

segue o código de migração, é igual para todas as tabelas

try
lblStatus.Caption := 'Iniciando processo de sincronia... Aguarde....' ;
Application.ProcessMessages;

Sleep(0);
lblStatus.Caption := 'Sincronizando tabela Grupos...';
Application.ProcessMessages;

DtMdl.FDGruposVelho.Active := False; //BD ANTIGO QUE ENVIARÁ OS DADOS PARA O NOVO
DtMdl.FDGruposVelho.Active := True;
DtMdl.FDGruposVelho.First;
DtMdl.FDGruposNovo.Active := False;
DtMdl.FDGruposNovo.Active := True;

status := Ler_chave_reg('Tabelas','grupos', '', verifica_ini);
if status = 'OK' then
next
else
while not DtMdl.FDGruposVelho.Eof do
begin
DtMdl.FDGruposNovo.Insert;
DtMdl.FDGruposNovoGR_NUMERO.Value := DtMdl.FDGruposVelhoCODIGO.Value;
DtMdl.FDGruposNovoGR_GRUPO.Value := DtMdl.FDGruposVelhoNOME_GRUPO.Value;
DtMdl.FDGruposNovo.Post;
Grava_Chave_Reg('tabelas','grupos', 'OK', verifica_ini);
DtMdl.FDGruposVelho.Next;
end;
DtMdl.FB_DataBaseNew.CommitRetaining;
Sleep(0);
lblStatus.Caption := 'Sincronização tabela Grupos concluída.';
Inc(cont);

>> > LbGrupos.Caption:= inttostr(cont)+'. Grupos Ok!, Total '+inttostr(DtMdl.FDGruposNovo.RecordCount);<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Application.ProcessMessages;
pbStatus.Position := pbStatus.Position + 1;
except
on E : Exception do
begin
DtMdl.FB_DataBaseNew.RollbackRetaining;
application.MessageBox(pchar('Problemas durante a migração dos dados' +#13+#13+ 'Descrição do erro: '+#13+#13+E.Message+#13+#13+'Tentativa de sincronização cancelada'), 'AVISO', mb_OK + MB_ICONERROR);
if DtMdl.FDGruposNovo.State = dsInsert then
DtMdl.FDGruposNovo.Cancel;
end;

end;