home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1999 March / CDW0399.iso / Demos / HomePage / data1.cab / Program_Executable_Files / Homepage.exe / 1009 / 2020 < prev    next >
Encoding:
Text File  |  1997-12-10  |  5.0 KB  |  130 lines

  1. ///////////////////////////////////////////////////////////////////////////
  2. // NewDialog.txt (VDL 2020)
  3. // AUTHOR: Anthony C. Ard <anthony_ard@claris.com>, 27-Mar-97.
  4. // Copyright 1997 Claris 
  5. #include "StdVPref.txt"
  6. ///////////////////////////////////////////////////////////////////////////
  7. // LOCALIZED STRING CONSTANTS BEGIN
  8. /* This section contains all localizable string constants for this VDL
  9.    program. Be sure to include the backslash character at the end of each
  10.    line of a multi-line string, except for the last line.  You may also
  11.    flatten multiline constants into a single line, if you prefer. */
  12. #define kLit1 "Create &New..."
  13. #define kLit2 "Use &Assistant"
  14. #define kLit3 "Use &Template"
  15. //Note: the file name will probably not change, but the name of the "Help" folder
  16. //probably will. Note that the translated name MUST be 8 chars or less.
  17. #define kHelpURL "Help/Popups.htm"
  18. #define kHelpTitle "&Help"
  19. ///////////////////////////////////////////////////////////////////////////
  20. // LOCALIZED STRING CONSTANTS END
  21. ///////////////////////////////////////////////////////////////////////////
  22. // LOCALIZED NUMERICAL CONSTANTS BEGIN
  23. /* This section contains integer constants that are used to format this VDL
  24.    program. These are localizable - they only need to be changed if the
  25.    localized strings are sufficiently longer than the US strings.  Localize
  26.    the strings first, then the constants. */
  27. #define kDialogThumbnailHeight 166
  28. #define kDialogThumbnailWidth 123
  29. #define kListWindowWidth 250
  30. #define kDescriptionWidth 390
  31. #define kHeightAboveButtons 222
  32.  
  33. #if Platform_Mac
  34. #define TEMPLATE_TITLE_FONT Font = { "Chicago", 12, {Plain} }
  35. #define TEMPLATE_PICKER_FONT Font = { "Chicago", 12, {Plain} }
  36. #define TEMPLATE_HELP_FONT Font   = { "Geneva", 9, {Plain} }
  37. #else
  38. #define TEMPLATE_TITLE_FONT Font = SystemFont
  39. #define TEMPLATE_PICKER_FONT Font = SystemFont
  40. #define TEMPLATE_HELP_FONT Font   = SystemFont
  41. #endif
  42. ///////////////////////////////////////////////////////////////////////////
  43. // LOCALIZED NUMERICAL CONSTANTS END
  44. // No further localizable data past this point.
  45. // END LOCALIZABLE DATA
  46. ///////////////////////////////////////////////////////////////////////////
  47. //    DO NOT TOUCH
  48. //    WORK IN PROGRESS
  49. //    - Russ [08.17.97]
  50. //#if Platform_Mac
  51. //    #define dlogBack BackColor = {65535, 65535, 65535}
  52. //    #define softBack {65535, 65535, 65535}
  53. //#else
  54.     #define dlogBack BackColor = Dialog
  55. //    #define softBack {25000, 25000, 25000}
  56. //#endif
  57. // Eight-pixel margin for entire dialog.
  58. Margin( 8, 8, 8, 8, dlogBack)
  59. VList() {
  60. VList(Height = kHeightAboveButtons) {
  61.         
  62.     HList( Height = kDialogThumbnailHeight ) {
  63.         
  64.         // Thumbnail box.
  65.         Margin( 6, 6, 6, 6, Single, BackColor = {65535, 65535, 65535})
  66.         VList( Height = UseParent , Width = kDialogThumbnailWidth ) {
  67.             GenericView( "NewPageThumnailView", dlogBack);
  68.         }
  69.         
  70.         // Padding.
  71.         Spacer( Width = 16 );
  72.         
  73.         VList( Height = UseParent, Width = kListWindowWidth ) {
  74.             // New page radio button.
  75.             WidowRadioButton( kLit1, NewChoiceType, 0, TEMPLATE_PICKER_FONT, Height = 18 );
  76.             // New frame radio button.
  77.             WidowRadioButton( kLit2, NewChoiceType, 1, TEMPLATE_PICKER_FONT, Height = 18 );
  78.             // New site radio button.
  79.             WidowRadioButton( kLit3, NewChoiceType, 2, TEMPLATE_PICKER_FONT, Height = 18 );
  80.             // Padding.
  81.             Spacer( Height = 8 );
  82.             // List widow.
  83.             Switch (NewChoiceType) {
  84.             case 0:    // Blank.
  85.                 Margin( 2, 2, 2, 2, Single )
  86.                     DynamicTextRadioButtonList( ListAttr = NewFromBlank,
  87.                                                          TitleAttr = NewChoiceTitle,
  88.                                                          ResultAttr = NewFromBlankChoice,
  89.                                                          SetMessage = NewChoiceDescription,
  90.                                                          SetMessageAttr = NewDescriptionCurrent,
  91.                                                          Width = UseParent,
  92.                                                          TEMPLATE_PICKER_FONT,
  93.                                                          BackColor = { 65535, 65535, 65535 } );
  94.             case 1:    // Assistants.
  95.                 Margin( 2, 2, 2, 2, Single )
  96.                     DynamicTextRadioButtonList( ListAttr = NewFromAssistant,
  97.                                                          TitleAttr = NewChoiceTitle,
  98.                                                          ResultAttr = NewFromAssistantChoice,
  99.                                                          SetMessage = NewChoiceDescription,
  100.                                                          SetMessageAttr = NewDescriptionCurrent,
  101.                                                          Width = UseParent,
  102.                                                          TEMPLATE_PICKER_FONT,
  103.                                                          BackColor = { 65535, 65535, 65535 } );
  104.             case 2:    // Templates.
  105.                 Margin( 2, 2, 2, 2, Single )
  106.                     DynamicTextRadioButtonList( ListAttr = NewFromTemplate,
  107.                                                          TitleAttr = NewChoiceTitle,
  108.                                                          ResultAttr = NewFromTemplateChoice,
  109.                                                          SetMessage = NewChoiceDescription,
  110.                                                          SetMessageAttr = NewDescriptionCurrent,
  111.                                                          Width = UseParent,
  112.                                                          TEMPLATE_PICKER_FONT,
  113.                                                          BackColor = { 65535, 65535, 65535 } );
  114.             }
  115.         }
  116.     }
  117.     // Description of current selection.
  118.     Spacer( Height = 8 );
  119.     StaticText( NewDescriptionCurrent, Width = kDescriptionWidth, TEMPLATE_HELP_FONT );
  120.     Spacer( Height = 16 );
  121.     
  122.     }
  123.     // Bottom buttons.
  124.     HList( Width = UseParent ) {
  125.         // Cancel button.
  126.         // OK button.
  127.         StandardDialogButtonsH;
  128.     }
  129. }
  130.