Crear aviso "Espere unos minutos" durante operacion con mucha carga de CPU . AYUDA

[Cheerpipe]

Bien, intentare ser breve.

En mi aplicacion, tengo unos formularios para realizar consultas, las cuales demoran normalmente entre 10 y 15 segundos en el mejor de los casos, pero pueden llegar a demorar un 30 segundos.

La cuestion es que se me ocurrio poner una pantalla ke fuese algo asi como lo siguiente




y lo llamo con el siguiente codigo


Código Delphi [-]

with TfrmWaitForm.create do
try
show;
crearVentana(TfrmInformeCarterosTodosPendientes); //Esta llamada es la que demora..
finally
close;
free;
end;






El formulario se muestra (el de espera) pero no se actualiza, eso debe ser porque la llamada crearVentana(TfrmInformeCarterosTodosPendientes); utiliza mucha CPU y es la que demora.

He probado usando timers para redibujar el formulario de espera, he probado con hilos, y nada, no se como hacer para ke el formulario de espera se vea y dibuje a tiempo ke la consulta SQL se ejcuta.


Lo que obtengo es un cuadro plomo (donde se deberia ver el formulario de espera).

El formulario de espera tiene un jvwaitgradient que se mueve de lado, por lo que el formulario debe redibujarse lo suficientemente rapido como para notar la animacion .

Espero algun guru de delphi pueda ayudarme.

Atte. Gracias