在DELPHI 1。0下如何实现Cursor的动态改变?(20分)

Z

zzw

Unregistered / Unconfirmed
GUEST, unregistred user!
在DELPHI 1。0下如何实现Cursor的动态改变?
例如:当鼠标移动到一个Label上变为手形Cursor,移出后
又恢复为箭头Cursor
 
我没用过1.0,但2.0和3.0中是:
箭头Cursor :screen.cursor:=crArrow;
箭头Cursor :screen.cursor:=crHandPoint;
应该1.0也是这样吧。
 
将Label的Cursor设成crHandPoint,就可以实现你要的功能



 
很遗憾的是,上面的方法没有用,我用的是1.0(不好意思,俺的机器
是486,CPU是Cyrix, 32的兼容性很差,2.0以上版本不能运行.)
 
我想你可能要自己画一个手型光标,

然后从程序中用LOADICON将光标装入,

再用LABEL1.CURSOR:=你自己画的光标.
 
顶部