problema no Eof

Question

pessoal o la�o abaixo deve fazer o seguinte procedimento: Enquanto existir Clientes apague todos os seus telefones e depois o cliente.O la�o est� funcionando s� que qndo chega na linha do eof ele sai ...

Ltres · Answer

Cara .. se naum me engano naum precisa de next ali.. qdo tu da .delete ele ja pula pro proximo.. tenta fazer sem pra ver se funciona...

Rjun · Answer

Voc� n�o precisar dar o Next. Mas se � para apagar todos os registros faz um SQL....

Daniel_mc · Answer

� o seguinte meu camarada creio eu que o c�digo correto seria o seguinte:

while not dm.tableClientes.Eof do// antes da tabela cliente chegar ao final ele sai do la�o 
begin 
while not dm.tTelCli.Eof do 
begin 
dm.tPastMus.First;
dm.tPastMus.Delete; 
end; 
dm.tClientes.First; 
dm.tClientes.Delete; 
end;

Nilza · Answer

OiAcho que assim funciona:[code:1:8fa35ccba6]dm.tClientes.First; dm.tPastMus.First;while not (dm.tableClientes.Eof) do// antes da tabela cliente chegar ao final ele sai do la�o begin while not (dm.tTelCli.Eof) do begin dm.tPastMus.Delete; dm.tPastMus.next;end; dm.tClientes.Delete; dm.tClientes.next;end; [/code:1:8fa35ccba6]Caso n�o funcione, somente exclua o NEXT e teste novamente.[]�s...

Gandalf.nho · Answer

Se a id�ia � excluir todos os telefones e clientes, use DELETE FROM tabelaprimeiro nos telefones e depois nos clientes. Bem mais r�pido e pr�tico....

F�rum problema no Eof #280733