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