1,184
社区成员
发帖
与我相关
我的任务
分享关于自定义鼠标问题
1。我想在程序中用自定义的鼠标，请问怎样设定鼠标的热点（即鼠标的点击时响应的点的位置）？
2.有一个string类型的量，我想检查其中有没有特定的字符串，应该怎么做呢？
3.怎样设程序的热键，即我按下设定的热键时form出现？
2.有一个string类型的量，我想检查其中有没有特定的字符串，应该怎么做呢？
3.怎样设程序的热键，即我按下设定的热键时form出现？
...全文
请发表友善的回复…
发表回复
etomahawk 2003-08-02
- 打赏
- 举报
谢谢大家!
xybh97102 2003-07-31
- 打赏
- 举报
SetCursorPos(YourPoint.x,YourPoint.y);
etomahawk 2003-07-31
- 打赏
- 举报
To xiaonanw:
当然要了，如果你能给我，那就再好不过了!My email:etomahawk@hotmail.com
可能是我没有说明白,我要的是自己定义的鼠标热点，就是说我想自己让鼠标出现在一个自己想要的位置，点击后响应的点是我自己设定的!
我自己定义了一个鼠标形状，就像下图中，我想让那个黑点成为鼠标的热点！
|
-.-
|
┏━┓
┃ .┃
┗━┛
当然要了，如果你能给我，那就再好不过了!My email:etomahawk@hotmail.com
可能是我没有说明白,我要的是自己定义的鼠标热点，就是说我想自己让鼠标出现在一个自己想要的位置，点击后响应的点是我自己设定的!
我自己定义了一个鼠标形状，就像下图中，我想让那个黑点成为鼠标的热点！
|
-.-
|
┏━┓
┃ .┃
┗━┛
older 2003-07-30
- 打赏
- 举报
up
xiaonanw 2003-07-30
- 打赏
- 举报
我有个关于热键的例子，要否？
李_军 2003-07-30
- 打赏
- 举报
SetCursorPos
huojiehai 2003-07-30
- 打赏
- 举报
GetCursorPos(YourPoint);//取光标在屏幕位置
ScreenToClient//转到你的Form中坐标的位置
ScreenToClient//转到你的Form中坐标的位置
xybh97102 2003-07-30
- 打赏
- 举报
1、GetCursorPos(YourPoint);
2、if Pos(SpecialString,YourString)>0 then Exit:=True;
3、RegisterHotKey(Handle,GlobalAddAtom('MyHotKey') - $C000,Shift,Key);
2、if Pos(SpecialString,YourString)>0 then Exit:=True;
3、RegisterHotKey(Handle,GlobalAddAtom('MyHotKey') - $C000,Shift,Key);
