如何实现这样的功能，当程序运行时改变鼠标的状态，变成一个漏斗形. (100分)

Y

YinZu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #1

如何实现这样的功能，当程序运行时改变鼠标的状态，变成一个漏斗形，
比如用DELPHI编的程序界面上有一个查询按钮，当点击查询时，改变鼠标的状态，
变成一个漏斗形，当查询结束时，还原鼠标状态，也可以像window的查询一样，出
现动态的图,各位大侠如何实现这样的功能?（最好是window的查询一样，出现动态的图）

 

无

无聊啊

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #2

变成沙漏：
screen.cursor:=crhourglass;
还原:
screen.cursor:=crdefault;

 

J

jxhdy2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #3

改变：button1.Cursor :=crHourGlass;
还原：button1.cursor :=crDefault;

 

K

kk2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #4

对象名。cursor:=crHourGlass;
对象名。cursor:=crDefault;

 

L

ljy_17

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-02

• #5

同意樓上的方法…
screen.cursor:=crhourglass;
你要運行的程序……
screen.cursor:=crdefault;

 

郭

郭玉梁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-07

• #6

screen可用

 

Z

zqqxh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-07

• #7

同意楼上用screen，我经常这样用

 

N

naughtboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-07

• #8

查询时，如果不用多线程的话，鼠标自动会变成sql查询型的
当然你自己手工编程screen.cursor也可以的

 

S

shiningplus

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-08

• #9

最好
Try
finally
一下

 

Y

YinZu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #10

多人接受答案了。