home *** CD-ROM | disk | FTP | other *** search
/ High Voltage Shareware / high1.zip / high1 / DIR2 / CLACKER.ZIP / SAMPLE.ZIP / MENUSEL.GBL < prev   
Text File  |  1993-07-10  |  754b  |  20 lines
  1. '  Menu flags
  2. Global Const MF_BYCOMMAND = &H0
  3. Global Const MF_BYPOSITION = &H400
  4.  
  5. Global Const MF_SEPARATOR = &H800
  6.  
  7. Declare Function GetMenu Lib "User" (ByVal hWnd As Integer) As Integer
  8. Declare Function GetSystemMenu Lib "User" (ByVal hWnd As Integer, ByVal bRevert As Integer) As Integer
  9. Declare Function GetSubMenu Lib "User" (ByVal hMenu As Integer, ByVal nPos As Integer) As Integer
  10. Declare Function GetMenuItemID Lib "User" (ByVal hMenu As Integer, ByVal nPos As Integer) As Integer
  11. Declare Function GetMenuItemCount Lib "User" (ByVal hMenu As Integer) As Integer
  12.  
  13. ' type structure for the help message string and related menu item ID
  14. Type HelpTextTYPE
  15.     lMenuID  As Long
  16.     lhMenu As Long
  17.     strHelpMsg As String
  18. End Type
  19.  
  20.