|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2004/3/9 16:57:29 |
标题: |
|
加入我的收藏 |
楼主: |
怎样控制鼠标在某个区域内隐藏,出了这个区域显示, ShowCursor(False); ShowCursor(True);
----------------------------------------------
我真的不会! |
作者: |
zizii (高高高级馒头) |
★☆☆☆☆ |
-
|
神秘会员 |
|
2004/3/9 17:21:23 |
1楼: |
GetCursorPos()好像有这个函数,你自己判断鼠标位置然后设置就行了。
----------------------------------------------
维护世界和平,共创美好盒子。
|
作者: |
|
2004/3/9 17:36:44 |
2楼: |
zizii大哥我就是不会叛断断鼠标位置是否在指定的区域 比如当鼠标移动到form1时隐藏鼠标,怎样写代码?
----------------------------------------------
我真的不会!
|
作者: |
|
2004/3/9 17:50:56 |
3楼: |
如果是窗体直接在窗体的OnMouseMove事件里面写如下代码即可: procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin ShowCursor(False); end;
----------------------------------------------
<<努力自信爱心>>菜鸟中的菜鸟
|
作者: |
|
2004/3/9 23:31:51 |
4楼: |
mousemove 里的x,y 就是鼠标的坐标,用if 什么的判断一下在加showcursor就可以了吧!
----------------------------------------------
X
|
|