#include "StdVPref.txt"
#if Platform_Mac
#define dlogBack BackColor = {56576, 56576, 56576}
#define kTitleFont Font = {Times, 18, {Plain}}
#define kBasicFont Font = {Geneva, 9, {Plain}}
#define kBasicBoldFont Font = {Geneva, 9, {Bold}}
#define kHelpFont Font = {Geneva, 9, {Plain}}
#else
#define dlogBack BackColor = Dialog
#define kBasicFont Font = {"MS Sans Serif", 8, {Plain}}
#define kBasicBoldFont Font = {"MS Sans Serif", 8, {Bold}}
#if Dialog_Pixels == 100
#define kTitleFont Font = {Times, 18, {Plain}}
#define kHelpFont Font = {"MS Sans Serif", 8, {Plain}}
#else
#define kTitleFont Font = {Times, 14, {Plain}}
#define kHelpFont Font = {"MS Sans Serif", 6, {Plain}}
#endif
#endif
#if Dialog_Pixels == 100
#define RightSideHeight 183
#define kHelpViewHeight 28
#define kHelpViewWidth 300
#define CenterLineHeight 200
#define Offset 0
#else
#define RightSideHeight 205
#define kHelpViewHeight 34
#define kHelpViewWidth 370
#define CenterLineHeight 218
#define Offset 5
#endif
#define LeftSideWidth 151
Define(CenterLine)
VList(dlogBack)
{
VSpace(5);
HList()
{
Spacer(Height = CenterLineHeight, Width = 1, BackColor = Gray);
Spacer(Height = CenterLineHeight, Width = 1, BackColor = White);
}
}
/************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
/************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
/************************** 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 "Navigation"
#define kLit2 "Navigational menus provide links to every Web page in your site. Select a location for the menu."
#define kLit4 "Do you also want the menu at the bottom of every page?"
#define kLit6 "Select a location for the Next and Previous buttons."
#define kLit7 "Previous buttons to appear?"
#define kLit8 "Top"
#define kLit9 "Bottom"
#define kLit10 "Left"
#define kLit11 "Right"
#define kLit12 "None"
#define kLit13 "Top"
#define kLit14 "Bottom"
#define kLit15 "None"
#define kLit25 "&Yes"
#define kLit26 "&No"
#define kHelp1 "Click to display a navigational menu at the top of every Web page in your site."
#define kHelp2 "Click to display a navigational menu at the bottom of every Web page in your site."
#define kHelp3 "Click to display a navigational menu on the left side of every Web page in your site."
#define kHelp4 "Click to display a navigational menu on the right side of every Web page in your site."
#define kHelp5 "Click if you don't want navigational menus on your Web pages."
#define kHelp6 "Click to include another menu. Duplicate menus help readers navigate without scrolling back to the top of long Web pages."
#define kHelp7 "Click to display navigational buttons at the top of every Web page in your site."
#define kHelp8 "Click to display navigational buttons at the bottom of every Web page in your site."
#define kHelp9 "Click if you don't want navigational buttons on your Web pages."
#define kHelp10 "Click if you don't want a duplicate navigational menu at the bottom of every Web page."
#define NLLit2 "Navigational menus provide links to every Web page in your newsletter. Select a location for the menu."
/************************** LOCALIZED STRING CONSTANTS END **************************************/
/************************** LOCALIZED STRING CONSTANTS END **************************************/
/************************** LOCALIZED STRING CONSTANTS END **************************************/
/************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
/************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
/************************** 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 cPageEditH 19
#define cPageEditW 35
#define SPACING 16
#define YesNoRadioWidth 40
#define TextStringWidth 300
#if Platform_Mac
#define TextWidth 135
#else
#define TextWidth 140
#endif
/************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
/************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
/************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
//No further localizable data past this point
/************************** END LOCALIZABLE DATA ***************************************************/
/************************** END LOCALIZABLE DATA ***************************************************/
/************************** END LOCALIZABLE DATA ***************************************************/
Define( GenericHeader )
VList(dlogBack)
{
HList() { //title
ImageFileView(ImageFile = "chps001.gif" );
HSpace(5);
VList()
{
VSpace(30);
StaticText(kLit1, kTitleFont); //title text
}
}
}
Define( LeftSide )
HList(dlogBack, Width=LeftSideWidth)
{
HSpace( 30 );
VList()
{
VSpace( 40 );
Switch(LayoutChoice)
{
case 0:
Switch(FormatChoice)
{
case 0:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps301.gif" );
default:
ImageFileView(ImageFile = "chps302.gif" );
}
case 1:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps303.gif" );
default:
ImageFileView(ImageFile = "chps304.gif" );
}
case 2:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps305.gif" );
default:
ImageFileView(ImageFile = "chps306.gif" );
}
}
case 1:
Switch(FormatChoice)
{
case 0:
ImageFileView(ImageFile = "chps311.gif" );
case 1:
ImageFileView(ImageFile = "chps312.gif" );
case 2:
ImageFileView(ImageFile = "chps313.gif" );
}
case 2:
Switch(FormatChoice)
{
case 0:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps321.gif" );
default:
ImageFileView(ImageFile = "chps322.gif" );
}
case 1:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps323.gif" );
default:
ImageFileView(ImageFile = "chps324.gif" );
}
case 2:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps325.gif" );
default:
ImageFileView(ImageFile = "chps326.gif" );
}
}
case 3:
Switch(FormatChoice)
{
case 0:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps331.gif" );
default:
ImageFileView(ImageFile = "chps332.gif" );
}
case 1:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps333.gif" );
default:
ImageFileView(ImageFile = "chps334.gif" );
}
case 2:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps335.gif" );
default:
ImageFileView(ImageFile = "chps336.gif" );
}
}
case 4:
Switch(FormatChoice)
{
case 0:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps341.gif" );
default:
ImageFileView(ImageFile = "chps342.gif" );
}
case 1:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps343.gif" );
default:
ImageFileView(ImageFile = "chps344.gif" );
}
case 2:
Switch(MenuPosition)
{
case 0:
ImageFileView(ImageFile = "chps345.gif" );
default:
ImageFileView(ImageFile = "chps346.gif" );
}
}
default:
ImageFileView(ImageFile = "chps302.gif" );
}
}
}
Define( RightSide )
VList(dlogBack, Height=RightSideHeight)
{
StaticText( kLit2, kBasicFont, Width=TextStringWidth );
VSpace(10);
HList()
{
HSpace(30);
PictRadioButton(LayoutChoice, 0, Width=36, Height=36, EH kHelp1)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps351.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps361.gif" );
};
HSpace(SPACING);
PictRadioButton(LayoutChoice, 1, Width=36, Height=36, EH kHelp2)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps352.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps362.gif" );
};
HSpace(SPACING);
PictRadioButton(LayoutChoice, 2, Width=36, Height=36, EH kHelp3)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps353.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps363.gif" );
};
HSpace(SPACING);
PictRadioButton(LayoutChoice, 3, Width=36, Height=36, EH kHelp4)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps354.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps364.gif" );
};
HSpace(SPACING);
PictRadioButton(LayoutChoice, 4, Width=36, Height=36, EH kHelp5)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps355.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps365.gif" );
};
}
HList()
{
HSpace( 38 );
StaticText( kLit8, kBasicFont );
HSpace( SPACING + 9 - Offset );
StaticText( kLit9, kBasicFont );
HSpace( SPACING + 6 - Offset );
StaticText( kLit10, kBasicFont );
HSpace( SPACING + 12 - Offset );
StaticText( kLit11, kBasicFont );
HSpace( SPACING + 10 - Offset );
StaticText( kLit12, kBasicFont );
}
VSpace(10);
HList()
{
StaticText( kLit4, kBasicFont, Width = TextWidth );
HSpace(20);
VList()
{
VSpace( 5 );
Switch( LayoutChoice ){
case 1:
HList()
{
WidowRadioButton(kLit25, "MenuPosition", 1, kBasicFont, Width = YesNoRadioWidth, Height = 12, dlogBack, EH kHelp6);
WidowRadioButton(kLit26, "MenuPosition", 2, kBasicFont, Width = YesNoRadioWidth, Height = 12, dlogBack, EH kHelp10);
}
default:
HList()
{
WidowRadioButton(kLit25, MenuPosition, 1, kBasicFont, Width = YesNoRadioWidth, Height = 12, dlogBack, EH kHelp6);
WidowRadioButton(kLit26, MenuPosition, 0, kBasicFont, Width = YesNoRadioWidth, Height = 12, dlogBack, EH kHelp10);
}
}
}
}
VSpace(6);
HList()
{
VList()
{
VSpace(8);
StaticText( kLit6, kBasicFont, Width = 160 );
}
HSpace(5);
VList()
{
HList()
{
PictRadioButton(FormatChoice, 0, Width=36, Height=36, EH kHelp7)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps356.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps366.gif" );
};
HSpace(SPACING);
PictRadioButton(FormatChoice, 1, Width=36, Height=36, EH kHelp8)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps357.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps367.gif" );
};
HSpace(SPACING);
PictRadioButton(FormatChoice, 2, Width=36, Height=36, EH kHelp9)
{
Off(Custom = "GifDrawingProc", StringRefcon = "chps355.gif" );
On (Custom = "GifDrawingProc", StringRefcon = "chps365.gif" );
};
}
HList()
{
HSpace( 8-Offset );
StaticText( kLit8, kBasicFont );
HSpace( SPACING + 9-Offset );
StaticText( kLit9, kBasicFont );
HSpace( SPACING + 6-Offset );
StaticText( kLit12, kBasicFont );
}
}
}
}
VList(dlogBack)
{
Call( GenericHeader );
HList()
{
Call( LeftSide );
Call( CenterLine );
HSpace(15);
VList(){
Call( RightSide );
HelpView(Width = kHelpViewWidth, Height = kHelpViewHeight, kHelpFont);
}
}
}