home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / MNUWATCH / MWDEMO3.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-08-28  |  10.6 KB  |  285 lines
  1. frmMWDemo3
  2. Menu Watch Demo 3
  3. wwwwwwwwwwwwp
  4. wwwwwwwwwwwwp
  5. Form1
  6.     MenuWatch
  7. SKL_MenuWatch
  8. picStatusBarContainer
  9. pnHelp
  10. SSPanel
  11. MS Sans Serif
  12. pnStatus
  13. SSPanel
  14. MS Sans Serif
  15. FileMenu
  16. &File
  17. FileNewOpt
  18. FileOpenOpt
  19. &Open...
  20. FileSaveOpt
  21. &Save
  22. FileSaveAsOpt
  23. Save &As...
  24. FileSep1
  25. FilePrefSubMenu
  26. &Preferences
  27. FilePrefViewOpt
  28. &View...
  29. FilePrefDialogsOpt
  30. &Dialogs...
  31. FileSep2
  32. FileExitOpt
  33. E&xit
  34. EditMenu
  35. &Edit
  36. EditUndoOpt
  37. &Undo
  38. EditSep1
  39. EditCutOpt
  40. EditCopyOpt
  41. &Copy
  42. EditPasteOpt
  43. &Paste
  44. MenuHelp
  45. minMnuHlpIdx
  46. maxMnuHlpIdx
  47.     Form_Load
  48. HelpFile8
  49. MenuWatch_Closeg
  50. pnHelp
  51. VisibleD
  52. MenuWatch_Open
  53. MenuWatch_Selectz
  54. ItemID
  55. FileOpenOpt_Clickg
  56. NewMDIChild
  57. frmMDIChildF
  58. EditCopyOpt_ClickZ
  59. EditCutOpt_Clickl
  60. EditMenu_Click
  61. EditPasteOpt_Click
  62. EditSep1_Click#
  63. EditUndoOpt_Click
  64. FileMenu_Click
  65. FileOptPrtDeviceOpt_Click
  66. FileOptPrtPrevOpt_Click
  67. FileOptPrtSubMenu_Click&
  68. FileOptSubMenu_Click
  69. FileSep2_Click}
  70. MDIForm_Load:
  71. picStatusBarContainer_Click
  72. pnHelp_DragDrop
  73. Source
  74. Control    
  75. pnStatus_DragDrop
  76. MDIForm_LinkOpen
  77. Cancel
  78. MDIForm_LinkExecute
  79. CmdStr"
  80. MDIForm_LinkError
  81. LinkErrS
  82. MDIForm_LinkClose
  83. MDIForm_DragOver
  84. State
  85. MDIForm_DragDropi
  86. MDIForm_Deactivate
  87. MDIForm_Activate
  88. MDIForm_QueryUnloadu
  89. UnloadModeM
  90. MDIForm_Resize
  91. MDIForm_UnloadX
  92. CountMDI
  93.     MenuWatch
  94. maxFileMnuOptIdx
  95. LastCountMDI
  96. MenuR
  97. helpC
  98. status
  99. TheMax
  100. TheMin
  101. DocNm
  102. Caption
  103. frmDemoApp1
  104. ActiveForm
  105. Screen1
  106. WindowState
  107.     MenuHelp2
  108. minMnuHlpIdx2Z
  109. maxMnuHlpIdx2
  110. MDIChildMaximized
  111. Changed
  112.     MenuState
  113.     MAXIMIZED#
  114. CountMDIOnLastMnuRefresh#
  115. NumPulldowns1
  116. NumOptions
  117. NumFileOptions
  118. maxWinListMnuOptIdx
  119. maxWinListMnuOptIdx2P
  120. WinListMnu
  121. WinListMnu2
  122. WinListPulldown
  123. WinListPulldown2
  124. frmMWMDIChild=
  125. NumExtraOpts
  126. fSeparator
  127. MenuHelpText
  128.     MenuHelp1{
  129. fMenuHelpInited
  130. InitMenuHelp
  131. ExitFunction
  132. minMnuHlpIdx1c
  133. maxMnuHlpIdx1
  134. maxWinListMnuOptIdx1
  135. WinListPulldown1
  136. minMnuHelpIdx1
  137. minMnuHelpIdx2
  138. maxWinLstOptIdx1
  139. WinLstPulldown1
  140. maxWinLstOptIdx2
  141. WinLstPulldown2
  142. maxWinLstIdx1
  143. maxWinLstIdx2
  144. WindowList
  145. propertyc
  146. nWinLstMnuOpts1s
  147. nWinLstMnuOpts2
  148. nWinLstOpts1
  149. nWinLstOpts2
  150. MenuHelpIdx
  151. maxWinLstIdx
  152. nWinLstOpts
  153. WinLstPulldown
  154.     gCountMDI
  155. added
  156. store
  157. count
  158. options
  159. FileNewOpt_ClickS
  160. FilePrefDialogsOpt_Clickl
  161. FilePrefSubMenu_Click
  162. FilePrefViewOpt_Click
  163. FileSaveAsOpt_Click
  164. FileSaveOpt_Click
  165. FileSep1_Click
  166. FileExitOpt_Click
  167. FileExitOpt_Click
  168.  DESCRIPTION
  169.  Bring the App to an End
  170. FileNewOpt_Click
  171.  DESCRIPTION
  172.  Create a new instance of the MDI Child form and increment the count
  173.  of open MDI Child Windows
  174. Give the document a name---this name is simply placed in the title bar
  175. Document Name
  176. Document: 
  177. MDIForm_Load
  178.  DESCRIPTION
  179.  On Form Load, setup help file (this allows user to verify that help
  180.  still works while menu item is selected)
  181. winhelp.hlp
  182. MenuHelpText
  183.  DESCRIPTION
  184.  Given the logical ID of the menu item selected and the current 
  185.  "MenuState", return an appropriate menu help text snippet to be
  186.  displayed in the status areap
  187.  If the menu item was not recognized by the "MenuWatch" control,
  188.  then it must be one of the items added to the menu whoseo
  189.  WindowList property = True 
  190. [Separator]
  191. Switch to the window containing the selected document
  192.  If the "MenuHelp" String arrays have not been initialized, then
  193.  initialize them now
  194.  Determine what menu text snippet to use...)
  195.  If the currently-selected menu item is in a menu that appears
  196.  *after* the "WindowList" menu options created at design time (in 
  197.  this case, the "WindowList" menu is the File Menu), and new options
  198.  have been added to the File Menu, then store the count of new e
  199.  options in "NumExtraOpts"
  200.  If the currently selected item is one of the newly addedf
  201.  options, then determine if it is a separator or the name of
  202.  a document and exit this function immediately
  203. [Separator]
  204. Switch to the window containing the selected document
  205.  Based on the value assigned to "MenuHelpIdx" above, return thee
  206.  appropriate menu help snippet
  207. Switch to another application
  208. [Separator]
  209. Close
  210. [Separator]
  211. Maximize
  212. Minimize
  213. Restore
  214. Move, size, or close window
  215. File Menu
  216. File|New
  217. File|Open...
  218. File|Save
  219. File|Save As...
  220. [Separator]
  221. File|Preferences >
  222. File|Preferences|View...
  223. File|Preferences|Dialogs...
  224. [Separator]
  225. File|Exit
  226. Edit Menu
  227. Edit|Undo
  228. [Separator]
  229. Edit|Cut
  230. Edit|Copy
  231. Edit|Paste
  232. Switch to another application
  233. [Separator]
  234. Close
  235. [Separator]
  236. Maximize
  237. Minimize
  238. Restore
  239. Move, size, or close window
  240. Switch to the next document
  241. [Separator]
  242. Close
  243. [Separator]
  244. Maximize
  245. Minimize
  246. Restore
  247. Move, size, or close document
  248. File Menu
  249. File|New
  250. File|Open...
  251. File|Save
  252. File|Save As...
  253. [Separator]
  254. File|Preferences >
  255. File|Preferences|View...
  256. File|Preferences|Dialogs...
  257. [Separator]
  258. File|Exit
  259. Edit Menu
  260. Edit|Undo
  261. [Separator]
  262. Edit|Cut
  263. Edit|Copy
  264. Edit|Paste
  265. Restore document size
  266. MenuWatch_Close
  267.  DESCRIPTION
  268.  When the "Menu Watch" control informs us that the user has completed=
  269.  any interaction with the menu, revert back to normal status bar
  270. MenuWatch_Open
  271.  DESCRIPTION
  272.  When the "Menu Watch" control informs us that the user has begun=
  273.  to interact with the menu, refresh the "Menu Watch" control in case
  274.  the menu has been modified (due to addition of a document to thea
  275.  menu with the "WindowList" property set to True or because an MDI
  276.  window has been maximized or restored) and show the menu help status bar
  277. MenuWatch_Select
  278.  DESCRIPTION
  279.  When the "Menu Watch" control tells us that a menu option has been=
  280.  selected (highlighted), set the caption of the menu help status
  281.  bar to the appropriate text
  282.  Use the "MenuHelpText" function to get the appropriatea
  283.  menu help snippet (tell "MenuHelpText" that the "MenuState" isl
  284.  2 if we have a maximized MDI window, and 1 if we do not)t
  285.