Re: [firebase-br] Progresso em uma instrução Rolando

[Julio Cesar]

mas esse tipo de progresso so resolve qndo o select ja foi executado no 
banco e esta pronto pra ser enviado pro cliente, no FB nao tem como 
monitorar os selects ainda... ah, e fazer esse fetch ai embaixo faz a 
aplicacao virar uma carroca...



Julio Cesar
julio_gyn em yahoo.com.br
+353 (87) 2184139
+353 (091) 630317
"Nao ha saber mais ou saber menos, ha saberes diferentes" (Paulo Freire)
----- Original Message ----- 
From: "Via Soluções" <viasolucoes em hotmail.com>
To: "FireBase" <lista em firebase.com.br>
Sent: Friday, December 15, 2006 11:29 PM
Subject: RE: [firebase-br] Progresso em uma instrução Rolando



Olá Cássio...

Tente fazer desta forma amigo..


Procedure Progresso;
Var
  Contador : Integer;
Begin
  With DM.qOrigem Do
    Begin
      ProgressBar.Position := 0;
      ProgressBar.Max      := DM.qOrigem.RecordCount;
      ProgressBar.Step     := 1;
      Contador := 0;
      DM.qOrigem.First;
      Try
       Cursor := crSQLWait;
        Try
          While Not DM.qOrigem.Eof Do
            Begin
              {....}
              Contador := Contador + 1;
              ProgressBar.StepIt;
              DM.qOrigem.Next;
              lbContador.Caption := IntToStr(Contador);
              lbContador.Update;
            End;
       Except
          Application.MessageBox('Ocorreu algum Erro', 'Atenção !', 
MB_ICONINFORMATION or MB_OK );
        End;
      Finally
        Cursor := crDefault;
      End;
    End;
End;


Um abraço,
Everson





----------------------------------------
> Date: Fri, 15 Dec 2006 20:27:58 -0200
> From: pajolista em gmail.com
> To: lista em firebase.com.br
> Subject: [firebase-br] Progresso em uma instrução Rolando
>
> ola pessoal muito boa noite , estou com a seguinte duvida e conto com a
> colaboração da lista .. eu gostaria que ter uma maneira de saber o 
> progresso
> de uma instrução que esta "rolando" no banco exemplo "vou fazer um select 
> em
> uma tabela de um  banco de dados muito grande , esta operação chega a
> demorar um pouco eu gostaria de saber se tem alguma maneira comando ou
> chunchu { essa foi boa <:D}, com o qual eu possa capturar como esta o
> progresso dessa instrução demorada .. Valew Pessoal .
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para editar sua configuração na lista, use o endereço 
> http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa

_________________________________________________________________
Busque em qualquer página da Web com alta proteção. Obtenha o Windows Live 
Toolbar GRATUITO ainda hoje!
http://toolbar.live.com/
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço 
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa


		
_______________________________________________________ 
Yahoo! Mail - Sempre a melhor opção para você! 
Experimente já e veja as novidades. 
http://br.yahoo.com/mailbeta/tudonovo/