Cambio del cursor en una sql

[lbidi]

Hola, amigos.
Tengo una query la cual muestro el resultado en un grid.
Me interesa que en el momento q hace el query, q dura unos 10 secs, cambie el puntero del mouse al conocido "rejoj" y luego cuando aparezcan los datos en el grid vuelva al default. He probado lo siguiente pero no funciona.

Screen.Cursor := crHourGlass;
Application.Processmessages;
Query.Sql.Add('.....');
Query.Open;
Screen.Cursor := crDefault;

Gracias x vuestra invalorable ayuda.
Leo.