DELPHI-如何加载自己的(动画)游标

有几个步骤:

1)准备光标-这里是文件“ cursor_busy.ani ”中的动画光标

2)创建扩展名为.rc的文件,并向其写入光标路径。

CUR_ANIM 21“ c:\ delphi \ projects \ project_name \ cursors \ cursor_busy.ani”

3)将指向.rc文件的链接添加到项目:
{$ R'myResources.res''myResources.rc'}

4)为自己的游标定义内部编号:
const    crCursor_Busy = 115;

5)将定义的光标加载到应用程序:
const    Screen.Cursors [crCursor_Busy]:= LoadCursor(hInstance,'CUR_ANIM') ;

6)现在,当您使用此代码时:
Screen.Cursor:= crCursor_Busy;

..您将看到此已加载(动画)的光标:


联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678