如何让执行SQL语句时的光标消失？

Question

试试在执行SQL时写如下的语句：
Screen.Cursor:=crNone;
然后在执行完SQL后写：
Screen.Cursor:=crDefault;

Answer 1

对了，还是peihexian答对了。就是这样的。

Answer 2

各位，我在连接数据库时没使用TSESSION控件，只使用了DATABASE控件。不过在DATABASE控件中有一个属性是SESSION，我用了上述方法，不行。不知是使用方法不对还是怎么回事（我在DATABASE控件连接前后及执行SQL语句前后都用了此语句），请各位指教

Answer 3

TQuery有一个属性DBSession,使用它就可以了。
每一个TDBDataSet都具有这个属性，如果没有使用TSession，他会帮你自动建立的。
query1.DBSession.SQLHourGlass:=False;