home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1999 March / CDW0399.iso / Demos / HomePage / data1.cab / Program_Executable_Files / Homepage.exe / 1009 / 152 < prev    next >
Encoding:
Text File  |  1997-12-10  |  25.3 KB  |  933 lines
  1. // -----
  2. // VDL152.txt  (HToolbar.txt)
  3. // Copyright 1996 Claris
  4. // -----
  5.  
  6. // Toolbar
  7.  
  8. #include "StdVPref.txt"
  9.  
  10.  
  11. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  12. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  13. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  14.  
  15. //This section contains all localizable string constants for this VDL program. Be sure to 
  16. //include the backslash character at the end of each line of a multi-line string, except for the last line.
  17. //You may also flatten multiline constants into a single line, if you prefer
  18.  
  19. #define kLit1 "New Page"
  20. #define kLit2 "Open"
  21. #define kLit3 "Save"
  22. #define kLit4 "Print"
  23. #define kLit5 "Edit Page"
  24. #define kLit6 "Preview Page"
  25. #define kLit7 "Edit HTML Source"
  26. #define kLit8 "Edit Frames"
  27. #define kLit9 "Preview in Browser"
  28. #define kLit10 "Object Editor"
  29. #define kLit11 "Link Editor"
  30. #define kLit12 "Document Options"
  31. #define kLit13 "New Entry"
  32. #define kLit14 "Insert Anchor"
  33. #define kLit15 "Insert Link To File"
  34. #define kLit16 "Insert Image"
  35. #define kLit17 "Insert Horizontal Rule"
  36. #define kLit18 "Insert Table"
  37. #define kLit19 "Align Left "
  38. #define kLit20 "Align Center"
  39. #define kLit21 "Align Right"
  40. #define kLit22 "Subdivide Vertically"
  41. #define kLit23 "Subdivide Horizontally"
  42. #define kLit24 "Insert CheckBox"
  43. #define kLit25 "Paragraph Format"
  44. #define kLit26 "Normal"
  45. #define kLit27 "Preformatted"
  46. #define kLit28 "Address"
  47. #define kLit29 "Heading 1"
  48. #define kLit30 "Heading 2"
  49. #define kLit31 "Heading 3"
  50. #define kLit32 "Heading 4"
  51. #define kLit33 "Heading 5"
  52. #define kLit34 "Heading 6"
  53. #define kLit35 "Bullet List"
  54. #define kLit36 "Numbered List"
  55. #define kLit37 "Term"
  56. #define kLit38 "Definition"
  57. #define kLit39 "Make Bullet List Entry"
  58. #define kLit40 "Increase indent"
  59. #define kLit41 "Decrease indent"
  60. #define kLit42 "Smaller Text"
  61. #define kLit43 "Larger Text"
  62. #define kLit44 "Bold"
  63. #define kLit45 "Italic"
  64. #define kLit46 "Teletype"
  65. #define kLit47 "Make Numbered List Entry"
  66. #define kLit48 "Add Frame..."
  67. #define kLit49 "Publish"
  68. #define kLit50 "Preview in Browser 2"
  69. #define kLit51 "Verify Links and References"
  70. #define kLit52 "Consolidate"
  71. #define kLit53 "Upload"
  72. #define kLit54 "Select Parent Frameset"
  73. #define kLit55 "Select Root Frameset"
  74.  
  75. //Localized Fonts
  76.  
  77. #if Platform_Mac
  78. #define kHelpFont Font = {Geneva, 9, {Italic}}
  79. #endif
  80.  
  81. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  82. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  83. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  84.  
  85.  
  86.  
  87. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  88. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  89. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  90.  
  91. //This section contains integer constants that are used to format this VDL program.
  92. //These are localizable - they only need to be changed if the localized strings 
  93. //are sufficiently longer than the US strings. Localize the strings first, then the constants.
  94. //Width of the popup menu controlling paragraph width (the only popup)
  95. #define kParagraphStylePopupWidth 124
  96.  
  97. #if Platform_Mac
  98. //Width and height of the help view
  99. #define kHelpViewWidth 200
  100. #define kHelpViewHeight 23
  101. #endif
  102.  
  103. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  104. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  105. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  106.  
  107. //No further localizable data past this point
  108.  
  109. /************************** END LOCALIZABLE DATA ***************************************************/
  110. /************************** END LOCALIZABLE DATA ***************************************************/
  111. /************************** END LOCALIZABLE DATA ***************************************************/
  112.  
  113.  
  114. #ifdef TryMe
  115.     #define InDocWindow 0
  116. #endif //TryMe
  117.  
  118.  
  119. // Define(ToolSep)
  120.    // Spacer(Height = 20, Width = 1, BackColor = {0,0,0});
  121.     // cicn(13590, Width=1, Height=20);
  122.  
  123. #if Platform_Win
  124.     #define ToolSep 
  125.     #define CaseSafeToolSep Spacer(Height = 0, Width = 0);
  126. #else
  127.     #define ToolSep GenericView("ToolSepView", SepHeight = 23);
  128.     #define CaseSafeToolSep GenericView("ToolSepView", SepHeight = 23);
  129. #endif
  130.  
  131. #if InDocWindow
  132.     #define HAlignCommand "hAlign"
  133.     #define PStyleCommand "pStyle"
  134.     #define EditModeCommand "editMode"
  135.     /*@jh514@*/
  136.     #define TextColorCommand "textColor" 
  137. #else
  138.     /* ccHAlign */
  139.     #define HAlignCommand 3022 
  140.     
  141.     /* ccHPStyle */
  142.     #define PStyleCommand 3021
  143.  
  144.     /* ccEditMode */
  145.     #define EditModeCommand 3095
  146.  
  147.     /* ccTextColor*/
  148.     #define TextColorCommand 3028
  149. #endif
  150.  
  151. #define kStandardPadSpace 9
  152.  
  153. #define ToolBack stdBackColor
  154.  
  155.  
  156.  
  157. #ifndef CUSTOMIZABLE_TOOLBARS
  158.     #if Platform_Mac
  159.     #define CUSTOMIZABLE_TOOLBARS 1
  160.     #else
  161.     #define CUSTOMIZABLE_TOOLBARS 1
  162.     #endif
  163. #endif
  164.  
  165. #if Platform_Mac && !InDocWindow
  166. #define kVPaddingBase 2
  167. #else
  168. #define kVPaddingBase 4
  169. #endif
  170.  
  171. Define(LineSep)
  172.     #if InDocWindow || Platform_Mac
  173.         Spacer(Height = 0, Width = 0);
  174.     #else
  175.     VList(Width = UseParent)
  176.         {
  177.         Spacer(Height = 1, Width = UseParent, BackColor = {25000, 25000, 25000} );
  178.         Spacer(Height = 1, Width = UseParent, BackColor = {65535, 65535, 65535} );
  179.         }
  180.     #endif
  181.  
  182. //--- Command Codes - from WidowR.h
  183. #define ccDisabledCommandCode        9999
  184. #define ccConsolidate            5036
  185. #define ccVerifyLinks            5037
  186. #define ccRemoteSave             3003
  187.  
  188. //--- Resource IDs - from WidowR.h
  189. #define kVerifyLinksIcon                    16010
  190. #define kVerifyLinksIconPressed            16011
  191. #define kVerifyLinksIconDimmed            16012
  192.  
  193. #define kConsolidateIcon                    16022
  194. #define kConsolidateIconPressed            16023
  195. #define kConsolidateIconDimmed            16024
  196.  
  197. #define kUploadIcon                            13570                    
  198. #define kUploadIconPressed                    13571
  199. #define kUploadIconDimmed                    13572
  200.  
  201.  
  202.  
  203. Define(MainToolbarList)
  204.     HList(ToolBack, Width = UseParent)
  205.         {
  206.         /* Buttons */
  207.         HList(FullyCovered)
  208.             {
  209.             #if Platform_Win
  210.             ToolSep
  211.             PictPushButton(1040, "None", EH kLit1) // ccNewDoc
  212.                 {
  213.                 Enabled (Draw, 'cicn', 14025);
  214.                 Disabled(Draw, 'cicn', 14027); 
  215.                 Tracking(Draw, 'cicn', 14026);
  216.                 };
  217.             ToolSep
  218.             PictPushButton(1041, "None", EH kLit2) // ccOpenDoc
  219.                 {
  220.                 Enabled (Draw, 'cicn', 14028);
  221.                 Disabled(Draw, 'cicn', 14030); 
  222.                 Tracking(Draw, 'cicn', 14029);
  223.                 };
  224.             ToolSep
  225.             PictPushButton(1043, "None", EH kLit3) // ccSave
  226.                 {
  227.                 Enabled (Draw, 'cicn', 14031);
  228.                 Disabled(Draw, 'cicn', 14033); 
  229.                 Tracking(Draw, 'cicn', 14032);
  230.                 };
  231.             ToolSep
  232.             PictPushButton(1046, "None", EH kLit4) // ccPrint
  233.                 {
  234.                 Enabled (Draw, 'cicn', 14034);
  235.                 Disabled(Draw, 'cicn', 14036); 
  236.                 Tracking(Draw, 'cicn', 14035);
  237.                 };
  238.             Spacer(Height = UseParent, Width = kStandardPadSpace);
  239.             #endif
  240.  
  241.             ToolSep
  242.             HList(FullyCovered)
  243.                 {
  244.                 PictRadioButton( EditModeCommand, 0, // ccEditMode : kEditVisual
  245.                                       EH kLit5 )
  246.                     {
  247.                     On (Draw, 'cicn', 13550);
  248.                     Off(Draw, 'cicn', 13010);
  249.                     DisabledOn (Draw, 'cicn', 13561);
  250.                     DisabledOff(Draw, 'cicn', 13561);
  251.                     TrackingOn (Draw, 'cicn', 13550);
  252.                     TrackingOff(Draw, 'cicn', 13550);
  253.                     };
  254.                 
  255.                 ToolSep
  256.                 PictRadioButton( EditModeCommand, 1, // ccEditMode : kBrowseMode
  257.                                       EH kLit6 )
  258.                     {
  259.                     On (Draw, 'cicn', 13551);
  260.                     Off(Draw, 'cicn', 13030);
  261.                     DisabledOn (Draw, 'cicn', 13562);
  262.                     DisabledOff(Draw, 'cicn', 13562);
  263.                     TrackingOn (Draw, 'cicn', 13551);
  264.                     TrackingOff(Draw, 'cicn', 13551);
  265.                     };
  266.                     
  267.                 #if !LITE_VERSION
  268.                 ToolSep
  269.                 PictRadioButton( EditModeCommand, 2, // ccEditMode : kHTMLMode
  270.                                       EH kLit7 )
  271.                     {
  272.                     On (Draw, 'cicn', 13552);
  273.                     Off(Draw, 'cicn', 13050);
  274.                     DisabledOn (Draw, 'cicn', 13563);
  275.                     DisabledOff(Draw, 'cicn', 13563);
  276.                     TrackingOn (Draw, 'cicn', 13552);
  277.                     TrackingOff(Draw, 'cicn', 13552);
  278.                     };
  279.                 #endif //!LITE_VERSION
  280.                 
  281.                 #if !LITE_VERSION
  282.                 // For Layout documents, add a fourth edit-mode button.
  283.                 Switch (type)
  284.                     {
  285.                     case 0: // hdContent
  286.                             CaseSafeToolSep
  287.                     
  288.                     case 1: // hdLayout
  289.                         HList(FullyCovered)
  290.                             {
  291.                             ToolSep
  292.                             PictRadioButton( EditModeCommand, 3, // ccEditMode : kEditFrames
  293.                                                   EH kLit8 )
  294.                                 {
  295.                                 On (Draw, 'cicn', 13553);
  296.                                 Off(Draw, 'cicn', 13560);
  297.                                 DisabledOn (Draw, 'cicn', 13564);
  298.                                 DisabledOff(Draw, 'cicn', 13564);
  299.                                 TrackingOn (Draw, 'cicn', 13553);
  300.                                 TrackingOff(Draw, 'cicn', 13553);
  301.                                 };
  302.                             ToolSep
  303.                             }
  304.  
  305.                     case 2: // hdLibrary
  306.                         CaseSafeToolSep
  307.                     
  308.                     case 3: // hdSite
  309.                         CaseSafeToolSep
  310.                         
  311.                     } // Switch (type)
  312.                 #else
  313.                 CaseSafeToolSep
  314.                 #endif
  315.  
  316.                 } // HList (edit mode group)
  317.             
  318.                                 
  319.             Switch (type)
  320.                 {
  321.                 case 0: // hdContent
  322.                 case 1: // hdLayout
  323.                     HList(FullyCovered)
  324.                         {
  325.                         Spacer(Height = UseParent, Width = kStandardPadSpace);
  326. //BEGIN obsolete:
  327. // jeh 7/11/97: Preview in browser no longer implemented using two buttons, with dynamic tooltips.
  328. //                Now using single button with menu pulldown, below.
  329. /*                        ToolSep
  330.                         Tag(TagBrowserButton_1)
  331.                         PictPushButton(3002, "None", EH kLit9)
  332.                             {
  333.                             Enabled(Draw, 'cicn',13500 );
  334.                             Disabled(Draw, 'cicn',13502 ); 
  335.                             Tracking(Draw, 'cicn',13501 );
  336.                             };
  337.  
  338.                         // 2nd Browser button.  ccPreview2 is 3008
  339.                         ToolSep
  340.                         Tag(TagBrowserButton_2)
  341.                         PictPushButton(3008, "None", EH kLit50) 
  342.                             {
  343.                             Enabled(Draw, 'cicn', 16001 );
  344.                             Disabled(Draw, 'cicn',16003 ); 
  345.                             Tracking(Draw, 'cicn',16002 );
  346.                             };
  347.                         
  348.                         
  349.                         ToolSep
  350.                         Spacer(Height = UseParent, Width = kStandardPadSpace);
  351. */
  352. //END obsolete
  353.  
  354.                         ToolSep
  355.                         GenericView("BrowserButtonMenu");
  356.                         ToolSep
  357.                         Spacer(Height = UseParent, Width = kStandardPadSpace);
  358.                         // jh - end add 7/10
  359.                         
  360.                         #if LITE_VERSION
  361.                         ToolSep
  362.                         PictPushButton(3319, "None", EH kLit49) // ccOneButtonPublish
  363.                             {
  364.                             Enabled(Draw, 'cicn',14065 );
  365.                             Disabled(Draw, 'cicn',14067 ); 
  366.                             Tracking(Draw, 'cicn',14066 );
  367.                             };
  368.                         
  369.                         ToolSep
  370.                         Spacer(Height = UseParent, Width = kStandardPadSpace);
  371.                         #endif //LITE_VERSION
  372.                         
  373.                         ToolSep
  374.                         PictPushButton(3101, "None", EH kLit10) // ccShowInspector
  375.                             {
  376.                             Enabled(Draw, 'cicn',13503 );
  377.                             Disabled(Draw, 'cicn',13505 ); 
  378.                             Tracking(Draw, 'cicn',13504 );
  379.                             };
  380.                         ToolSep
  381.                         PictPushButton(3109, "None", EH kLit11) // ccShowLinkPalette
  382.                             {
  383.                             Enabled(Draw, 'cicn',13506 );
  384.                             Disabled(Draw, 'cicn',13508 ); 
  385.                             Tracking(Draw, 'cicn',13507 );
  386.                             };
  387.                         ToolSep
  388.                         PictPushButton(3105, "None", EH kLit12) // ccDocInfo
  389.                             {
  390.                             Enabled(Draw, 'cicn',13013 );
  391.                             Disabled(Draw, 'cicn',13053 ); 
  392.                             Tracking(Draw, 'cicn',13033 );
  393.                             };
  394.                         CaseSafeToolSep
  395.                         } // HList(FullyCovered)
  396.                 
  397.                 case 2: // hdLibrary
  398.                     HList(FullyCovered)
  399.                         {
  400.                         Spacer(Height = UseParent, Width = kStandardPadSpace);
  401.                         ToolSep
  402.                         PictPushButton(3301, "None", EH kLit13) // ccNewLibraryEntry
  403.                             {
  404.                             Enabled (Draw, 'cicn', 10200);
  405.                             Disabled(Draw, 'cicn', 10202); 
  406.                             Tracking(Draw, 'cicn', 10201);
  407.                             };
  408.                         ToolSep
  409.                         Spacer(Height = UseParent, Width = kStandardPadSpace);
  410.                         
  411.                         ToolSep
  412.                         PictPushButton(3101, "None", EH kLit10) // ccShowInspector
  413.                             {
  414.                             Enabled(Draw, 'cicn',13503 );
  415.                             Disabled(Draw, 'cicn',13505 ); 
  416.                             Tracking(Draw, 'cicn',13504 );
  417.                             };
  418.                         ToolSep
  419.                         PictPushButton(3109, "None", EH kLit11) // ccShowLinkPalette - "Insert/Edit Link"
  420.                             {
  421.                             Enabled(Draw, 'cicn',13506 );
  422.                             Disabled(Draw, 'cicn',13508 ); 
  423.                             Tracking(Draw, 'cicn',13507 );
  424.                             };
  425.                         ToolSep
  426.                         } // HList(FullyCovered)
  427.                 
  428.                 case 3: // hdSite
  429.                     Spacer(Height = 0, Width = 0);
  430.                 
  431.                 } // Switch (type)
  432.             
  433.             
  434.             Switch (type)
  435.                 {
  436.                 case 0: // hdContent
  437.                     Spacer(Height = UseParent, Width = kStandardPadSpace);
  438.                 
  439.                 default:
  440.                     Spacer(Height = UseParent, Width = kStandardPadSpace);
  441.                 }
  442.             
  443.             ToolSep
  444.             
  445.             Switch (editMode)
  446.                 {
  447.                 case 0: // kEditVisual
  448.                 case 1: // kBrowseMode
  449.                 case 2: // kHTMLMode
  450.                     HList(FullyCovered)
  451.                         {
  452.                         PictPushButton(3013, "None", Draggable, EH kLit14) // ccInsertAnchor
  453.                             {
  454.                             Enabled(Draw, 'cicn',13012 );
  455.                             Disabled(Draw, 'cicn',13052 ); 
  456.                             Tracking(Draw, 'cicn',13032 );
  457.                             };                        
  458.                         ToolSep
  459.                         
  460.                         /*****
  461.                         #if InDocWindow
  462.                         #define DocDraggable ,Draggable
  463.                         #else
  464.                         #define DocDraggable 
  465.                         #endif
  466.                         
  467.                         PictPushButton(3012, "None", EH kLit15 DocDraggable) // ccMakeFileLink
  468.                             {
  469.                             Enabled(Draw, 'cicn',13011 );
  470.                             Disabled(Draw, 'cicn',13051 ); 
  471.                             Tracking(Draw, 'cicn',13031 );
  472.                             };
  473.                         ToolSep
  474.                         
  475.                         Switch (type)
  476.                             {
  477.                             case 0: // hdContent
  478.                                 Spacer(Height = UseParent, Width = kStandardPadSpace );
  479.                             
  480.                             default:
  481.                                 Spacer(Height = UseParent, Width = kStandardPadSpace);
  482.                             }
  483.                         ToolSep
  484.                         *****/
  485.                         
  486.                         PictPushButton(3081, "None", EH kLit16)
  487.                             {
  488.                             Enabled(Draw, 'cicn',13005 );
  489.                             Disabled(Draw, 'cicn',13045 ); 
  490.                             Tracking(Draw, 'cicn',13025 );
  491.                             };
  492.                         ToolSep
  493.                         PictPushButton(3080, "None", Draggable, EH kLit17)
  494.                             {
  495.                             Enabled(Draw, 'cicn',13003 );
  496.                             Disabled(Draw, 'cicn',13043 ); 
  497.                             Tracking(Draw, 'cicn',13023 );
  498.                             };
  499.                         ToolSep
  500.                         PictPushButton(3091, "None", Draggable, EH kLit18)
  501.                             {
  502.                             Enabled(Draw, 'cicn',13060 );
  503.                             Disabled(Draw, 'cicn',13062 ); 
  504.                             Tracking(Draw, 'cicn',13061 );
  505.                             };
  506.                         ToolSep
  507.                         
  508.                         Switch (type)
  509.                             {
  510.                             case 0: // hdContent
  511.                                 Spacer(Height = UseParent, Width = kStandardPadSpace );
  512.                             
  513.                             default:
  514.                                 Spacer(Height = UseParent, Width = kStandardPadSpace);
  515.                             }
  516.     
  517.                         ToolSep
  518.                         PictPushButton( ccVerifyLinks, "None", EH kLit51) //Verify Links & References Button
  519.                             {
  520.                             On(Draw, 'cicn', kVerifyLinksIcon);
  521.                             Off(Draw, 'cicn', kVerifyLinksIconPressed);
  522.                             DisabledOn(Draw, 'cicn', kVerifyLinksIconDimmed);
  523.                             DisabledOff(Draw, 'cicn', kVerifyLinksIconDimmed);
  524.                             TrackingOn(Draw, 'cicn', kVerifyLinksIconPressed);
  525.                             TrackingOff(Draw, 'cicn', kVerifyLinksIconPressed);
  526.                             };
  527.                     
  528.                         ToolSep
  529.                         PictPushButton(ccConsolidate, "None", EH kLit52) //Consolidate Button
  530.                             {
  531.                             On(Draw, 'cicn', kConsolidateIcon);
  532.                             Off(Draw, 'cicn', kConsolidateIconPressed);
  533.                             DisabledOn(Draw, 'cicn', kConsolidateIconDimmed);
  534.                             DisabledOff(Draw, 'cicn', kConsolidateIconDimmed);
  535.                             TrackingOn(Draw, 'cicn', kConsolidateIconPressed);
  536.                             TrackingOff(Draw, 'cicn', kConsolidateIconPressed);
  537.                             };
  538.                     
  539.                         ToolSep
  540.                         PictPushButton(ccRemoteSave, "None", EH kLit53) //Remote Save = Upload document
  541.                             {
  542.                             On(Draw, 'cicn', kUploadIcon);
  543.                             Off(Draw, 'cicn', kUploadIconPressed);
  544.                             DisabledOn(Draw, 'cicn', kUploadIconDimmed);
  545.                             DisabledOff(Draw, 'cicn', kUploadIconDimmed);
  546.                             TrackingOn(Draw, 'cicn', kUploadIconPressed);
  547.                             TrackingOff(Draw, 'cicn', kUploadIconPressed);
  548.                             };
  549.                         ToolSep
  550.                         } // HList(FullyCovered)
  551.                 
  552.                 case 3: // kEditFrames
  553.                     #if !LITE_VERSION
  554.                     HList(FullyCovered)
  555.                         {
  556.                         
  557.                         PictPushButton(3307, "None", EH kLit23) // ccSubdivideHor
  558.                             {
  559.                             Enabled (Draw, 'cicn', 13604);
  560.                             Disabled(Draw, 'cicn', 13603); 
  561.                             Tracking(Draw, 'cicn', 13605);
  562.                             };
  563.                         ToolSep
  564.                         
  565.                         PictPushButton(3306, "None", EH kLit22) // ccSubdivideVert
  566.                             {
  567.                             Enabled (Draw, 'cicn', 13601);
  568.                             Disabled(Draw, 'cicn', 13600); 
  569.                             Tracking(Draw, 'cicn', 13602);
  570.                             };
  571.                         ToolSep
  572.                         
  573.                         PictPushButton(3350, "None", EH kLit48) // ccNewNamedFrameEntrySibling
  574.                             {
  575.                             Enabled (Draw, 'cicn', 14058);
  576.                             Disabled(Draw, 'cicn', 14060); 
  577.                             Tracking(Draw, 'cicn', 14059);
  578.                             };
  579.                         ToolSep
  580.  
  581.                         PictPushButton(3351, "None", EH kLit54) // ccSelectParentFrameset
  582.                             {
  583.                             Enabled (Draw, 'cicn', 14068);
  584.                             Disabled(Draw, 'cicn', 14070); 
  585.                             Tracking(Draw, 'cicn', 14069);
  586.                             };
  587.                         ToolSep
  588.  
  589.                         PictPushButton(3352, "None", EH kLit55) // ccSelectRootFrameset
  590.                             {
  591.                             Enabled (Draw, 'cicn', 14071);
  592.                             Disabled(Draw, 'cicn', 14073); 
  593.                             Tracking(Draw, 'cicn', 14072);
  594.                             };
  595.                         ToolSep
  596.                         }
  597.                     #else
  598.                         Spacer(Height = 0, Width = 0);
  599.                     #endif //LITE_VERSION
  600.                     
  601.                 } // Switch (editMode)
  602.             
  603.             Spacer(Height = UseParent, Width = 7);
  604.             
  605.             #if Platform_Mac
  606.                 HelpView(Width = kHelpViewWidth, Height = kHelpViewHeight, kHelpFont);
  607.             #endif
  608.             } //HList (Buttons)
  609.         } //HList
  610.  
  611.  
  612. Define(StyleToolbarList)
  613.     HList(ToolBack, Width = UseParent)
  614.         {
  615.         Margin(0,0,6,0)
  616.             #if Platform_Mac
  617.                 IntegerPopup( "", 0, PStyleCommand, Width = kParagraphStylePopupWidth,
  618.                                   EH kLit25, DontBind )
  619.             #else
  620.                 IntegerPopup( "", 0, PStyleCommand, Width = kParagraphStylePopupWidth,Height = 22,
  621.                                   EH kLit25, DontBind )
  622.             #endif
  623.                 {
  624.                 IntItem(kLit26,         0); // hpPlain
  625.                 IntItem(kLit27,           1); // hpPreformatted
  626.                 IntItem(kLit28,           2); // hpAddress
  627.                 IntItem(kLit29,          3); // hpHead1
  628.                 IntItem(kLit30,          4); // hpHead2
  629.                 IntItem(kLit31,          5); // hpHead3
  630.                 IntItem(kLit32,          6); // hpHead4
  631.                 IntItem(kLit33,          7); // hpHead5
  632.                 IntItem(kLit34,          8); // hpHead6
  633.                 IntItem(kLit35,            9); // hpBullet
  634.                 IntItem(kLit36,             12); // hpNumbered
  635.                 IntItem(kLit37,             14); // hpTerm
  636.                 IntItem(kLit38,            13); // hpDefinition
  637.                 };
  638.         
  639.         HList(FullyCovered)
  640.             {
  641.             /* Text Alignment buttons */
  642.             ToolSep
  643.             PictRadioButton(HAlignCommand, 0, EH kLit19)
  644.                 {
  645.                 On (Draw, 'cicn', 10019);
  646.                 Off(Draw, 'cicn', 10016);
  647.                 DisabledOn (Draw, 'cicn', 10022);
  648.                 DisabledOff(Draw, 'cicn', 10022);
  649.                 TrackingOn (Draw, 'cicn', 10019);
  650.                 TrackingOff(Draw, 'cicn', 10019);
  651.                 };
  652.             ToolSep
  653.             PictRadioButton(HAlignCommand, 1, EH kLit20)
  654.                 {
  655.                 On (Draw, 'cicn', 10020);
  656.                 Off(Draw, 'cicn', 10017);
  657.                 DisabledOn (Draw, 'cicn', 10023);
  658.                 DisabledOff(Draw, 'cicn', 10023);
  659.                 TrackingOn (Draw, 'cicn', 10020);
  660.                 TrackingOff(Draw, 'cicn', 10020);
  661.                 };
  662.             ToolSep
  663.             PictRadioButton(HAlignCommand, 2, EH kLit21)
  664.                 {
  665.                 On (Draw, 'cicn', 10021);
  666.                 Off(Draw, 'cicn', 10018);
  667.                 DisabledOn (Draw, 'cicn', 10024);
  668.                 DisabledOff(Draw, 'cicn', 10024);
  669.                 TrackingOn (Draw, 'cicn', 10021);
  670.                 TrackingOff(Draw, 'cicn', 10021);
  671.                 };
  672.             ToolSep
  673.             Spacer(Height = UseParent, Width = kStandardPadSpace);
  674.  
  675.             ToolSep
  676.             PictPushButton(3115, "None", Draggable, EH kLit47) //ccNumberedListEntry
  677.                 {
  678.                 Enabled (Draw, 'cicn', 14050);
  679.                 Disabled(Draw, 'cicn', 14052); 
  680.                 Tracking(Draw, 'cicn', 14051);
  681.                 };
  682.             ToolSep
  683.             PictPushButton(3090, "None", Draggable, EH kLit39) // ccBulletListEntry
  684.                 {
  685.                 Enabled (Draw, 'cicn', 13509);
  686.                 Disabled(Draw, 'cicn', 13511); 
  687.                 Tracking(Draw, 'cicn', 13510);
  688.                 };
  689.             ToolSep
  690.             Spacer(Height = UseParent, Width = kStandardPadSpace);
  691.             
  692.             ToolSep
  693.             PictPushButton(3024, "None", EH kLit40) // ccIndentRight
  694.                 {
  695.                 Enabled (Draw, 'cicn', 14001);
  696.                 Disabled(Draw, 'cicn', 14000); 
  697.                 Tracking(Draw, 'cicn', 14002);
  698.                 };
  699.             ToolSep
  700.             PictPushButton(3023, "None", EH kLit41) // ccIndentLeft
  701.                 {
  702.                 Enabled (Draw, 'cicn', 14004);
  703.                 Disabled(Draw, 'cicn', 14003); 
  704.                 Tracking(Draw, 'cicn', 14005);
  705.                 };
  706.             ToolSep
  707.             Spacer(Height = UseParent, Width = kStandardPadSpace );
  708.             
  709.             ToolSep
  710.             PictPushButton(3027, "None", EH kLit42) // ccDecreaseSize
  711.                 {
  712.                 Enabled (Draw, 'cicn', 14007);
  713.                 Disabled(Draw, 'cicn', 14006); 
  714.                 Tracking(Draw, 'cicn', 14008);
  715.                 };
  716.             ToolSep
  717.             PictPushButton(3026, "None", EH kLit43) // ccIncreaseSize
  718.                 {
  719.                 Enabled (Draw, 'cicn', 14010);
  720.                 Disabled(Draw, 'cicn', 14009); 
  721.                 Tracking(Draw, 'cicn', 14011);
  722.                 };
  723.             ToolSep
  724.             Spacer(Height = UseParent, Width = kStandardPadSpace);
  725.             
  726.             ToolSep
  727.             PictRadioButton(3031, 1, EH kLit44)// ccHCharBits + bold
  728.             {
  729.                 On (Draw, 'cicn', 14014);    //depressed look - same as tracking
  730.                 Off(Draw, 'cicn', 14013 );    //not pressed but enabled
  731.                 DisabledOn (Draw, 'cicn', 14012);
  732.                 DisabledOff(Draw, 'cicn', 14012);
  733.                 TrackingOn (Draw, 'cicn', 14014);
  734.                 TrackingOff(Draw, 'cicn', 14014);
  735.             };
  736.             ToolSep
  737.             PictRadioButton(3032, 0, EH kLit45) // ccHCharBits + italic
  738.             {
  739.                 On (Draw, 'cicn', 14016);    
  740.                 Off(Draw, 'cicn', 14017);        
  741.                 DisabledOn (Draw, 'cicn', 14015); 
  742.                 DisabledOff(Draw, 'cicn', 14015); 
  743.                 TrackingOn (Draw, 'cicn', 14017);
  744.                 TrackingOff(Draw, 'cicn', 14017);
  745.             };
  746. #if 0 /*jeh - remove 'T' icon per Kevin's request - 4/30/97*/
  747.             ToolSep
  748.             PictPushButton(3033, "None", EH kLit46) // ccHCharBits + teletype
  749.                 {
  750.                 Enabled (Draw, 'cicn', 14019);
  751.                 Disabled(Draw, 'cicn', 14018); 
  752.                 Tracking(Draw, 'cicn', 14020);
  753.                 };
  754. #endif // remove 'T' icon
  755.  
  756.             ToolSep
  757.             
  758.             Spacer(Height = UseParent, Width = kStandardPadSpace); // jeh - before, Width = 4);
  759.             
  760.             #if Platform_Mac
  761.             //jeh ToolSep causes vert. line to be drawn. Used as button's side.
  762.             ToolSep 
  763.             VList(Height = UseParent)
  764.                 {
  765.                 //jeh - remove: Spacer(Height = 2, Width = UseParent);
  766.                 GenericView("TextColorPopup", TheCommandCode = TextColorCommand);
  767.                 Spacer(Height = UseParent, Width = UseParent);
  768.                 
  769.                 }
  770.             ToolSep
  771.             #else
  772.             GenericView("TextColorPopup", TheCommandCode = TextColorCommand);
  773.             #endif
  774.             
  775.             } // Second row buttons
  776.         
  777.         } // HList (style commands)
  778.  
  779.  
  780. Define(MainList)
  781.     VList(Width = UseParent, ToolBack)
  782.         {
  783.         Switch (showToolbars, Width = UseParent)
  784.             {
  785.             #if InDocWindow
  786.                 case 1:
  787.                     VList(Width = UseParent)
  788.                         {
  789.                         Call(MainToolbarList);
  790.                         Switch (styleToolbars, Width = UseParent)
  791.                             {
  792.                             case 1:
  793.                                 Spacer(Width = 0, Height = kVPaddingBase + 2);
  794.                             default:
  795.                                 Spacer(Width = 0, Height = 0);
  796.                             }
  797.                         }
  798.             #else
  799.                 case 2:
  800.                     VList(Width = UseParent)
  801.                         {
  802.                         Call(LineSep);
  803.                         #if Platform_Win
  804.                             //Spacer needed on windows so Icons are evenly spaced between separator lines.
  805.                             Spacer(Height = kVPaddingBase, Width = 0);
  806.                         #endif 
  807.                         Call(MainToolbarList);
  808.                         
  809.                         Switch(styleToolbars)
  810.                             {
  811.                             case 2: 
  812.                                 Spacer(Height = kVPaddingBase, Width = 0);
  813.                             default: 
  814.                                 Spacer(Height = 0, Width = 0);
  815.                             }
  816.                         }
  817.             #endif
  818.             
  819.             default:
  820.                 Spacer(Width=0,Height=0);
  821.             } // Switch (showToolbars)
  822.         
  823.         
  824.         Switch (styleToolbars, Width = UseParent)
  825.             {
  826.             #if InDocWindow
  827.                 case 1:
  828.                     Call(StyleToolbarList);
  829.             #else
  830.                 case 2:
  831.                     VList(Width = UseParent)
  832.                         {
  833.                         Call(LineSep);
  834.                         Spacer(Height = kVPaddingBase, Width = 0);
  835.                         Call(StyleToolbarList);
  836.                         }
  837.             #endif
  838.     
  839.             default:
  840.                 Spacer(Width=0,Height=0);
  841.             } // Switch (styleToolbars)
  842.             
  843.         #ifdef  TryMe
  844.         IntegerPopup("Type: ", Default, type)
  845.             {
  846.             IntItem("0", 0);
  847.             IntItem("1", 1);
  848.             IntItem("2", 2);
  849.             IntItem("3", 3);
  850.             };
  851.             
  852.         IntegerPopup("EditMode: ", Default, editMode)
  853.             {
  854.             IntItem("0", 0);
  855.             IntItem("1", 1);
  856.             IntItem("2", 2);
  857.             IntItem("3", 3);
  858.             };
  859.             
  860.         IntegerPopup("StyleBars: ", Default, styleToolbars)
  861.             {
  862.             IntItem("0", 0);
  863.             IntItem("1", 1);
  864.             IntItem("2", 2);
  865.             };
  866.             
  867.         IntegerPopup("Toolbars: ", Default, showToolbars)
  868.             {
  869.             IntItem("0", 0);
  870.             IntItem("1", 1);
  871.             IntItem("2", 2);
  872.             };
  873.             
  874.             
  875.         #endif
  876.         } // VList (MainList)
  877.  
  878.  
  879.  
  880. #if Platform_Mac
  881.  
  882.     #if CUSTOMIZABLE_TOOLBARS
  883.     Margin(2,2,2,3, Custom = "HeaderBarMarginProc")
  884.         Margin(1,1,1,1, ToolBack)
  885.             Call(MainList);
  886.     #else 
  887.     Margin(2,2,2,3, Custom = "HeaderBarMarginProc", Width = UseParent)
  888.         Margin(7,4,3,5, ToolBack)
  889.             Call(MainList);
  890.     #endif //!CUSTOMIZABLE_TOOLBARS
  891.  
  892. #else
  893. Define(MainWindowLineSep)
  894.     VList(Width = UseParent, BackColor = Dialog)
  895.         {
  896.         Spacer(Height = 3, Width = UseParent);
  897.         Spacer(Height = 1, Width = UseParent, BackColor = DkGray );
  898.         Spacer(Height = 1, Width = UseParent, BackColor = Black );
  899. }
  900.     VList(ToolBack ,Width = UseParent )
  901.         {
  902.         Margin(4,3,3,0, ToolBack ,Width = UseParent)
  903.             Call(MainList);
  904.             
  905.         #if InDocWindow
  906.         Switch(styleToolbars ,Width = UseParent)
  907.             {
  908.             case 1:
  909.                 Call(MainWindowLineSep);
  910.                 
  911.             default:
  912.                 Switch(showToolbars ,Width = UseParent)
  913.                     {
  914.                     case 1: 
  915.                         Call(MainWindowLineSep);
  916.                             
  917.                     default: 
  918.                         Spacer(Height = 0, Width = 0);
  919.                     } //Inner Switch
  920.             } //Outer Switch
  921.         #else //InDocWindow
  922.         Spacer(Height = 2 ,Width = UseParent);        
  923.         
  924.             #if !Modern_System
  925.             Call(MainWindowLineSep);
  926.             #endif
  927.         
  928.         #endif
  929.         }
  930. #endif //!Platform_Mac
  931.  
  932.  
  933.