为什么有的出现沙漏光标,有的不出现沙漏光标?(50分)

Z

zhtx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-25

• #1

我因有同一程序中两段子程序要执行大量的查询和计算,等待时间较长,故在开始时设置了
沙漏光标,代码:Screen.Cursor := crHourglass,
但奇怪的是一个子程序执行时屏幕上出现沙漏,而另一个子程序则始终是原来的箭头光标,
两个子程序均执行很多的SQL语句,不出现沙漏的子程序执行的SQL语句相对多一些.
请各位大侠帮忙看看,是什么原因,不胜感谢!

 

T

troyliu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-25

• #2

把你的代码贴多一点看。

 

Z

zhtx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-25

• #3

代码一大堆,主要是准备和运行SQL语句,还有遍历DATASET,进行编号等等,两个子程序都
有这些工作,只是不显示沙漏的子程序做的多一些罢了.

 

B

bluebridge

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-25

• #4

执行SQL语句时光标会自动变为沙漏的。

 

Z

zhtx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-25

• #5

我用的特殊,是通过ASTA来发送SQL语句,好像没有这功能.

 

S

samcrm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #6

开始时设置了Screen.Cursor := crHourglass
结束时有没有设置Screen.Cursor := crDEfault

 

B

blue_morning

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #7

Screen.Cursor := crHourglass
try
//Query
finally
Screen.Cursor := crDEfault
end;

 

Z

zhtx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-01

• #8

兄弟们,我就是这样设的啊,开始就是不行,不过中间有时也会出现沙漏,不知为什么?

 

C

chatop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-21

• #9

固计delphi和你过不去
：）

 

一

一生中最爱

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-21

• #10

Screen.Cursor := crHourglass
refresh;
try
//Query
finally
Screen.Cursor := crDEfault
end;

 

Z

zhtx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-25

• #11

多人接受答案了。