Delphi e FireBird - ProgressBar com Procedures

Question

Boa noite pessoal,    Utilizo o Delphi XE2 com o FireBird 2.5 com DataSnap atrav�s do componente TClientDataSet. Efetuo a execu��o de procedures no BD. Gostaria de saber se t�m como colocar uma barra...

Joel Rodrigues · Answer

O procedure faz apenas um select?Acho dif�cil conseguir reproduzir o andamento da opera��o, uma vez que isso fica por conta do procedure. O que eu acho que � mais adequado neste caso � exibir uma ampulheta apenas, indicando que a opera��o est� em progresso, mas sem demonstrar o andamento exato.Se algu�m souber como fazer isso, eu mesmo gostaria de saber. =)...

Abra�o Monteiro · Answer

Tamb�m acredito que obter o andamento exato da obten��o dos registros pode n�o ser poss�vel. At� o momento encontrei?

http://www.edudelphipage.com.br/dicas_texto.php?cod=000273&categoria=3&busca=

http://www.delphigeist.com/2010/10/fun-with-callbacks-and-progress-form.html

Alessandro Yamasaki · Answer

Conforme os colegas comentaram, o momento exato � dificil, pois � uma procedure. Se for o caso desta implementa��o, migre a store procedure para um respectivo evento em seu formul�rio e manipule exatamente as informa��es e as mensagens a serem exibidas....

F�rum Delphi e FireBird - ProgressBar com Procedures #449023