home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1999 March / CDW0399.iso / Demos / HomePage / data1.cab / Program_Executable_Files / Homepage.exe / 1009 / 2012 < prev    next >
Encoding:
Text File  |  1997-12-10  |  8.3 KB  |  304 lines
  1. // -----
  2. // vdl2012.txt
  3. // Copyright 1996 Claris
  4. // -----
  5.  
  6. // SiteStats.txt
  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 kLit2 "HTML Pages: "
  20. #define kLit3 "Total Size(K): "
  21.  
  22. #define kLit5 "Approximate Download Times"
  23.  
  24. #define kLit8 "&Done"
  25.  
  26. #define kLit11 "Site"
  27. #define kLit12 "Selection"
  28. #define kLit13 "14.4 K"
  29. #define kLit14 "28.8 K"
  30. #define kLit15 "33.6 K"
  31. #define kLit16 "56.0 K"
  32. #define kLit17 "ISDN"
  33. #define kLit18 "T1"
  34.  
  35.  
  36. //Localized Fonts
  37. #if Platform_Mac
  38.     #define DisplayFont         { Geneva, 10, {Plain} }
  39.     #define kBoldLabelFont     { Geneva, 10, {Bold} }
  40.     #define kTabLabelFont         {Geneva, 10, {Plain}}    
  41. #else
  42.     #define DisplayFont         SystemFont
  43.     #define kBoldLabelFont     SystemFont
  44.     #define kTabLabelFont         SystemFont
  45. #endif
  46.  
  47. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  48. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  49. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  50.  
  51.  
  52.  
  53. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  54. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  55. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  56.  
  57. //This section contains integer constants that are used to format this VDL program.
  58. //These are localizable - they only need to be changed if the localized strings 
  59. //are sufficiently longer than the US strings. Localize the strings first, then the constants.
  60.  
  61. #if Platform_Mac
  62.     //Width of the labels
  63.     #define kLabelWidth 80    
  64.     #define kDownLoadLableWidth 80
  65.     
  66.     //Width of the displayed values
  67.     #define kValueWidth 80
  68.     
  69.     //Width of the OK Button
  70.     #define kOKButtonWidth 70
  71.     
  72.     #define kValueSeparation 30
  73. #else
  74.  
  75.     //Width of the labels
  76.     #define kLabelWidth 100
  77.     #define kDownLoadLableWidth 80
  78.     
  79.     //Width of the displayed values
  80.     #define kValueWidth 100
  81.     
  82.     //Width of the OK Button
  83.     #define kOKButtonWidth 100
  84.  
  85.     #define kValueSeparation 30
  86.  
  87. #endif
  88.  
  89. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  90. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  91. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  92.  
  93. //No further localizable data past this point
  94.  
  95. /************************** END LOCALIZABLE DATA ***************************************************/
  96. /************************** END LOCALIZABLE DATA ***************************************************/
  97. /************************** END LOCALIZABLE DATA ***************************************************/
  98.  
  99.  
  100. //    DO NOT TOUCH
  101. //    WORK IN PROGRESS
  102. //    - Russ [08.17.97]
  103. //#if Platform_Mac
  104. //    #define dlogBack BackColor = {65535, 65535, 65535}
  105. //#else
  106.     #define dlogBack BackColor = Dialog
  107. //#endif
  108.  
  109.  
  110. Define(SelectionStats)
  111.     VList(TabDialogBack)
  112.     {
  113.         VList()
  114.         {
  115.             HList()
  116.             {
  117.                 StaticText( kLit2, Width = kLabelWidth, Font = DisplayFont, Alignment = Right );
  118.                 StaticText(selNumPages, Font = DisplayFont, Width = kValueWidth );
  119.             }
  120.             Spacer(Height = 5, Width = 0);
  121.             HList()
  122.             {
  123.                 StaticText( kLit3, Width = kLabelWidth, Font = DisplayFont , Alignment = Right);
  124.                 StaticText(selNumBytes, Font = DisplayFont , Width = kValueWidth);
  125.             }
  126.         }
  127.             
  128.         Spacer(Height = 12, Width = 0);
  129.         
  130.         //---- DownLoad Times ----
  131.         Label(kLit5, Single,Font = kBoldLabelFont)
  132.             Margin(5,5,30,5)
  133.                 VList()
  134.                 {
  135.                     
  136.                     HList()
  137.                     {
  138.                         StaticText( kLit13, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  139.                         Spacer(Width = kValueSeparation);
  140.                         StaticText(sel14_4Download,Font = DisplayFont);
  141.                     }//HList
  142.  
  143.                     HList()
  144.                     {
  145.                         StaticText( kLit14, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  146.                         Spacer(Width = kValueSeparation);
  147.                         StaticText(sel28_8Download, Font = DisplayFont);
  148.                     }//HList
  149.  
  150.                     HList()
  151.                     {
  152.                         StaticText( kLit15, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  153.                         Spacer(Width = kValueSeparation);
  154.                         StaticText(sel33_6Download, Font = DisplayFont);
  155.                     }//HList
  156.  
  157.                     HList()
  158.                     {
  159.                         StaticText( kLit16, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  160.                         Spacer(Width = kValueSeparation);
  161.                         StaticText(sel56_0Download, Font = DisplayFont);
  162.                     }//HList
  163.  
  164.                     HList()
  165.                     {
  166.                         StaticText( kLit17, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  167.                         Spacer(Width = kValueSeparation);
  168.                         StaticText(selISDNDownload, Font = DisplayFont);
  169.                     }//HList
  170.  
  171.                     HList()
  172.                     {
  173.                         StaticText( kLit18, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  174.                         Spacer(Width = kValueSeparation);
  175.                         StaticText(selT1Download, Font = DisplayFont);
  176.                     }//HList
  177.  
  178.                 }//VList
  179.     }//VList
  180.  
  181. Define(DocumentStats)
  182.     VList(TabDialogBack)
  183.     {
  184.             
  185.         VList()
  186.         {
  187.             HList()
  188.             {
  189.                 StaticText( kLit2, Width = kLabelWidth, Font = DisplayFont, Alignment = Right );
  190.                 StaticText(siteNumPages, Font = DisplayFont, Width = kValueWidth );
  191.             }//HList
  192.             Spacer(Height = 5, Width = 0);
  193.             HList()
  194.             {
  195.                 StaticText( kLit3, Width = kLabelWidth, Font = DisplayFont , Alignment = Right);
  196.                 StaticText(siteNumBytes, Font = DisplayFont , Width = kValueWidth);
  197.             }//HList
  198.         }//VList
  199.             
  200.         
  201.         Spacer(Height = 12, Width = 0);
  202.         
  203.         //---- DownLoad Times ----
  204.         Label(kLit5, Single,Font = kBoldLabelFont)
  205.             Margin(5,5,30,5)
  206.                 VList()
  207.                 {
  208.                     
  209.                     HList()
  210.                     {
  211.                         StaticText( kLit13, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  212.                         Spacer(Width = kValueSeparation);
  213.                         StaticText(site14_4Download, Font = DisplayFont);
  214.                     }//HList
  215.  
  216.                     HList()
  217.                     {
  218.                         StaticText( kLit14, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  219.                         Spacer(Width = kValueSeparation);
  220.                         StaticText(site28_8Download, Font = DisplayFont);
  221.                     }//HList
  222.  
  223.                     HList()
  224.                     {
  225.                         StaticText( kLit15, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  226.                         Spacer(Width = kValueSeparation);
  227.                         StaticText(site33_6Download, Font = DisplayFont);
  228.                     }//HList
  229.  
  230.                     HList()
  231.                     {
  232.                         StaticText( kLit16, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  233.                         Spacer(Width = kValueSeparation);
  234.                         StaticText(site56_0Download, Font = DisplayFont);
  235.                     }//HList
  236.  
  237.                     HList()
  238.                     {
  239.                         StaticText( kLit17, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  240.                         Spacer(Width = kValueSeparation);
  241.                         StaticText(siteISDNDownload, Font = DisplayFont);
  242.                     }//HList
  243.  
  244.                     HList()
  245.                     {
  246.                         StaticText( kLit18, Width = kDownLoadLableWidth, Font = DisplayFont, Alignment = Right );
  247.                         Spacer(Width = kValueSeparation);
  248.                         StaticText(siteT1Download, Font = DisplayFont);
  249.                     }//HList
  250.  
  251.                 }//VList
  252.         
  253.  
  254.     }//VList
  255.  
  256.  
  257. //---- Tab Main ----
  258. Define(MainList)
  259.     Margin(12,12,12,12)
  260.     VList(TabDialogBack)
  261.     {
  262.     
  263.         Switch (mode)
  264.         {
  265.             case 0:
  266.             default:
  267.                 Margin(0,0,0,0)
  268.                     Call(DocumentStats);
  269.                     
  270.             case 1:
  271.                 Margin(0,0,0,0, Height = UseParent)
  272.                     Call(SelectionStats);
  273.                     
  274.         }//Switch
  275.     }//VList
  276.  
  277.  
  278. //---- Main -----
  279. Margin(10, 10, 10, 10, TabDialogBack)
  280. VList()
  281. {
  282.  
  283.     TabControl(mode, NoUndo,Font = kTabLabelFont)
  284.     {
  285.         Tab(kLit11, 0);     // Document
  286.         Tab(kLit12, 1);     // Selection
  287.         
  288.         Subview:    
  289.             Call(MainList);
  290.     }; //Layout
  291.  
  292.     Spacer(Height = 16, Width = 0);
  293.  
  294.     HList(Width = UseParent)
  295.     {
  296.         Spacer(Width = UseParent, Height = 0);        
  297.         DefaultButton(kLit8, 1071, "None", Width = kOKButtonWidth);
  298.     }
  299.  
  300.  
  301.  
  302. }//VList
  303.  
  304.