home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1999 March / CDW0399.iso / Demos / HomePage / data1.cab / Program_Executable_Files / Homepage.exe / 1009 / 501 < prev    next >
Encoding:
Text File  |  1997-12-10  |  5.1 KB  |  137 lines
  1. // -----
  2. // VDL501.txt
  3. // Copyright 1996 Claris
  4. // -----
  5.  
  6. /* Standard prefix file for Object Editor panels - contains common constants
  7.  * and definitions.
  8.  */
  9.  
  10. #include "StdVPref.txt"
  11.  
  12.  
  13. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  14. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  15. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  16.  
  17. // Localized Fonts
  18.  
  19. #if Platform_Mac
  20.     #define kSmallBold        Font = {Geneva, 10, {Bold}}
  21.     #define kSmallDisplay     Font = {Geneva, 9, {plain}}
  22.     
  23.     #define kPlainFont          Font = {Geneva, 10, {Plain}}
  24.     #define kStaticFont         Font = {Geneva, 10, {Bold}}
  25.     #define kEditFont           Font = {Geneva, 10, {Plain}}
  26.     #define kPopupFont          Font = {Geneva, 10, {Plain}}
  27.     #define kPopupLabelFont LabelFont = {Geneva, 10, {Bold}}
  28.     #define kButtonFont         Font = {Geneva, 10, {Plain}}
  29.     #define kStdLabelFont     LabelFont = {Geneva, 10, {Bold}}
  30.     #define kPlainLabelFont    LabelFont = {Geneva, 10, {Plain}}
  31. #else
  32.     #define kSmallBold        Font = SystemFont
  33.     #define kSmallDisplay     Font = SystemFont
  34.     
  35.     #define kPlainFont          Font = SystemFont
  36.     #define kStaticFont         Font = SystemFont
  37.     #define kEditFont           Font = SystemFont
  38.     #define kPopupFont          Font = SystemFont
  39.     #define kPopupLabelFont LabelFont = SystemFont
  40.     #define kButtonFont      Font = SystemFont
  41.     #define kStdLabelFont     LabelFont = SystemFont
  42.     #define kPlainLabelFont    LabelFont = SystemFont
  43. #endif
  44.  
  45. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  46. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  47. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  48.  
  49.  
  50.  
  51. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  52. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  53. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  54.  
  55. //This section contains integer constants that are used to format this VDL program.
  56. //These are localizable - they only need to be changed if the localized strings 
  57. //are sufficiently longer than the US strings. Localize the strings first, then the constants.
  58.  
  59. #if Platform_Mac
  60.     // MAC
  61.     
  62.     //The width of a standard label. Used to align most of the palette's edit text labels.
  63.     #define LblWidthVal                     81
  64.     
  65.     //The width of some standard-placed edit fields, fields which are small (large fields
  66.     //take their size from the palette width). An example: the "Height" and "Width" edit
  67.     //text in the "Rule" case.
  68.     #define EditWidthVal                 44
  69.  
  70.     //Overall width of the palette itself.
  71.     #define kObjectEditorBaseWidth     305
  72.     
  73.     //Height of the top pane of the editor
  74.     #define kUpperPaneHeight     64
  75.  
  76.     //Width of the "Checked" checkbox in a few of the panes
  77.     #define kCheckedCheckBoxWidth 250
  78.  
  79. #else
  80.     // WINDOWS
  81.     
  82.     //The width of a standard label. Used to align most of the palette's edit text labels
  83.     #define LblWidthVal                     100
  84.     
  85.     //The width of some standard-placed edit fields
  86.     #define EditWidthVal                 45
  87.     
  88.     //Overall width of the palette itself.
  89.     #define kObjectEditorBaseWidth     390
  90.     
  91.     //Height of the top pane of the editor
  92.     #define kUpperPaneHeight     64
  93.     
  94.     //Width of the "Checked" checkbox in a few of the panes
  95.     #define kCheckedCheckBoxWidth 250
  96.  
  97. #endif
  98.  
  99. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  100. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  101. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  102.  
  103. //No further localizable data past this point
  104.  
  105. /************************** END LOCALIZABLE DATA ***************************************************/
  106. /************************** END LOCALIZABLE DATA ***************************************************/
  107. /************************** END LOCALIZABLE DATA ***************************************************/
  108.  
  109.  
  110.  
  111. #define StdLblWidth RightLWid LblWidthVal
  112. #define StdEditWidth Width = (LblWidthVal+EditWidthVal)
  113.  
  114. #define AllowQFlags        BackWhite, DropOnReturn, DropOnEnter, kEditFont, kStdLabelFont
  115. #define SmartPasteFlags AllowQFlags, NoSmartQuotes
  116. #define StdFlags            SmartPasteFlags, NoSmartEdits
  117.  
  118. #define StdHSpace HSpace(6)
  119. #define StdVSpace VSpace(6)
  120.  
  121.  
  122. /*************************************************************************/
  123. /****************************** Subroutines ******************************/
  124. /*************************************************************************/
  125. #define kExtraHTML "E&xtra HTML Attributes:"
  126. #define kExtraHTMLHelp "Specifies extra HTML Attributes."
  127. #define kExtraHTMLHotKey HotKey = "X"
  128.  
  129. Define(ExtraParams)
  130.     VList(UseParWidth, stdBackColor)
  131.     {
  132.         Margin(0,5,0,5)
  133.             StaticText(kExtraHTML, kStaticFont, Alignment = Left, UseParWidth );
  134.         EditText( obj.extraParams, StdLblWidth, UseParWidth, StdFlags, kExtraHTMLHotKey, EH kExtraHTMLHelp );
  135.     }
  136.  
  137.