www.18ie.com 飞涛软件实验室

发现一个关于光标 cursor的好网站

http://www.anicursor.com

据说是一些可以编辑光标图案的免费软件，我还没有尝试。
http://www.dirfile.com/freeware/cursor-editor.htm

delphi 里面，修改鼠标的光标的2个方法，都可以用

var

   hNewCursor:HCURSOR;

begin

  HNEWCURSOR:=LOADCURSORFROMFILE('hardly4.ani');

  //方法1

  SETCLASSLONG(FORM1.HANDLE,GCL_HCURSOR,HNEWCURSOR);

 //方法2

  screen.Cursors[100]:=  HNEWCURSOR;

  cursor:=100;

修改全局鼠标的方法，
SetSystemCursor(LoadCursorFromFile('g.cur'),OCR_NORMAL );
恢复的方法
SystemParametersInfo(SPI_SETCURSORS, 0, nil, 0);