home *** CD-ROM | disk | FTP | other *** search
- // -----
- // VDL159.txt
- // Copyright 1996 Claris
- // -----
- // Menu Edit dialog
- #include "StdVPref.txt"
- /************************** 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 "Item List:"
- #define kLit2 "Item"
- #define kLit5 "Value"
- #define kLit6 "Check"
- #define kLit7 "Add"
- #define kLit8 "Remove"
- #define kLit9 "Specify below"
- #define kLit10 "Get from FileMaker"
- #define kLit11 "Value List:"
-
- //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 Fonts
- #if Platform_Mac
- #define kHelpFont Font = {Geneva, 10, {Plain}}
- #define kStaticTextFont Font = {Geneva, 10, {Plain}}
- #else
- #if Dialog_Pixels == 100
- #define kHelpFont Font = {"MS Sans Serif", 8, {Plain}}
- #else
- #define kHelpFont Font = {"MS Sans Serif", 6, {Plain}}
- #endif
- #define kStaticTextFont Font = SystemFont
- #endif
- /************************** 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.
- //Width of the whole dialog
- #define kDialogMainWidth 360
- #if Platform_Mac
- #define kNumberOfItemsTextWidth 194
- #define kPushButtonWidth 60
- #else
- #define kNumberOfItemsTextWidth 154
- #define kPushButtonWidth 72
- #endif
- //Width of the checkbox
- #define kAllowMultipleSelsWidth 200
- //Margins to the left and right of the checkmark icon at the top left of the
- //list
- #define kCheckIconLeftMargin 16
- #define kCheckIconRightMargin 14
- /************************** 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 ccAddListElement 1303
- #define ccRemoveListElement 1304
- #define dlogBack BackColor = Dialog
- #define softBack {25000, 25000, 25000}
- Margin(10, 10, 10, 10, stdBackColor)
- VList(Width = kDialogMainWidth)
- {
- Spacer (Width = UseParent, Height = 25);
- HList(Width = UseParent,FullyCovered)
- {
- IntegerPopup(kLit11, 55, FMValueSource, Width = 176, Height = 17, kBasicFont, Action = FMValueListProc)
- {
- IntItem(kLit9, 0);
- IntItem(kLit10, 1);
- };
- Spacer(Width = UseParent, Height = UseParent);
- } // HList
-
- Spacer(Width = 0, Height = 10);
-
- VList(Width = UseParent)
- {
- ColumnHeaderList ( MinColWidth = 25,
-
- ColLabel0 = kLit6,
- ColWidth0 = checkedWidth,
- DefaultWidth0 = 40,
-
- ColLabel1 = kLit2,
- ColWidth1 = titleWidth,
- DefaultWidth1 = 72,
-
- ColLabel2 = kLit5,
- ColWidth2 = valueWidth,
- DefaultWidth2 = 100,
- kStaticTextFont, //@ykh 072897 bug fix
- BackColor = {55000, 55000, 55000} ,
- Width = UseParent );
-
-
- VList( Width = UseParent, Height = 80, VScroll,
- BackColor = {65535,65535,65535} )
- {
- // EditText(items, Width = UseParent, Height = 180, NoSmartQuotes);
- PopupItemList(kStaticTextFont); //@ykh 072897 bug fix
- }
-
- }
- Spacer(Height = 8);
-
- HList()
- {
- PushButton(kLit7, ccAddListElement, "None");
- Spacer(Width = 15);
-
- PushButton(kLit8, ccRemoveListElement, "None");
- }
-
-
- Spacer(Height = 5, Width = 0);
- //StandardDialogButtonsHNoReturn;
- HList(Width = UseParent)
- {
- Spacer(Height = 0, Width = 150);
- StandardDialogButtonsHEnterOnly;
- }
- }
-