home *** CD-ROM | disk | FTP | other *** search
/ PC World 1997 November / PCWorld_1997-11_cd.bin / software / programy / komix / DATA.Z / reptool.mnu < prev    next >
Encoding:
Text File  |  1997-05-13  |  3.8 KB  |  187 lines
  1. registerObject  {
  2.     name        .file
  3.     type        CustMenuBarButton
  4.     objSpec        {
  5.         label        File
  6.         mnemonic    F
  7.     }
  8. }
  9.  
  10. registerObject  {
  11.     name        .file.menu
  12.     type        CustMenu
  13.     visible        {1 1 1 1 1}
  14. }
  15.  
  16. registerObject {
  17.         name            .view
  18.         type            CustMenuBarButton
  19.         objSpec         {
  20.                 label           View
  21.                 mnemonic        V
  22.         }
  23. }
  24.  
  25. registerObject {
  26.         name            .view.menu
  27.         type            CustMenu
  28. }
  29.  
  30. registerObject  {
  31.     name        .options
  32.     type        CustMenuBarButton
  33.     objSpec        {
  34.         label        Options
  35.         mnemonic    O
  36.     }
  37. }
  38.  
  39. registerObject  {
  40.     name        .options.menu
  41.     type        CustMenu
  42. }
  43.  
  44. registerObject  {
  45.     name        .help
  46.     type        CustMenuBarButton
  47.     objSpec        {
  48.         label        Help
  49.         mnemonic    H
  50.         helpButton    1
  51.     }
  52. }
  53.  
  54. registerObject  {
  55.     name        .help.menu
  56.     type        CustMenu
  57.     visible        {1 1 1 1 1}
  58.     objSpec        {
  59.         pinnable    1
  60.     }
  61. }
  62.  
  63. registerObject  {
  64.     name        .file.menu.open
  65.     type        CustMenuPushButton
  66.     objSpec        {
  67.         label        Open
  68.         mnemonic    o
  69.         hintText    {Starts the selected tool.}
  70.         accelerator    Ctrl+O
  71.         activated    {
  72.             #CTGENCommandScript
  73.             busy { .main fileOpen } 
  74.             #CTGENEndCommandScript    
  75.         }
  76.         selIsATypes    {}
  77.         selCount    1
  78.         checkOn        selectionChange
  79.     }
  80. }
  81.  
  82. registerObject  {
  83.     name        .file.menu.user_1
  84.     type        CustMenuSeparator
  85.     objSpec        {
  86.     }
  87. }
  88.  
  89. registerObject  {
  90.     name        .file.menu.exit
  91.     type        CustMenuPushButton
  92.     objSpec        {
  93.         hintText    {Exits the Repository Tool.}
  94.         label        Exit
  95.         mnemonic    x
  96.         activated    {busy { .main fileExit }}
  97.     }
  98. }
  99.  
  100. registerObject {
  101.         name            .view.menu.messagearea
  102.         type            CustMenuCheckButton
  103.         objSpec         {
  104.                 hintText        "Shows or hides the message area."
  105.                 label           "Message Area"
  106.                 mnemonic        M
  107.                 state           1
  108.                 stateChanged    {
  109.                         #CTGENCommandScript
  110.                         .main messageAreaPresent [[.main menuBar].view.menu.messagearea state]
  111.                         #CTGENEndCommandScript  
  112.                 }
  113.         }
  114. }
  115.  
  116. registerObject  {
  117.     name        .options.menu.font
  118.     type        CustMenuPushButton
  119.     objSpec        {
  120.         label        {Font...}
  121.         hintText    "Changes the font used by the tool icons."
  122.         mnemonic    F
  123.         activated    {busy { .main optionsFont }}
  124.         selIsATypes    {}
  125.     }
  126. }
  127.  
  128. registerObject  {
  129.     name        .help.menu.whatsthis
  130.     type        CustMenuPushButton
  131.     objSpec        {
  132.         hintText    {Shows help about the selected component.}
  133.         label        "What's This?"
  134.         mnemonic    W
  135.         activated    {
  136.             #CTGENCommandScript
  137.             .main helpOnContext 
  138.             #CTGENEndCommandScript    
  139.         }
  140.     }
  141. }
  142.  
  143.  
  144. registerObject  {
  145.     name        .help.menu.helptopics
  146.     type        CustMenuPushButton
  147.     objSpec        {
  148.         hintText    {Shows help topics.}
  149.         label        {Help Topics}
  150.         mnemonic    T
  151.         activated    showHelpTopics
  152.     }
  153. }
  154.  
  155. registerObject  {
  156.         name            .help.menu.productdocumentation
  157.         type            CustMenuPushButton
  158.         objSpec         {
  159.                 label           {Product Documentation}
  160.                 hintText        {Starts online documentation.}
  161.                 activated       {
  162.                         #CTGENMessage
  163.                         wmtkmessage {Start online documentation ...}
  164.                         #CTGENBusyCursorOn
  165.                         .main busy TRUE
  166.                         #CTGENCommandScript
  167.                         startOnlineDoc 
  168.                         #CTGENEndCommandScript  
  169.                         #CTGENRemoveMessage
  170.                         wmtkmessage ""
  171.                         #CTGENBusyCursorOff
  172.                         .main busy FALSE
  173.                 }
  174.         }
  175. }
  176.  
  177. registerObject {
  178.     type        CustMenuPushButton
  179.     name        .help.menu.aboutrepositorytool
  180.     objSpec {
  181.         hintText    "Shows version information."
  182.         label        "About Repository Tool"
  183.         mnemonic    A
  184.         activated    {showVersionDialog}
  185.     }
  186. }
  187.