home *** CD-ROM | disk | FTP | other *** search
/ Master 95 #1 / MASTER95_1.iso / microsof / vbasic4 / vb4-3.cab / VBONLINE.AUX / startup.mac < prev   
Encoding:
Text File  |  1995-07-26  |  10.8 KB  |  275 lines
  1. #
  2. #  Menus
  3. #
  4.  
  5. #  Main Menu Bar
  6. #
  7. AppendItem(`bb_menu',`mnu_file',`&File',`')
  8. AppendItem(`bb_menu',`mnu_edit',`&Edit',`')
  9. AppendItem(`bb_menu',`mnu_view',`&View',`')
  10. AppendItem(`bb_menu',`mnu_contents',`&Contents',`')
  11. AppendItem(`bb_menu',`mnu_tools',`&Tools',`')
  12. AppendItem(`bb_menu',`mnu_help',`&Help',`')
  13.  
  14. #  File Menu
  15. #
  16. AppendItem(`mnu_file',`mnu_open',`&Open...\tCtrl+O',`Open()')
  17. AppendItem(`mnu_file',`',`',`')
  18. AppendItem(`mnu_file',`mnu_prtop',`&Print...\tCtrl+P',`Print()')
  19. AppendItem(`mnu_file',`mnu_prsetup',`Print &Setup...',`PrintSetup()')
  20. AppendItem(`mnu_file',`',`',`')
  21. AppendItem(`mnu_file',`mnu_exit',`E&xit',`Exit()')
  22.  
  23. #  Edit Menu
  24. #
  25. AppendItem(`mnu_edit',`mnu_cut',`Cu&t\tCtrl+X',`CutPaste(768)')
  26. AppendItem(`mnu_edit',`mnu_copy',`&Copy\tCtrl+C',`CopyTopic()')
  27. AppendItem(`mnu_edit',`mnu_paste',`&Paste\tCtrl+V',`CutPaste(770)')
  28. AppendItem(`mnu_edit',`mnu_selall',`&Select All\tCtrl+A',`SelectAll()')
  29. DisableItem(`mnu_cut')
  30. DisableItem(`mnu_paste')
  31.  
  32. #  View Menu
  33. #
  34. AppendItem(`mnu_view',`mnu_split2',`&Contents and Topic',`ConfigurePanes(2)')
  35. AppendItem(`mnu_view',`mnu_split1',`&Topic Only',`ConfigurePanes(1)')
  36. AppendItem(`mnu_view',`mnu_split3',`Contents &Only',`ConfigurePanes(3)')
  37. AppendItem(`mnu_view',`',`',`')
  38. AppendItem(`mnu_view',`mnu_vann',`&Annotation',`AnnotateTopic(1)')
  39. AppendItem(`mnu_view',`',`',`')
  40. AppendItem(`mnu_view',`mnu_split',`&Split',`KeyboardSplit()')
  41. AppendItem(`mnu_view',`',`',`')
  42. AppendItem(`mnu_view',`mnu_hnext',`&Next Highlight\tCtrl+D',`ScrollHighlight(1)')
  43. AppendItem(`mnu_view',`mnu_hprev',`&Prev Highlight\tCtrl+U',`ScrollHighlight(-1)')
  44.  
  45. #  Contents Menu
  46. #
  47. AppendItem(`mnu_contents',`',`',`')
  48. AppendItem(`mnu_contents',`mnu_def',`&Define Subset...',`DefineFilter()')
  49. AppendItem(`mnu_contents',`',`',`')
  50.  
  51. #  Tools Menu
  52. #
  53. AppendItem(`mnu_tools',`mnu_keyw',`&Keyword Index...\tCtrl+K',`KeywordDialog("*.kwd")')
  54. AppendItem(`mnu_tools',`',`',`')
  55. AppendItem(`mnu_tools',`mnu_prevsrch',`Find &Results...',`OpenSearchResults()')
  56. AppendItem(`mnu_tools',`mnu_back',`&History...',`ShowHistoryList()')
  57. AppendItem(`mnu_tools',`mnu_bkmk',`&Bookmarks...',`ShowBookmarkList()')
  58. AppendItem(`mnu_tools',`',`',`')
  59. AppendItem(`mnu_tools',`mnu_search',`&Find...\tCtrl+F',`Search()')
  60. AppendItem(`mnu_tools',`',`',`')
  61. AppendItem(`mnu_tools',`mnu_opt',`&Options...',`DoOptions()')
  62.  
  63. #  Help Menu
  64. #
  65. AppendItem(`mnu_help',`mnu_helpcon',`&Help Index...\tF1',`BrowserHelp("",0)')
  66. AppendItem(`mnu_help',`mnu_relnotes',`&Release Notes...',`BrowserHelp("RELNOTES.HLP",0)')
  67. AppendItem(`mnu_help',`',`',`')
  68. AppendItem(`mnu_help',`mnu_caffeine',`Dr. GUI\'s &Espresso Stand\tCtrl+E',`BrowserHelp(`WHATSNEW.HLP',-4)')
  69. AppendItem(`mnu_help',`',`',`')
  70. AppendItem(`mnu_help',`mnu_about',`&About...',`About()')
  71.  
  72. #
  73. #  Buttons
  74. #
  75.  
  76. #  Buttons for the main button bar
  77. #
  78. AppendItem(`bb_main',`btn_p3',`',`ConfigurePanes(3)')
  79. ButtonHelp(`btn_p3',`View Contents Only (Ctrl+Shift+C)')
  80. SetButtonBitmap(`btn_p3',`buttons',29,5,0)
  81. ButtonWidth(`btn_p3',0)
  82.  
  83. AppendItem(`bb_main',`btn_p2',`',`ConfigurePanes(2)')
  84. ButtonHelp(`btn_p2',`View Contents and Topic (Ctrl+Shift+S)')
  85. SetButtonBitmap(`btn_p2',`buttons',29,4,0)
  86. ButtonWidth(`btn_p2',0)
  87.  
  88. AppendItem(`bb_main',`btn_p1',`',`ConfigurePanes(1)')
  89. ButtonHelp(`btn_p1',`View Topic Only (Ctrl+Shift+T)')
  90. SetButtonBitmap(`btn_p1',`buttons',29,3,0)
  91. ButtonWidth(`btn_p1',0)
  92.  
  93. AppendItem(`bb_main',`',`',`')
  94.  
  95. AppendItem(`bb_main',`btn_magn',`',`')
  96. ButtonHelp(`btn_magn',`Zoom Text (Ctrl+Shift+Z)')
  97. SetButtonBitmap(`btn_magn',`buttons',21,19,0)
  98. ButtonWidth(`btn_magn',0)
  99.  
  100. AppendItem(`bb_main',`',`',`')
  101.  
  102. AppendItem(`bb_main',`btn_search',`',`Search()')
  103. ButtonHelp(`btn_search',`Find (Ctrl+F)')
  104. SetButtonBitmap(`btn_search',`buttons',29,1,0)
  105. ButtonWidth(`btn_search',0)
  106.  
  107. AppendItem(`bb_main',`',`',`')
  108.  
  109. AppendItem(`bb_main',`btn_keyw',`',`KeywordDialog("*.kwd")')
  110. ButtonHelp(`btn_keyw',`Keyword Index (Ctrl+K)')
  111. SetButtonBitmap(`btn_keyw',`buttons',22,22,0)
  112. ButtonWidth(`btn_keyw',0)
  113.  
  114. AppendItem(`bb_main',`',`',`')
  115.  
  116. AppendItem(`bb_main',`btn_srchres',`',`OpenSearchResults()')
  117. ButtonHelp(`btn_srchres',`Find Results (Ctrl+Shift+F)')
  118. SetButtonBitmap(`btn_srchres',`buttons',26,26,0)
  119. ButtonWidth(`btn_srchres',0)
  120.  
  121. AppendItem(`bb_main',`',`',`')
  122.  
  123. AppendItem(`bb_main',`btn_bkmks',`',`ShowBookmarkList()')
  124. ButtonHelp(`btn_bkmks',`Bookmark List (Ctrl+Shift+B)')
  125. SetButtonBitmap(`btn_bkmks',`buttons',12,12,0)
  126. ButtonWidth(`btn_bkmks',0)
  127.  
  128. AppendItem(`bb_main',`',`',`')
  129.  
  130. AppendItem(`bb_main',`btn_histlist',`',`ShowHistoryList()')
  131. ButtonHelp(`btn_histlist',`History List (Ctrl+Shift+H)')
  132. SetButtonBitmap(`btn_histlist',`buttons',27,27,0)
  133. ButtonWidth(`btn_histlist',0)
  134.  
  135. # here is an example of a custom button for a help file
  136. # note the use of an aux file bitmap for the button image...
  137. #
  138. AppendItem(`bb_main',`',`',`')
  139.  
  140. AppendItem(`bb_main',`btn_brew',`',`ClickItem(`mnu_caffeine')')
  141. SetButtonBitmap(`btn_brew',`!brewbtn.bmp',1,1,0)
  142. ButtonHelp(`btn_brew',`Dr. GUI\'s Espresso Stand')
  143. ButtonWidth(`btn_brew',0)
  144.  
  145. AppendItem(`bb_main',`',`',`')
  146.  
  147. AppendItem(`bb_main',`btn_help',`',`BrowserHelp("",0)')
  148. SetButtonBitmap(`btn_help',`buttons',29,14,0)
  149. ButtonHelp(`btn_help',`Help Contents (F1)')
  150. ButtonWidth(`btn_help',0)
  151.  
  152. #  Buttons for the topic panes
  153. #
  154. ButtonBarJustify(`bb_topic',1)
  155.  
  156. AppendItem(`bb_topic',`btn_back',`',`Back()')
  157. ButtonHelp(`btn_back',`Go Back (Ctrl+B)')
  158. SetButtonBitmap(`btn_back',`buttons',29,8,0)
  159. ButtonWidth(`btn_back',0)
  160. DisableItem(`btn_back')
  161.  
  162. AppendItem(`bb_topic',`',`',`')
  163.  
  164. AppendItem(`bb_topic',`btn_prev',`',`PrevNextTopic(0)')
  165. ButtonHelp(`btn_prev',`Previous in Contents (Ctrl+<)')
  166. SetButtonBitmap(`btn_prev',`buttons',29,9,0)
  167. ButtonWidth(`btn_prev',0)
  168.  
  169. AppendItem(`bb_topic',`btn_next',`',`PrevNextTopic(1)')
  170. ButtonHelp(`btn_next',`Next in Contents (Ctrl+>)')
  171. SetButtonBitmap(`btn_next',`buttons',29,10,1)
  172. ButtonWidth(`btn_next',0)
  173.  
  174. AppendItem(`bb_topic',`',`',`')
  175.  
  176. AppendItem(`bb_topic',`btn_lprev',`',`JumpList(-1)')
  177. SetButtonBitmap(`btn_lprev',`buttons',29,28,0)
  178. ButtonHelp(`btn_lprev',`Previous in List (Ctrl+Shift+<)')
  179. ButtonWidth(`btn_lprev',0)
  180.  
  181. AppendItem(`bb_topic',`btn_lnext',`',`JumpList(1)')
  182. SetButtonBitmap(`btn_lnext',`buttons',29,29,1)
  183. ButtonHelp(`btn_lnext',`Next in List (Ctrl+Shift+>)')
  184. ButtonWidth(`btn_lnext',0)
  185.  
  186. AppendItem(`bb_topic',`',`',`')
  187.  
  188. AppendItem(`bb_topic',`btn_copy',`',`CopyTopic()')
  189. ButtonHelp(`btn_copy',`Copy (Ctrl+C)');
  190. SetButtonBitmap(`btn_copy',`buttons',29,6,0)
  191. ButtonWidth(`btn_copy',0)
  192.  
  193. AppendItem(`bb_topic',`',`',`')
  194.  
  195. AppendItem(`bb_topic',`btn_print',`',`PrintTopic()')
  196. ButtonHelp(`btn_print',`Print (Ctrl+P)')
  197. SetButtonBitmap(`btn_print',`buttons',29,7,0)
  198. ButtonWidth(`btn_print',0)
  199.  
  200. AppendItem(`bb_topic',`',`',`')
  201.  
  202. AppendItem(`bb_topic',`btn_ann',`',`AnnotateTopic(1)')
  203. ButtonHelp(`btn_ann',`View Annotation (Ctrl+Shift+A)')
  204. SetButtonBitmap(`btn_ann',`buttons',29,11,0)
  205. ButtonWidth(`btn_ann',0)
  206.  
  207. AppendItem(`bb_topic',`',`',`')
  208.  
  209. AppendItem(`bb_topic',`btn_sync',`',`SyncTopic(1)')
  210. ButtonHelp(`btn_sync',`Sync Contents (Ctrl+Y)')
  211. SetButtonBitmap(`btn_sync',`buttons',29,13,0)
  212. ButtonWidth(`btn_sync',0)
  213.  
  214. AppendItem(`bb_topic',`',`',`')
  215.  
  216. AppendItem(`bb_topic',`btn_highlights',`',`ToggleHighlights()')
  217. ButtonHelp(`btn_highlights',`Highlights (Ctrl+H)')
  218. SetButtonBitmap(`btn_highlights',`buttons',25,25,0)
  219. ButtonWidth(`btn_highlights',0)
  220.  
  221. #  magnifier settings
  222. #
  223. AppendItem(`btn_magn',`mnu_75',`75%',`SizeFont(75)')
  224. AppendItem(`btn_magn',`mnu_90',`90%',`SizeFont(90)')
  225. AppendItem(`btn_magn',`mnu_100',`100%',`SizeFont(100)')
  226. AppendItem(`btn_magn',`mnu_110',`110%',`SizeFont(110)')
  227. AppendItem(`btn_magn',`mnu_125',`125%',`SizeFont(125)')
  228.  
  229. #
  230. #  Keyboard accelerators
  231. #
  232. #  Shift states:
  233. #   0x00 == Normal
  234. #   0x01 == Shift
  235. #   0x02 == Ctrl
  236. #
  237. AddAccelerator(9,0,`NextControl()')                     # Tab
  238. AddAccelerator(9,1,`PreviousControl()')                 # Shift-Tab
  239. AddAccelerator(0x75,0,`NextPane()')                     # F6 == Focus to next pane.
  240. AddAccelerator(0x75,1,`PreviousPane()')                 # Shift-F6 == Focus to previous pane.
  241. AddAccelerator(0x70,0,`ClickItem(`btn_help')')          # F1 == Help
  242. AddAccelerator(0x73,0x80,`ClickItem("btn_keyw")')       # F4     == Keywords
  243. AddAccelerator(0x4b,0x82,`ClickItem("btn_keyw")')       # Ctrl-K == Keywords
  244. AddAccelerator(0x74,0x80,`ClickItem("btn_search")')     # F5     == Find Dlg
  245. AddAccelerator(0x46,0x82,`ClickItem("btn_search")')     # Ctrl-F == Find Dlg
  246. AddAccelerator(0x42,0x82,`ClickItem("btn_back")')       # Ctrl-B == Back
  247. AddAccelerator(0xBC,0x83,`ClickItem("btn_lprev")')      # Ctrl+Shift+< == list prev
  248. AddAccelerator(0xBE,0x83,`ClickItem("btn_lnext")')      # Ctrl+Shift+> == list next
  249. AddAccelerator(0xBC,0x82,`ClickItem("btn_prev")')       # Ctrl+> == prev topic.
  250. AddAccelerator(0xBE,0x82,`ClickItem("btn_next")')       # Ctrl+> == next topic.
  251. AddAccelerator(0x77,0,`KeyboardSelect()')               # F8 == Keyboard selection mode.
  252. AddAccelerator(65,0x02,`ClickItem("mnu_selall")')       # Ctrl+A == Select all
  253. AddAccelerator(66,0x83,`ClickItem("btn_bkmks")')        # Ctrl+Shift+B == Bookmark dlg.
  254. AddAccelerator(67,0x02,`ClickItem("btn_copy")')         # Ctrl+C == Edit-Copy
  255. AddAccelerator(0x2D,0x02,`ClickItem("btn_copy")')       # Ctrl+Insert == Edit-Copy
  256. AddAccelerator(68,0x82,`ScrollHighlight(1)')            # Ctrl+D == Next Highlight.
  257. AddAccelerator(69,0x82,`ClickItem(`mnu_caffeine')')     # Ctrl+E == Dr GUI help file
  258. AddAccelerator(70,0x83,`ClickItem("mnu_prevsrch")')     # Ctrl+Shift+F == Prev find res.
  259. AddAccelerator(72,0x83,`ClickItem("mnu_back")')         # Ctrl+Shift+H == History list dlg.
  260. AddAccelerator(79,0x82,`ClickItem("mnu_open")')         # Ctrl+O == Open Dlg.
  261. AddAccelerator(80,0x82,`ClickItem("mnu_prtop")')        # Ctrl+P == Menu print.
  262. AddAccelerator(85,0x82,`ScrollHighlight(-1)')           # Ctrl+U == Prev Highlight.
  263. AddAccelerator(86,0x02,`ClickItem("mnu_paste")')        # Ctrl+V == Edit paste.
  264. AddAccelerator(0x2D,0x01,`ClickItem("mnu_paste")')      # Shift+Ins == Edit paste.
  265. AddAccelerator(88,0x02,`ClickItem("mnu_cut")')          # Ctrl+X == Edit cut.
  266. AddAccelerator(0x2E,0x01,`ClickItem("mnu_cut")')        # Shift+Del == Edit cut.
  267. AddAccelerator(0x48,0x82,`ClickItem("btn_highlights")') # Ctrl+L == Toggle highlights.
  268. AddAccelerator(0x59,0x82,`ClickItem("btn_sync")')       # Ctrl+Y == Sync
  269. AddAccelerator(0x43,0x02,`ClickItem("btn_copy")')       # Ctrl+C == Copy Topic.
  270. AddAccelerator(0x53,0x83,`ClickItem("btn_p2")')         # Ctrl+Shift+S == View Contents & Topic
  271. AddAccelerator(0x54,0x83,`ClickItem("btn_p1")')         # Ctrl+Shift+T == View Topic only
  272. AddAccelerator(0x43,0x83,`ClickItem("btn_p3")')         # Ctrl+Shift+C == View Contnets Only
  273. AddAccelerator(0x41,0x83,`ClickItem("btn_ann")')        # Ctrl+Shift+A == View Annotation
  274. AddAccelerator(0x5a,0x83,`ClickItem("btn_magn")')       # Ctrl+Shift+Z == Zoom Text
  275.