在Authorware里如何启用动画光标

6.单击“Load”按钮，将函数DestoryCursor载入Authorware应用程序（实际上，函数并未真正载入应用程序，而只是有一条链接被连接到了包含代码的文件中）。

vd;k;l www.it55.com rdfg

7.类似的，重复上述3～6步（在第5、第6步里，随着要载入的函数不同而相应有所不同），将函数LoadCursorFromFile、GetClassLong、SetClassLong分别载入应用程序中。 sflj www.it55.com kg^&fgd

8.所需的函数已经全部装载完毕，单击“Done”按钮，结束函数装载。

　　 四、保存文件为：“动画光标.a4p”或者“动画光标.a5p”。 IT资讯之家 www.it55.com

　　 五、从图标工具栏中，拖一个计算图标到流程线上，命名为“载入动画光标”。

IT资讯之家 www.it55.com

　　 六、在计算图标“载入动画光标”中，输入如下代码（直接粘贴过去也可以，其中“----”后均为相关程序的注释、说明语句）：

----下边的代码将当前的窗口句柄WindowHandle赋值给变量HWND hWnd。 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

HWND hWnd:=WindowHandle sflj www.it55.com kg^&fgd

----下边的代码指定要改变长值的字节偏移,变量int nIndex赋值-12,偏移量-12对应着窗口光标设置。 IT资讯之家 www.it55.com

int nIndex:=-12

----GetClassLong函数检索指定偏移量中的一个长值,放到给定窗口的额外窗口内存中。

----下边的代码使用GetClassLong函数得到当前窗口的光标设置,并将其赋值给变量HCURSOR hCursor。

HCURSOR hCursor:=GetClassLong( HWND hWnd, int nIndex) www.it55.com在线教程

----DestroyCursor函数用于破坏光标设置,释放光标点所用的任何存储器。 免费资源www.it55.com

----这里,要破坏当前窗口的光标设置,它已由变量HCURSOR hCursor所标识。 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

DestroyCursor( HCURSOR hCursor) www.it55.com在线教程

----变量LPCSTR lpFileName用于标识动画光标文件,您可以结合实际情况进行赋值。

免费资源www.it55.com

LPCSTR lpFileName:= FileLocation^"大自然 等待.ani"

www.it55.com在线教程

----LoadCursorFromFile函数用于从指定文件中载入光标资源。 IT资讯之家 www.it55.com

----变量LONG dwNewLong用于标识动画光标,

www.it55.com在线教程

----此处将LPCSTR lpFileName里的光标资源载入,并赋值给变量LONG dwNewLong。 www.it55.com在线教程

LONG dwNewLong:=LoadCursorFromFile( LPCSTR lpFileName) vd;k;l www.it55.com rdfg

----SetClassLong函数在指定窗口所属的窗口类的附加类内存的指定偏移量处设置一长值。

免费资源www.it55.com

----下边的代码将LONG dwNewLong标识的动画光标载入到当前的窗口中。 sflj www.it55.com kg^&fgd

SetClassLong( HWND hWnd, int nIndex, LONG dwNewLong)

45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

　　 七、直接按快捷键“Ctrl+R”，运行一下，单击右键，怎么样？酷吧？

　　 ☆　　　　　　　　　　　　　　　☆　　　　　　　　　　　　　☆ vd;k;l www.it55.com rdfg

　　 以上是在Authorware里载入动画光标的一般方法。一旦动画光标被载入，启用的方法很多，下边就简单介绍几种：

www.it55.com在线教程

　　 　一、在按钮上显示。

　　　二、在热区上显示。

　　　 三、在热对象上显示。

　　　 这三种启用的方法非常相似，只要在相应的“Properties：Response”对话框中，将“Cursor：”设置为非默认值而且是第4类“SetCursor(4)”以外的任意一种光标类型就可以了。 vd;k;l www.it55.com rdfg

免费资源www.it55.com

　　　赶快按快捷键“Ctrl+R”，运行一下，怎么样？够专业吧？

　　 最后，如果您想要在程序运行的任何时候还原默认光标，只需要在计算图标中利用如下代码，一切搞掂：

it55.com

　　　DestroyCursor( LONG dwNewLong) 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

　　　type:=0 IT资讯之家 www.it55.com

　　 　SetCursor(type) 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

　　　上述方法简便易行，而且可以反复使用，您可以把它用在自己的应用程序里，看看是否增色不少？ 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

vd;k;l www.it55.com rdfg

（编辑：IT资讯之家 www.it55.com）