很简单阿~你把窗口坐标+窗体坐标就是屏幕坐标拉!
可能窗体坐标要除以15
如果有问题,可以联系我
我的EMAIL:[email protected]

解决方案 »

  1.   

    ClientToScreen VB声明 
    Declare Function ClientToScreen Lib "user32" Alias "ClientToScreen" (ByVal hwnd As Long, lpPoint As POINTAPI) As Long 
    说明 
    判断窗口内以客户区坐标表示的一个点的屏幕坐标 
    返回值 
    Long,非零表示成功,零表示失败 
    参数表 
    参数 类型及说明 
    hwnd Long,判断客户区坐标时那个窗口的句柄 
    lpPoint POINTAPI,用hwnd窗口的客户区坐标表示的点,这个参数会包含屏幕坐标系统中相同的点 
      

  2.   

    为什么我用GetCursorPos获得的位置和用这个函数转换的屏幕位置相差很大?
      

  3.   

    Form的ScaleMode别忘了设成3(pixel)