home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / dragan1r / mdtack.bas < prev    next >
Encoding:
BASIC Source File  |  1999-05-08  |  505 b   |  16 lines
  1. Attribute VB_Name = "mdTack"
  2. Option Explicit
  3.  
  4. Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
  5.  
  6. Public Const HWND_TOPMOST = -1
  7. Public Const HWND_NOTOPMOST = -2
  8. Public Const SWP_NOMOVE = &H2
  9. Public Const SWP_NOSIZE = &H1
  10.  
  11. Global Const UNIT_WIDTH = 19
  12. Global Const UNIT_HEIGHT = 18
  13. Global Const UNIT_BORDER = 3
  14.  
  15. Public Addition As Integer
  16.