home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_2 / SIZECTRL / GLOBAL.BAS < prev    next >
Encoding:
BASIC Source File  |  1995-03-16  |  314 b   |  14 lines
  1. Type RECT
  2.   Left As Integer
  3.   Top As Integer
  4.   right As Integer
  5.   bottom As Integer
  6. End Type
  7. Declare Function IntersectRect Lib "User" (lpDestRect As RECT, lpSrc1Rect As RECT, lpSrc2Rect As RECT) As Integer
  8. Global rSiz1 As RECT
  9. Global rSiz2 As RECT
  10. Global temprect As RECT
  11. Global rIntersect As RECT
  12.  
  13.  
  14.