Saludos.....
te sugiero que utilices el componente que viene con delphi que se llama ANIMATE. Tiene una propiedad que se llama CommonAvi y le pones FINDFOLDER, donde lo pones lo k kieres que te muestre mientras este activada.
Para ponerlo en funcionamiento haz lo siguiente en el Onclick del boton consultar.
Código Delphi
[-]
animate1.active:=true;
animate.active:=false;
automaticamente el componente se muestra y se oculta cada vez que ejecutes el onclick del boton consultar.
Espero te sirva de ayuda.
Bye