home *** CD-ROM | disk | FTP | other *** search
- ///////////////////////////////////////////////////////////////////////////
- // NewDialog.txt (VDL 2020)
- // AUTHOR: Anthony C. Ard <anthony_ard@claris.com>, 27-Mar-97.
- // Copyright 1997 Claris
- #include "StdVPref.txt"
- ///////////////////////////////////////////////////////////////////////////
- // LOCALIZED STRING CONSTANTS BEGIN
- /* This section contains all localizable string constants for this VDL
- program. Be sure to include the backslash character at the end of each
- line of a multi-line string, except for the last line. You may also
- flatten multiline constants into a single line, if you prefer. */
- #define kLit1 "Create &New..."
- #define kLit2 "Use &Assistant"
- #define kLit3 "Use &Template"
- //Note: the file name will probably not change, but the name of the "Help" folder
- //probably will. Note that the translated name MUST be 8 chars or less.
- #define kHelpURL "Help/Popups.htm"
- #define kHelpTitle "&Help"
- ///////////////////////////////////////////////////////////////////////////
- // LOCALIZED STRING CONSTANTS END
- ///////////////////////////////////////////////////////////////////////////
- // LOCALIZED NUMERICAL CONSTANTS BEGIN
- /* This section contains integer constants that are used to format this VDL
- program. These are localizable - they only need to be changed if the
- localized strings are sufficiently longer than the US strings. Localize
- the strings first, then the constants. */
- #define kDialogThumbnailHeight 166
- #define kDialogThumbnailWidth 123
- #define kListWindowWidth 250
- #define kDescriptionWidth 390
- #define kHeightAboveButtons 222
-
- #if Platform_Mac
- #define TEMPLATE_TITLE_FONT Font = { "Chicago", 12, {Plain} }
- #define TEMPLATE_PICKER_FONT Font = { "Chicago", 12, {Plain} }
- #define TEMPLATE_HELP_FONT Font = { "Geneva", 9, {Plain} }
- #else
- #define TEMPLATE_TITLE_FONT Font = SystemFont
- #define TEMPLATE_PICKER_FONT Font = SystemFont
- #define TEMPLATE_HELP_FONT Font = SystemFont
- #endif
- ///////////////////////////////////////////////////////////////////////////
- // LOCALIZED NUMERICAL CONSTANTS END
- // No further localizable data past this point.
- // END LOCALIZABLE DATA
- ///////////////////////////////////////////////////////////////////////////
- // DO NOT TOUCH
- // WORK IN PROGRESS
- // - Russ [08.17.97]
- //#if Platform_Mac
- // #define dlogBack BackColor = {65535, 65535, 65535}
- // #define softBack {65535, 65535, 65535}
- //#else
- #define dlogBack BackColor = Dialog
- // #define softBack {25000, 25000, 25000}
- //#endif
- // Eight-pixel margin for entire dialog.
- Margin( 8, 8, 8, 8, dlogBack)
- VList() {
- VList(Height = kHeightAboveButtons) {
-
- HList( Height = kDialogThumbnailHeight ) {
-
- // Thumbnail box.
- Margin( 6, 6, 6, 6, Single, BackColor = {65535, 65535, 65535})
- VList( Height = UseParent , Width = kDialogThumbnailWidth ) {
- GenericView( "NewPageThumnailView", dlogBack);
- }
-
- // Padding.
- Spacer( Width = 16 );
-
- VList( Height = UseParent, Width = kListWindowWidth ) {
- // New page radio button.
- WidowRadioButton( kLit1, NewChoiceType, 0, TEMPLATE_PICKER_FONT, Height = 18 );
- // New frame radio button.
- WidowRadioButton( kLit2, NewChoiceType, 1, TEMPLATE_PICKER_FONT, Height = 18 );
- // New site radio button.
- WidowRadioButton( kLit3, NewChoiceType, 2, TEMPLATE_PICKER_FONT, Height = 18 );
- // Padding.
- Spacer( Height = 8 );
- // List widow.
- Switch (NewChoiceType) {
- case 0: // Blank.
- Margin( 2, 2, 2, 2, Single )
- DynamicTextRadioButtonList( ListAttr = NewFromBlank,
- TitleAttr = NewChoiceTitle,
- ResultAttr = NewFromBlankChoice,
- SetMessage = NewChoiceDescription,
- SetMessageAttr = NewDescriptionCurrent,
- Width = UseParent,
- TEMPLATE_PICKER_FONT,
- BackColor = { 65535, 65535, 65535 } );
- case 1: // Assistants.
- Margin( 2, 2, 2, 2, Single )
- DynamicTextRadioButtonList( ListAttr = NewFromAssistant,
- TitleAttr = NewChoiceTitle,
- ResultAttr = NewFromAssistantChoice,
- SetMessage = NewChoiceDescription,
- SetMessageAttr = NewDescriptionCurrent,
- Width = UseParent,
- TEMPLATE_PICKER_FONT,
- BackColor = { 65535, 65535, 65535 } );
- case 2: // Templates.
- Margin( 2, 2, 2, 2, Single )
- DynamicTextRadioButtonList( ListAttr = NewFromTemplate,
- TitleAttr = NewChoiceTitle,
- ResultAttr = NewFromTemplateChoice,
- SetMessage = NewChoiceDescription,
- SetMessageAttr = NewDescriptionCurrent,
- Width = UseParent,
- TEMPLATE_PICKER_FONT,
- BackColor = { 65535, 65535, 65535 } );
- }
- }
- }
- // Description of current selection.
- Spacer( Height = 8 );
- StaticText( NewDescriptionCurrent, Width = kDescriptionWidth, TEMPLATE_HELP_FONT );
- Spacer( Height = 16 );
-
- }
- // Bottom buttons.
- HList( Width = UseParent ) {
- // Cancel button.
- // OK button.
- StandardDialogButtonsH;
- }
- }
-