Como no sabes cuanto va a demorar en cargar el contenido
Puedes poner un Ttimer cada 1 seg que incremente en 1 (hasta 100 y luego de 1 a 100) el progreso del objeto que uses.
Ese lo activarias en la linea anterior a la que activa el Tquery y pondrías visible el PrograssBar
Y en la linea siguiente (que se ejecuta tras terminar el Tquery) desactivas el Ttimer y ocultas el TprogressBar.
Espero haber ayudado
|