claro, pero el TQuery internamente tendrá algo como:
Código Delphi
[-]
Procedure TQuery.Open;
Begin
Screen.cursor := crSQLGlass;
try
AbrirElQuery;
finally
Screen.cursor := crDefault;
end;
end;
Por lo que establecerlo fuera de él, de todas formas, no conseguirá el efecto deseado.
Hasta luego.
