[firebase-br] importacao lenta

[Daniel / Tecnobyte]

Como sempre existe um "meio termo" que costuma satisfazer melhor que 
qualquer dos extremos. Geralmente quando tenho loops demorados eu faço algo 
assim:

var
  Contador: Integer;
begin
  Contador := 0;
  while ... do
  begin
    ...
    Inc(Contador);
    if Contador mod 100 = 0 then { A cada 100 iterações }
    begin
       AtualizarProgresso; { É sempre bom mostrar o que está acontecendo! }
       PermiteCancelarEtc; { Afinal o usuário pode querer interromper! }
       Application.ProcessMessages; { Processa mensagens do Windows }
       Sleep(0); { Alívio para outras aplicações! }
    end;
  end;
end;

NOTA!

Troque 100 pelo valor que for mais conveniente, dependendo do caso.

Atenciosamente.

Daniel P. Guimarães
Tecnobyte Informática
www.tecnobyte.com.br

----- Original Message ----- 
From: "samuel ferreira" <samuel.peres.ferreira em gmail.com>
To: "FireBase" <lista em firebase.com.br>
Sent: Tuesday, April 22, 2008 9:24 PM
Subject: Re: [firebase-br] importacao lenta


ola

eu ja tinha postado, inclusive a parte do delphi da importacao, mas foi
bloqueado pq deu mais q 15 k o texto.


POREEEEMMMM, primeiro obrigado pela ajuda de todos e parabens pelo Firebird.
A grande SHEET era minha mesmo. Pra ficar 'bonito' eu tinha colocado uma
barra de progresso e um edit mostrando o % feito. eu tirei isso, de 20 horas
passou pra 50 minutos. ainda ficou lento, mas ja ta totalmente administrado.
eu fico ate encabulado de falar isso, mas pelo menos fica postado e de
exemplo pros proximos.

so ainda nao entendi pq fica lento no flamerobin pelo script.


obs. implantei pelo fb 2.1 e ta tudo funcionando.

samuel