[已解决]Delphi鼠标指针

xieyuan0553 · 发表于 2015-5-20 13:36:14

您需要登录才可以下载或查看，没有账号？立即注册

x

如何自己创建一种鼠标指针？例如：在画图软件中，鼠标指针移动到画布上的时候，它就自动变成铅笔状。

最佳答案

小人

2015-5-20 14:47:03

只能给你一点点思路  ,delphi我不太会
在 OnMouseMove 事件中  判断鼠标的位置
如果在你要的控件内就
      载入光标 LoadCursol()
      设置光标    SetCursol()
不在则设置为默认

小人 · 发表于 2015-5-20 14:47:03

只能给你一点点思路  ,delphi我不太会
在 OnMouseMove 事件中  判断鼠标的位置
如果在你要的控件内就
      载入光标 LoadCursol()
      设置光标    SetCursol()
不在则设置为默认

账号		自动登录	找回密码
密码			立即注册