获取鼠标坐标软件 获取鼠标坐标小软件
摘要:如何获取鼠标点击时的坐标前面的都没问题, SetWindowText(str Format("x = %d", point x)); SetWindowText函数在MSDN中的原型为: void S...
发布日期:2020-08-29如何获取鼠标点击时的坐标
前面的都没问题, SetWindowText(str.Format("x = %d", point.x)); SetWindowText函数在MSDN中的原型为: void SetWindowText( LPCTSTR lpszString ); 它要求一个LPCTSTR 类型的字符串,你把str.Format()放到SetWindowText 函数的外部。
也就是: CString str; GetCursorPos(&point); str.Format("x = %d", point.x); GetDlgItem(IDC_MOUSEX)->SetWindowText(str); str.Format("x = %d", point.y); GetDlgItem(IDC_MOUSEX)->SetWindowText(str); 因为LPCTSTR 和CString类不用转换,可以实现很多互操作的。
我做一个在状态栏显示鼠标位置的例子,没有问题。
// 鼠标移动时,状态栏显示当前鼠标的坐标void CPointsSetView::OnMouseMove(UINT nFlags, CPoint point) {CString sMousePos;sMousePos.Format("x=%d,y=%d",point.x,point.y);GetParent()->GetDescendantWindow(AFX_IDW_STATUS_BAR)->SetWindowText(sMousePos);CView::OnMouseMove(nFlags, point);}
VB获取鼠标当前坐标已经把窗体设为总在前面,问:当鼠标在屏幕上...
Private Type POINTAPI X As Long Y As Long End Type Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long Private Sub Timer1_Timer() Dim Point As POINTAPI GetCursorPos Point Me.Caption = Point.X & "," & Point.Y End Sub
vb 获取鼠标在窗口内的屏幕坐标
这里有你需要的东西:1.新建一个MC,任意画一个图形,如果需要,你可以画一个漂亮的飞机,汽车什么的。
2.回到主场景,把当前图层改名为MC。
把MC拖入其中,在第二帧插入一个帧。
3.新建一个图层,命名为text,用文本工具创建两个动态文本,分别命名为xx和yy,用于动态显示MC的坐标。
4.新建一个图层,命名为AS,用于加AS:选种其第二帧,加入如下AS: x1=_root.a._x;y1=_root.a._y; //获得MC的初始位置坐标;if (Key.isDown(Key.LEFT)) {setProperty("a",_x,(x1-8)); } //当按下方向键“向左的箭头”时,mc的X坐标减8,左移8个单位;if (Key.isDown(Key.RIGHT)) {setProperty("a",_x,(x1+8));} //当按下方向键“向右的箭头”时,mc的X坐标加8,右移8个单位;if (Key.isDown(Key.UP)) {setProperty("a",_y,(y1-8));} //当按下方向键“向上的箭头”时,mc的Y坐标减8,上移8个单位;if (Key.isDown(Key.DOWN)) {setProperty("a",_y,(y1+8));} //当按下方向键“向下的箭头”时,mc的Y坐标加8,下移8个单位;xx=_root.a._x;yy=_root.a._y; //动态获得MC的坐标,并在动态文本xx和yy分别输出。
5.完成ctrl+enter测试影片。