home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1999 March / CDW0399.iso / Demos / HomePage / data1.cab / Program_Executable_Files / Homepage.exe / 1009 / 2009 < prev    next >
Encoding:
Text File  |  1997-12-10  |  9.8 KB  |  272 lines
  1. // -----
  2. // VDL2009.txt
  3. // Copyright 1997 Claris
  4. // -----
  5. //------------------------------
  6. // ConsolidateOptions.txt
  7. //------------------------------
  8. #include "StdVPref.txt"
  9. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  10. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  11. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  12. //This section contains all localizable string constants for this VDL program. Be sure to 
  13. //include the backslash character at the end of each line of a multi-line string, except for the last line.
  14. //You may also flatten multiline constants into a single line, if you prefer
  15. #define kLit19    "&Before Upload:"
  16. #define kLit20    "&Always consolodate"
  17. #define kLit21    "&Never consolidate"
  18. #define kLit22    "&Prompt me each upload"
  19. #define kLit23    "&Warn about missing files during consolidation"
  20. #define kLit24    "&Consolidate media files:"
  21. #define kLit25    "at the same level as the HTML File"
  22. #define kLit26    "in one media folder for your site"
  23. #define kLit30    "in a separate media folder for every folder in your site"
  24. #define kLit27    "ask me each time"
  25. #define kLit32    "in a separate media folder"
  26. #define kLit28    "&Media folder name:"
  27. #define kLit29    "Co&nsolidate"
  28. #define kLit31    "Cancel"
  29. #define kLit33    "Consolidate &HTML files (anchors)"
  30. #define kLit50    "Consolidate the referenced files."
  31. #define kLit51    "Choice of consolidation policy."
  32. #define kLit52    "During consolidation warn me about media files not found."
  33. #define kLit53    "Where to place the media files when consolidated."
  34. #define kLit54    "Name of the folder to place the media files in."
  35. #define kLit55    "If checked will consolidate HTML files referenced through anchors.\
  36.  This may require performing another consolidation."
  37. //Localized Fonts
  38. #if Platform_Mac
  39.     #define kSmallBoldFont  Font = {Geneva, 10, {Bold}}
  40.     #define kStdLabelFont     LabelFont = {Geneva, 10, {Bold}}
  41.     #define kEditFont           Font = {Geneva, 10, {Plain}}
  42.     #define kHelpFont            Font = {Geneva, 10, {Plain}}
  43. #else    
  44.     #define kSmallBoldFont  Font = SystemFont
  45.     #define kEditFont           Font = SystemFont
  46.     #define kStdLabelFont     LabelFont = SystemFont
  47.     #if Dialog_Pixels == 100
  48.         #define kHelpFont            Font = {"MS Sans Serif", 8, {Plain}}
  49.     #else
  50.         #define kHelpFont         Font = {"MS Sans Serif", 6, {Plain}}
  51.     #endif
  52. #endif
  53. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  54. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  55. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  56. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  57. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  58. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  59. //This section contains integer constants that are used to format this VDL program.
  60. //These are localizable - they only need to be changed if the localized strings 
  61. //are sufficiently longer than the US strings. Localize the strings first, then the constants.
  62. #if Platform_Mac
  63.     //Standard Label width, used for many panes. 
  64.     #define kStandardLabelWidth 86
  65.     //Height of the help view at the bottom of the window
  66.     #define kHelpViewHeight     30
  67.     //Height of the main list (each of the three panes has this height)
  68.     #define kMainDialogHeight     268
  69.     //Width of the main list (each of the two panes has this Width)
  70.     #define kMainDialogWidth     350
  71.     
  72.     // Font for the small push buttons
  73.     #define kSmallButtonFont     Font = {Geneva, 10, {Plain}}
  74.     // Height of each Tab panel
  75.     #define kTabPanelHeight     kMainDialogHeight - 55
  76.     
  77.     // Width of each Tab panel
  78.     #define kTabPanelWidth        kMainDialogWidth - 20
  79.     
  80.     // Width of labels
  81.     #define kFoldeLabelWidth 137
  82.     // Height of spacer replacing folder name item
  83.     #define kFoldeSpacerHeight 16
  84.     #define kSitePopUpWidth 495
  85.     #define kDocPopUpWidth 370
  86.  
  87. #else
  88.     //Standard Label width, used for many panes. 
  89.     #define kStandardLabelWidth 86
  90.     //Height of the help view at the bottom of the window
  91.     #define kHelpViewHeight     30
  92.     //Height of the main list (each of the three panes has this height)
  93.     #define kMainDialogHeight     300
  94.     //Width of the main list (each of the two panes has this Width)
  95.     #define kMainDialogWidth     400
  96.     // Font for the small push buttons
  97.     #define kSmallButtonFont          Font = SystemFont
  98.     // Height of each Tab panel
  99.     #define kTabPanelHeight     kMainDialogHeight - 55
  100.     
  101.     // Width of each Tab panel
  102.     #define kTabPanelWidth        kMainDialogWidth - 20
  103.     // Height of spacer replacing folder name item
  104.     #define kFoldeSpacerHeight 19
  105.     #if Dialog_Pixels == 100
  106.     // Width of labels
  107.     #define kFoldeLabelWidth 111
  108.     #define kSitePopUpWidth 395
  109.     #define kDocPopUpWidth 310
  110.     #else
  111.     // Width of labels
  112.     #define kFoldeLabelWidth 143
  113.     #define kSitePopUpWidth 425
  114.     #define kDocPopUpWidth 335
  115.     #endif
  116. #endif
  117. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  118. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  119. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  120. //No further localizable data past this point
  121. /************************** END LOCALIZABLE DATA ***************************************************/
  122. /************************** END LOCALIZABLE DATA ***************************************************/
  123. /************************** END LOCALIZABLE DATA ***************************************************/
  124. #ifndef FOR_SITE_UPLOAD 
  125. #define FOR_SITE_UPLOAD 0
  126. #endif
  127. #ifndef FOR_REMOTE_SAVE
  128. #define FOR_REMOTE_SAVE 0
  129. #endif
  130. //    DO NOT TOUCH
  131. //    WORK IN PROGRESS
  132. //    - Russ [08.17.97]
  133. //#if Platform_Mac
  134. //    #define dlogBack BackColor = {65535, 65535, 65535}
  135. //#else
  136.     #define dlogBack BackColor = Dialog
  137. //#endif
  138. #define StdLabel LabelWidth = kStandardLabelWidth, LabelAlignment = Right
  139.  // command codes from CommandCode.h
  140. #define ccCancel              1070 
  141. #define ccOK                    1071
  142. // ConsolidatePolicy from SiteDoc.h
  143. #define cpAlways 0
  144. #define cpNever  1
  145. #define cpAskMe  2
  146. // ImageLocPolicy from SiteDoc.h
  147. #define ilWithFile         0
  148. #define ilSiteImagesFolder 1
  149. #define ilAlwaysAsk        2
  150. #define ilSubfolder        3
  151. Define(ConsolidationPolicySettings)
  152.     VList(Height = kTabPanelHeight, Width = kTabPanelWidth, TabDialogBack)
  153.         {
  154.         }//VList
  155. Define(Divider)
  156.     Margin(6,0,3,0,Width = UseParent, stdBackColor)
  157.         VList(Width = UseParent)
  158.             {
  159.             Spacer(Width = 0, Height = 4, ScaleV);
  160.             Spacer(Height = 1, Width = UseParent, BackColor = {20000,20000,20000});
  161.             Spacer(Height = 1, Width = UseParent, BackColor = {62000, 62000, 62000});
  162.             Spacer(Width = 0, Height = 4, ScaleV);
  163.             }
  164. //----------------------------------------------
  165. //    MainView - Top Most view of this dialog
  166. //----------------------------------------------
  167. Margin(10, 10, 10, 10, stdBackColor) 
  168.     VList()
  169.         {    
  170.         Spacer(Height = 10, Width = 0);
  171.         
  172.         /***
  173.         IntegerPopup(kLit19, Default, consolidatePolicy, kSmallBoldFont, 
  174.                      LabelWidth = kFoldeLabelWidth, LabelAlignment = Right, EH kLit51)
  175.               {
  176.            IntItem(kLit20, cpAlways);
  177.            IntItem(kLit21, cpNever);
  178.            IntItem(kLit22, cpAskMe);
  179.             };
  180.         Spacer(Height = 10);    
  181.         ***/
  182.     
  183.         Switch (consolidateDoc)
  184.             {
  185.             case 0:
  186.             default:
  187.                 IntegerPopup(kLit24, Default, imagesPolicy, kSmallBoldFont, EH kLit53, Width=kSitePopUpWidth)
  188.                       {
  189.                    IntItem(kLit25, ilWithFile);
  190.                    IntItem(kLit26, ilSiteImagesFolder);
  191.                    ///IntItem(kLit27, ilAlwaysAsk);
  192.                    IntItem(kLit30, ilSubfolder);
  193.                     };
  194.             case 1: // consolidate site
  195.                 IntegerPopup(kLit24, Default, imagesPolicy, kSmallBoldFont, EH kLit53, Width=kDocPopUpWidth)
  196.                       {
  197.                    IntItem(kLit25, ilWithFile);
  198.                    IntItem(kLit32, ilSubfolder);
  199.                     };
  200.             }//switch
  201.         Spacer(Height = 10);    
  202.     
  203.         Switch (imagesPolicy)
  204.             {
  205.             case 0:
  206.             case 2:
  207.                 Spacer(Height = kFoldeSpacerHeight);    
  208.         //kFolderLabelWidth,350
  209.             default:    
  210.                 Switch(consolidateDoc)
  211.                 {
  212.                     case 0:
  213.                     default:
  214.                 EditText(imagesFolder, BackColor = White,
  215.                         Label = kLit28, LabelWidth = kFoldeLabelWidth, LabelAlignment = Right,
  216.                          kStdLabelFont, kEditFont, NoSmartEdits, Width = kSitePopUpWidth, 
  217.                          NoSmartQuotes, EH kLit54);
  218.                         
  219.                     case 1:
  220.                 EditText(imagesFolder, BackColor = White,
  221.                         Label = kLit28, LabelWidth = kFoldeLabelWidth, LabelAlignment = Right,
  222.                          kStdLabelFont, kEditFont, NoSmartEdits, Width = kDocPopUpWidth, 
  223.                          NoSmartQuotes, EH kLit54);
  224.                         
  225.                 }
  226.             }
  227.         Spacer(Height = 20);
  228.         HList(Width = UseParent)
  229.             {
  230.             Spacer(Width = 70);
  231.             WidowCheckBox(kLit23, checkMissing, kSmallBoldFont, Width = UseParent, Height = 18, EH kLit52);
  232.             }
  233.         Spacer(Height = 5, Width = 0);
  234.         /***
  235.         HList(Width = UseParent)
  236.             {
  237.             Spacer(Width = 70);
  238.             WidowCheckBox(kLit33, scanAnchors, kSmallBoldFont, Width = UseParent, Height = 18, EH kLit55);
  239.             }
  240.         ***/
  241.         
  242.         Call(Divider);
  243.         HelpView(Width = UseParent, Height = kHelpViewHeight, kHelpFont);
  244.         HList(Width = UseParent)
  245.         {
  246.             #if Platform_Mac        
  247.                 Spacer();
  248.                 CancelButton(kLit31, ccCancel, "None", Width = 70);
  249.                 Spacer (Width = 10);
  250.                 DefaultButton(kLit29, ccOK, "None", EH kLit50);
  251.             #else
  252.                 Spacer();
  253.                 DefaultButton(kLit29, ccOK, "None", EH kLit50);
  254.                 Spacer (Width = 10);
  255.                 CancelButton(kLit31, ccCancel, "None", Width = 70);
  256.             #endif
  257.         }
  258.     #ifdef  TryMe
  259.     Call(Divider);
  260.     Spacer(Width = 0, Height = 20);
  261.     HList()
  262.         {
  263.         IntegerPopup("Active Window", Default, consolidateDoc)
  264.             {
  265.             IntItem("Doc", 1);
  266.             IntItem("Site", 0);
  267.             };
  268.         Spacer(Width = 50);
  269.         }
  270.     #endif
  271.     }//VList
  272.