Muito simples! Vc coloca o Post() no final do laço, quando o correto é
fazê-lo após preencher o último campo do laço! Sds.
>From: "Wroger" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: <delphi-br@yahoogrupos.com.br>
>Subject: [delphi-br] APPEND DEMORADO ??
>Date: Fri, 21 Jul 2006 13:39:32 -0300
>
>Fiz um exemplo, para acessar uma tabela do Tipo .DBF na minha unidade C:\
>utilizando um TTable.
>Estou utilizando o Seguinte Looping para dar append neste TTable:
>
>Table1.DisableControls;
>Table1.Close;
>Table1.Open;
> For i:=1 to 3000 do
> Begin
> Table1.Edit;
> Table1.Append;
> Table1.FieldByName('v1').AsFloat := i
> Table1.FieldByName('v2').AsFloat := (i * 5);
> End;
>tblCurva.Post;
>Table1.EnableControls;
>
>Na Primeira vez que rodo vai rapidinho, mas na segunda vez, percebo que o
>comando "Append" começa a demorar bem mais que o normal.
>O que pode estar havendo ??? Alguma dica ??
>
>Obrigado à todos.
>
>Roger.
>
>
>
>_______________________________________________________
>Yahoo! Acesso Grátis - Internet rápida e grátis. Instale
>o discador agora!
>http://br.acesso.yahoo.com
_________________________________________________________________
MSN Messenger: converse com os seus amigos online.
http://messenger.msn.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
