home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 February / PCWK0296.iso / sharewar / win95nt / program / msgblast / data.z / SMALLCAP.BAS < prev    next >
BASIC Source File  |  1995-07-02  |  939b  |  20 lines
  1. Attribute VB_Name = "SMALLCAP1"
  2.  
  3. Type RECT
  4.   left As Integer
  5.   top As Integer
  6.   right As Integer
  7.   bottom As Integer
  8. End Type
  9.  
  10. Global Const COLOR_ACTIVECAPTION = 2
  11. Global Const COLOR_INACTIVECAPTION = 3
  12.  
  13. Declare Function AppendMenu Lib "user32" Alias "AppendMenuA" (ByVal hMenu As Long, ByVal wFlags As Long, ByVal wIDNewItem As Long, ByVal lpNewItem As Any) As Long
  14. Declare Function GetSysColor Lib "user32" (ByVal nIndex As Long) As Long
  15. Declare Function CreatePopupMenu Lib "user32" () As Long
  16. Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
  17. Declare Function TrackPopupMenu Lib "user32" (ByVal hMenu As Long, ByVal wFlags As Long, ByVal x As Long, ByVal y As Long, ByVal nReserved As Long, ByVal hWnd As Long, lpReserved As Any) As Long
  18. Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
  19.  
  20.