Controlar Tiempo de Carga en Mysql -> Zeos -> Delphi

[LuCkY_007]

Tengo 23800 registros en una tabla y cuando abro una ventana con todos ellos se me queda 'freeze' (pillao) durante unos segundos y me gustaria que en ese tiempo salga una barra de carga o algo asi. He pensado en un timer, pero tampoco me ha funcionado, es como si se quedara pillao del todo el pc (Tipicas pantallas en blanco) , la cuestion esque he visto un componente (DBProgress) para access que controla eso y queria saber si hay alguna solucion o algun componente para evitar eso. THANKS!