Delphi - Hacer un cargando

Hola, estoy desarrollando un programa en Delphi 7 que lee una base de datos en parados.

Cuando habro las queryes le cuesta bastante pq la base de datos es muy grande.

Me gustaría saber como hacer para cargar las queryes mientras muestro algun mensaje de explicación o una imagen, o cualquier otra solución para que el usuario sepa que se estan cargando las tablas y por eso le cuesta.

Muchas gracias

podes cambiar el cursor al del relojito, o conseguirte algu cursor que sea un gif animado o algo de eso asi por lo menos muestra movimiento
y en la sentencia siguiente al open del TQuery cambias el cursos a crDefault nuevamente

Hola:

1. La opción del cursor que te han apuntado
Screen.Cursor := crHourGlass;
y al terminar
Screen.Cursor := crDefault;

2. Poner una StatusBar con el mensaje
STatusBar1.SimpleText := ' Buscando datos, espere ...';
Al acabar mesaje en blanco
STatusBar1.SimpleText := ' ';
o hacerla invisible
STatusBar1.Visible := False;

3. Un mensaje en un panel o donde quieras, pero para que se vea debes poner:
Application.ProcesMessages;

Suerte.

tambien podrias hacer que las consultas se abrieran mas rapido

http://www.marteens.com/trick26.htm