ApplyUpdates, melhor maneira de usar...

Amigos do fórum, estou querendo trocar uma idéia com relação ao ApplyUpdates...

com a ajuda da matéria de Profiling da ClubeDelphi Edição 51, que diga-se de passagem, uma excelente matéria, reparei que em muitas rotinas de meus sistemas o principal ´gargalo´ estava em rotinas de loop para gravar dados em tabelas, eu estava dando applyupdates em cada inserção, mudando o applyupdates para o fim do loop (depois de todos os registros gravados na memória) a velocidade da rotina foi muito melhor.

Mas aí em fiquei curioso, até que ponto a rotina ser desse jeito é interessante? A integridade dos dados não ficará comprometida? Ou na verdade essa é a maneira correta de se escrever a rotina?

quem puder dar a sua opinião eu agradeceria...

Exemplo:

antes:
while not Tabela1.EOF do
begin
Tabela2.Insert;
{Atribuindo campos}
Tabela2.Post;
Tabela2.ApplyUpdates(0);
Tabela1.Next;
end;

Depois:
while not Tabela1.EOF do
begin
Tabela2.Insert;
{Atribuindo campos}
Tabela2.Post;
Tabela1.Next;
end;
Tabela2.ApplyUpdates(0);