Mostrar en Progress Bar un proceso

[[mightydragonlor]]

Es imposible saberlo, la única manera es que tu supieras que vas a modificar n registros por ejemplo, y lo haces uno a uno, sería la unica forma, lo que si se puede hacer es un thread para que lancé el sp y mientras espera que un progress bar esté en un estado marquee, este estado o estilo es como un ciclo de espera y cuando el thread haya terminado pues ocultas el progres bar.

[[Lepe]]

De forma directa no hay, pero indirecta... pufff, todas las que se te ocurra. Así a bote pronto yo usaría eventos. En el ciclo que hagas en el procedimiento almacenado envías un evento con números yo diría del 1 al 10 para que solo sean 10 eventos a registrar, así la ventana con el progressBar registra esos 10 eventos que irá recibiendo y actualizando la barra.

Busca info sobre el IBEvent

Saludos

[matti]

El SQL de mi IBQuery
"SELECT * FROM CALCULOCONTRATADOS(:TIPOFUNC, :FECHAINI, :FECHAFIN)
ORDER BY PERSONA"

Donde CALCULOCONTRATADOS es el procedimiento de Firebird y me retorna 10
campos y eso es lo que hace muchos calculos y quiero que me muestre en una barra de progreso mientras dura el proceso.

Con este codigo le envio los paramtros
Query.close;
Query.Params.Items[0].AsString := Edit1.Text ;
Query.Params.Items[1].AsDate := Fecha1.Date;
Query.Params.Items[2].AsDate := Fecha2.Date ;
Query.open;

en donde tengo que meter el thread para medir el Tiempo?

Gracias a todos por las respuestas

[[mightydragonlor]]

el thread debe iniciar justo antes del query.open y finalizar justo después, pero eso solo durará durante se ejecuta el sp, si por ejemplo haces ponerlos antes del sps pues ponlo justo donde inicia y finaliza o puedes meterlo todo en un thread si quieres.