home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 6 Unleashed…sional Reference Edition) / Visual_Basic_6_Unleashed_Professional_Reference_Edition_Sams_1999.iso / Source / CHAP05 / 309X0501.TXT next >
Encoding:
Text File  |  1998-05-27  |  233 b   |  10 lines
  1.  
  2. Type POINTAPI
  3.      X As Long
  4.      Y As Long
  5. End Type
  6.  
  7. Declare Function GetCursorPos& Lib "user32" (lpPoint As POINTAPI)
  8. Declare Function WindowFromPoint& Lib "user32" (ByVal lpPointX As Long, _
  9.      ByVal lpPointY As Long)
  10.