我想自定义鼠标，怎么弄(15分)

我想自定义鼠标，不用delphi里面事的
要怎么做啊，这个，一点也不会

通过函数LoadCursor 。

帮顶！

资源文件一般为扩展名为res的文件.在VC中资源文件用得非常普遍,但Delphi在其联机帮助中对资源文件没作什么介绍,其实利用其自带的资源编译工具BRCC32.EXE(一般位于/Delphi/BIN目录下）,我们完全可以做出跟VC一样效果的文件来。
资源文件最大的好处是能将一些在必要时才调用的文件跟可执行文件一起编译,生成一个文件.这样做最大的好处就是使外部文件免遭破坏.例如在一条程序中你要临时调用一幅图片,一般作法是把图片放在某一路径下（通常是主程序所在路径）,但如果用户路径误删你的图片文件,则可能使程序找不到相应文件而出错崩溃.另外,如果你想自己的程序界面美观,想用一些自定义光标,也要用到资源文件。
资源文件的使用步骤为：
1.编写rc脚本文本
用记事本或其它文本编辑器编写一个扩展名为rc的文件。例如：

mycur cursor move.cur //加入光标
mypic Bitmap Water.BMP //加入位图
mywav WAVE happy.wav //加入声音
myAVI AVI EPOEN.AVI //加入视频
myIco ICON CJT.ICO //加入图标

格式分别为在资源文件中的名称->类型->实际文件名称，例如上面第一行定义一个名为mycur的光标，实际名称为加入光标move.cur.
2.将rc文件编译成res资源文件
将脚本文件和实际文件拷到Brcc32.EXE所在目录，执行DOS命令。格式为：Brcc32 脚本文件(回车)，例如有一名为myfirst.rc的脚本文件，则执行 Brcc32 myfirst.rc(回车)即可。如果你是懒人，也可新建一批处理文件，内容只有一行：Brcc32 mufist.rc.(因为Delphi安装后一般会在自动批处理文件中指明搜索路径的。)如果编译成功，则会生成一个结尾为res的文件，这个文件就是我们需要的资源文件。
3.在Delphi单元中加入资源文件
将生成的res资源文件拷贝到你所编程序的路径下，在单元文件{$R *DFM}后加上一句{$R mufirst.res}，则将res文件加入去，编译后资 源文件即已包含在可执行文件中了。若你有多个资源文件，也按上法依次加入。
4.在Delphi程序中调用资源文件
资源文件在Delphi中的关键字为hinstance.下面给出具体用法.
<1>光标的调用
首先在程序中定义一个值大于0的常量，因为Delphi本身用0-负16来索引默认的光标，所以我们制定的光标应从表面上1开始索引。然后在窗口的Oncreat事件中添加以下代码：
screen.cursor[35]:=Loadcursor (hinstance,''mycur'');
其中35为大于1的常量，mycur为光标在资源文件中的名字。如果希望在其他控件上使用定制光标，例如Panel控件，只需在程序的适当处加入以下代码：
Panel1.cursor:=35;

第一步、制作光标文件；
第二步、将光标文件制作为资源文件；
第三步、在Delphi中加载含有光标的资源文件就可以了。

按你写的，screen.cursor[35]:=Loadcursor (hinstance,''mycur'');
这一行就出错：
array type required

在程序中定义一个值大于0的常量..定义它，在哪里用了这个常量，
那为啥是35呢？？

因为系统寻找光标时，是按索引0~-16搜索的，所以自定义光标要大于0。就可以 。

按你写的，screen.cursor[35]:=Loadcursor (hinstance,''mycur'');
这一行就出错：
array type required

在程序中定义一个值大于0的常量..定义它，在哪里用了这个常量，

不好意思 楼主，应该是这样的 ： Screen.Cursors[35]:= Loadcursor (hinstance,''mycur'');
Cursor后面少了个s 。

资源文件定义：mycur cursor &quot;a.cur&quot;，名子cur.res
这是代码：
procedure TForm1.FormCreate(Sender: TObject);
begin
screen.cursors[35]:=Loadcursor (hinstance,'mycur');
end;
（也加了这句{$R cur.res}）

可是运行后，鼠标怎么没变呢？？


不过，我这样写，控件的鼠标就变了
panel1.Cursor:=35;

但是我想让鼠标进入窗体就变？

呵呵，，谢谢 了，我加了一句，
搞定了

多人接受答案了。