如何在程序中使用动态鼠标?

zk 2000-05-29 09:16:00
如何在程序中使用动态鼠标?
...全文
81 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
Axiong 2000-05-30
  • 打赏
  • 举报
回复
除了上面的方法外,还可用下面是我在c++ bulider中的实现方法。你可改一下就可用了

在变量声明中加入HCursor HOldCursor;
void _fastcall FormCreate(TObject* Sender)
{ HCursor HNewCursor;
HnewCursor=LoadCursorFromFile("d:\Bug.Ani");
HOldCursor=SetClassLong(Form1.Handle,GCL_HCURSOR,HNewCursor);
//储存原光标以备恢复
}
void _fastcall Button1Click(TObject* Sender)
{ HOldCursor=SetClassLong(Form1->Handle,GCL_HCURSOR,HOldCursor);
//程序关闭前恢复原光标
Close();
}
jwa 2000-05-30
  • 打赏
  • 举报
回复
用API函数,先定义一个鼠标常量.在用screen.cursors[常量名]:=LoadCursorFrom(动态
鼠标名);最后赋值,cursor:=常量名;

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧