home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l410 / 1.ddi / HC / CALLHELP.GB$ / CALLHELP.bin
Encoding:
Text File  |  1992-02-13  |  1.5 KB  |  42 lines
  1. '*******************************************************
  2. '*                                                     *
  3. '*                      CallHelp                       *
  4. '*                                                     *
  5. '*      A testing utility for WinHelp help files.      *
  6. '*           ⌐1991 by Microsoft Corporation            *
  7. '*                                                     *
  8. '*******************************************************
  9.  
  10. ' These constants are from CONSTANT.TXT
  11.  
  12. ' Booleans
  13. Global Const TRUE = -1
  14. Global Const FALSE = 0
  15.  
  16. ' Key Codes
  17. Global Const KEY_F1 = &H70
  18.  
  19. ' Cursor
  20. Global Const DEFAULT = 0        ' 0 - Default
  21. Global Const ICON_POINTER = 4   ' 4 - Icon
  22.  
  23.  
  24. '   Help engine declarations.
  25. '  Commands to pass WinHelp()
  26. Global Const HELP_CONTEXT = &H1     ' Display topic identified by number in Data
  27. Global Const HELP_QUIT = &H2        ' Terminate help
  28. Global Const HELP_INDEX = &H3       ' Display index
  29. Global Const HELP_HELPONHELP = &H4  ' Display help on using help
  30. Global Const HELP_SETINDEX = &H5    ' Set an alternate Index for help file with more than one index
  31. Global Const HELP_KEY = &H101       ' Display topic for keyword in Data
  32. Global Const HELP_MULTIKEY = &H201  ' Lookup keyword in alternate table and display topic
  33.  
  34. Declare Function WinHelp Lib "User" (ByVal hWnd As Integer, ByVal lpHelpFile As String, ByVal wCommand As Integer, dwData As Any) As Integer
  35.  
  36. Type MULTIKEYHELP
  37.     mkSize As Integer
  38.     mkKeylist As String * 1
  39.     szKeyphrase As String * 253
  40. End Type
  41.  
  42.