home *** CD-ROM | disk | FTP | other *** search
/ CD Ware Multimedia 1999 March / CDW0399.iso / Demos / HomePage / data1.cab / Program_Executable_Files / Homepage.exe / 1009 / 150 < prev    next >
Encoding:
Text File  |  1997-12-10  |  83.7 KB  |  2,649 lines
  1. // -----
  2. // VDL150.txt
  3. // Copyright 1996 Claris
  4. // -----
  5. // Object Editor
  6. #include "ObjEPref.txt"
  7.  
  8. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  9. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  10. /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
  11. //This section contains all localizable string constants for this VDL program. Be sure to 
  12. //include the backslash character at the end of each line of a multi-line string, except for the last line.
  13. //You may also flatten multiline constants into a single line, if you prefer
  14. // NEWLY GENERATED STRING MACROS
  15. #define kLit1 "&Name:"
  16. #if Platform_Mac
  17.     #define kLit2 "Reminder: when using an anchor name in a URL,"\
  18.                                       " add a '#' (e.g. ╥#part2╙ or"\
  19.                                       " ╥mypage#part2╙ for an anchor named part2),"\
  20.                                       " but do not enter the '#' here."
  21. #else
  22.     #define kLit2 "Reminder: when using an anchor name in a URL,"\
  23.                                       " add a '#' (e.g. \"#part2\" or"\
  24.                                       " \"mypage#part2\" for an anchor named part2),"\
  25.                                       " but do not enter the '#' here."
  26. #endif
  27.                                   
  28.                                   
  29. #define kLit3 "Reminder: when using an anchor name in a URL,"\
  30.                                   " add a '#' (e.g. \"#part2\" or"\
  31.                                   " \"mypage#part2\" for an anchor named part2),"\
  32.                                   " but do not enter the '#' here."
  33.                                   
  34. #define kLit5 "&Height:"
  35. #define kLit7 "&Width:"
  36. #define kLit8 "Pixels"
  37. #define kLit9 "Percent"
  38. #define kLit10 "&Original Size"
  39. #define kLit11 "Alt &Label:"
  40. #define kLit12 "&Border:"
  41. #define kLit13 "&Image Map..."
  42. #define kLit14 "&Alignment:"
  43. #define kLit15 "Top"
  44. #define kLit16 "Middle"
  45. //LARGE FONT CHANGE
  46. #if Platform_Mac || Dialog_Pixels==100
  47.     #define kLit17 "Bottom"
  48. #else
  49.     #define kLit17 "Bottom      "
  50. #endif
  51. #define kLit18 "Left"
  52. #define kLit19 "Right"
  53. #define kLit20 "Left and Right alignment are not displayed in Claris"\
  54.                   " Home Page, but will appear in browsers which support this option."
  55. #define kLit21 "&Behavior:"
  56. #define kLit22 "&Picture"
  57. #define kLit23 "Form Submit &Button"
  58. #define kLit24 "Image &Map"
  59. #define kLit25 "&Name:"
  60. #define kLit26 "&Value:"
  61. #define kLit27 "&Checked"
  62. #define kLit28 "&Wrap:"
  63. #define kLit29 "&Rows:"
  64. #define kLit30 "&Columns:"
  65. #define kLit31 "&Size:"
  66. #define kLit32 "&Max Length:"
  67. #define kLit33 "&Items Visible:"
  68. #define kLit34 "E&dit Items..."
  69. #define kLit35 "Allow &Multiple Selections"
  70. //UNUSED kLit36 
  71. #define kLit37 "Action Name:"
  72. #define kLit38 "Use this window to set parameters for an object"\
  73.                     " selected in the front document or library window."\
  74.                     "  (Reset buttons have no settable parameters.)"
  75.                     
  76. #define kLit39 "Cell Settings"
  77. #define kLit40 "Baseline"
  78. #define kLit41 "Sp&an:"
  79. #define kLit42 "Hea&der Cell"
  80. #define kLit43 "&Line Wrap"
  81. #define kLit44 "Spa&n:"
  82. #define kLit45 "&Extra HTML:"
  83. #define kLit46 "&Add Row"
  84. #define kLit47 "Rem&ove Row"
  85. #define kLit48 "A&dd Column"
  86. #define kLit49 "Re&move Column"
  87. #define kLit50 "Spac&ing:"
  88. #define kLit51 "&Padding:"
  89. #define kLit52 "&Name:"
  90. #define kLit53 "L&ocation:"
  91.                   
  92. #define kLit55 "HS&pace:"
  93. #define kLit56 "&VSpace:"
  94. #define kLit57 "&Alternate HTML:"
  95. #define kLit58 "Entry &Name:"
  96. #define kLit59 "Entry &Value:"
  97. #define kLit60 "Stars"
  98. #define kLit61 "&URL:"
  99. #define kLit62 "&Direction:"
  100. #define kLit63 "Vertical"
  101. #define kLit64 "Horizontal"
  102. #define kLit65 "S&crollbars:"
  103. #define kLit66 "Always"
  104. #define kLit67 "Never"
  105. #define kLit68 "Auto"
  106. #define kLit69 "Margin &Width:"
  107. #define kLit70 "Margin &Height:"
  108. #define kLit72 "&Fixed Size"
  109. #define kLit73 "Use this window to set parameters for a selected object."
  110. #define kLit74 "&Browse..."
  111. //LARGE FONT CHANGE
  112. #if Platform_Mac || Dialog_Pixels==100
  113.     #define kLit75 "Center"
  114. #else
  115.     #define kLit75 "Center       "
  116. #endif
  117. #define kLit76 "&Shade"
  118. #define kLit77 "&Edit..."
  119. #define kLit78 "&Clear"
  120. #define kLit79 "Client-Side Image Map:"
  121. #define kLit80 "Server-Side Image Map:"
  122. #if Platform_Mac
  123. // #define kLit81 "Quality:"
  124. #define kLit82 "Controller:"
  125. #else
  126. // #define kLit81 "&Quality:"
  127. #define kLit82 "&Controller:"
  128. #endif
  129. #define kLit83 "Yes"
  130. #define kLit84  "No"
  131. // #define kLit85  "Badge"
  132. //LARGE FONT CHANGE
  133. #if Platform_Mac || Dialog_Pixels==100
  134.     #define kLit86  "(unspecified)"
  135. #else
  136.     #define kLit86  "(unspecified)      "
  137. #endif
  138. // #define kLit87  "Draft"
  139. // #define kLit88  "High"
  140. // #define kLit89  ""
  141. #if Platform_Mac
  142. #define kLit90 "Loop:"
  143. #else
  144. #define kLit90 "&Loop:"
  145. #endif
  146. #define kLit91 "No"
  147. #define kLit92 "Yes"
  148. #define kLit93 "Auto-Reverse"
  149. #if Platform_Mac
  150. #define kLit94 "Auto-play"
  151. #define kLit95 "Plug-in Page:"
  152. // #define kLit96 "Play rate:"
  153. #else
  154. #define kLit94 "&Auto-play"
  155. #define kLit95 "Plug-in &Page:"
  156. // #define kLit96 "Play &rate:"
  157. #endif
  158. #define kLit97 "Basic"
  159. #define kLit98 "Advanced"
  160. #define kLit99 "Both"
  161. #define kLit100 "&Width:"
  162. #define kLit101 "&Height:"
  163. #define kLit102 "Transparency and Interlacing:"
  164. #define kLit103 "&Set..."
  165. #define kLit104 "Table"
  166. #define kLit105 "Cells"
  167. #define kLit106 "Advanced"
  168. #define kLit107 "Alignment"
  169. //#define kLit108 "Horizontal:"
  170. #define kLit109 "&Cell Color:" //Hotkey must match underscored character in this string
  171. #define hotKey109 HotKey = "C"
  172. #define kLit110 "Caption:"
  173. #define kLit111 "&Width:"
  174. #define kLit112 "&Height:"
  175. #if Platform_Mac
  176. #define kLit113 "Border:"
  177. #else
  178. #define kLit113 "B&order:"
  179. #endif
  180. #define kLit114 "Page Displayed in Frame"
  181. #define kLit115 "Frame &Name:"
  182. #define kLit116 "Frame &Width:"
  183. #define kLit117 "Frame &Height:"
  184. #define kLit118 "Content"
  185. #define kLit119 "Appearance"
  186. #define kLit120 "Extended"
  187. #define kLit121 "Cell Image:"
  188. #define kLit122 "&Table Color:" // Hotkey must match underscored character in this string
  189. #define hotKey122 HotKey = "T"
  190. #define kLit123 "Table Image:"
  191. // Caption types    
  192. #define kLit124 "None"
  193. #define kLit125 "Above Table"
  194. #define kLit126 "Below Table"
  195. //@ykh 032497 new applet editor
  196. #define kLit130 "Parameters"
  197. #define kLit131 "&Instance Name"
  198. #define kLit132 "Add"
  199. #define kLit133 "Restore All"
  200. #define kLit134 "Remo&ve"
  201. #define kLit135 "Ed&it Page"
  202. #define kLit136 "H&orizontal Align:"
  203. #define kLit137 "V&ertical Align:"
  204. #define kLit138 "Behavior"
  205. #define kLit139 "Remove"
  206. #define kLit140    "Name"
  207. #define kLit141 "Parameters"
  208. #define kLit142    "Appearance"
  209. #define kLit143    "Extended"
  210. #define kLit150 "Show &Border"
  211. #define kLit151 "Assi&gn File..."
  212. #define kLit152 "B&order Size:"
  213. #define kLit153 "&Row Color:" //Hotkey must match underscored character in this string
  214. #define hotKey153 HotKey = "R"
  215. #define kLit155 "P&ath:"
  216. // For TextArea Wrap types popup
  217. #define kLit156 "Virtual"
  218. //LARGE FONT CHANGE
  219. #if Platform_Mac || Dialog_Pixels==100
  220.     #define kLit157 "Physical"
  221. #else
  222.     #define kLit157 "Physical       "
  223. #endif
  224. #define kLit158 "Off"
  225. //For Line Break text
  226. #define kLit159 "Sorry, there are no settable appearance parameters for line breaks.  Click on the tab labeled \"Extended\" to enter extra parameters."
  227. //    For FileMaker support in tables
  228. #define kLit160 "FileMaker"
  229. #define kLit161 "Start repeating at row:"
  230. #define kLit162 "End repeating at row:"
  231. #define kLit163 "Use as FileMaker results table"
  232. // For PrefColorControl
  233. #define kLitOther "Other..."  // when selected by user, brings up system color picker
  234. #define kLitDefault "Default" // when selected by user, the default color is chosen
  235. #define kLitHelpColorE "Help text for color control"
  236. #define kLitHelpColorD "Help text for color control (disabled)"
  237. #define kHelpTitle "Help"
  238. #define kLit200 "Help Text Will Go Here..."
  239. //Image object editor, Appearance tab
  240. #define kLit201 "Where the image file is stored."
  241. #define kLit202 "Locates another image file."
  242. #define kLit203 "Text that appears in place of the image if a browser does not support images or if your viewer has turned image loading off."
  243. #define kLit204 "Specifies the width of the image."
  244. #define kLit205 "Specifies the image width as a percentage or a fixed amount."
  245. #define kLit206 "Restores a resized image back to its original size."
  246. #define kLit207 "Specifies the height of the image."
  247. #define kLit208 "Specifies the image height as a percentage or a fixed amount."
  248. #define kLit209 "The thickness of the border around the image. A setting of 0 makes the border invisible."
  249. #define kLit210 "Specifies how the image is aligned with text in a line or on the page."
  250. #define kLit211 "Specifies whether to add interlacing or transparency to a GIF image."
  251. #define kLit212 "Specifies the name of the button."
  252. //Image object editor, Behavior tab
  253. #define kLit251 "Image functions as a picture."
  254. #define kLit252 "Image functions as a submit button in a form.  Set the name of the button in the Appearance tab."
  255. #define kLit253 "Image functions as a client-side image map."
  256. #define kLit254 "Adds hotspot links to the client-side image map."
  257. #define kLit255 "Removes the hotspot links in the client-side image map."
  258. //Table object editor, Table tab
  259. #define kLit301 "Specifies the number of rows in the table."
  260. #define kLit302 " Adds a row directly below the selected cell."
  261. #define kLit303 "Removes the selected row and its contents."
  262. #define kLit304 "Specifies the number of columns in the table."
  263. #define kLit305 "Adds a column directly to the right of the selected cell."
  264. #define kLit306 "Removes the selected column and its contents."
  265. #define kLit307 "Specifies the width of the table."
  266. #define kLit308 "Specifies the table width as a percentage, a fixed amount, or automatic fit."
  267. #define kLit309 "Specifies the amount of space between cells."
  268. #define kLit310 "Specifies the height of the table."
  269. #define kLit311 "Specifies the table height as a percentage, a fixed amount, or automatic fit."
  270. #define kLit312 "Specifies the amount of space around the data in cells."
  271. #define kLit313 "Specifies the thickness of the table borders.  A setting of 0 makes the borders invisible."
  272. #define kLit314 "Specifies the background color of the table. "
  273. #define kLit315 "Selects a background image for the table."
  274. #define kLit316 "A sample of the currently selected background image."
  275. #define kLit317 "Removes the background image for the table."
  276. //Table object editor, Cells tab
  277. #define kLit351 "Specifies the width of all cells in the column."
  278. #define kLit352 "Specifies the column width as a percentage, a fixed amount, or automatic fit."
  279. #define kLit353 "Specifies how many columns a cell spans."
  280. #define kLit354 "Specifies the height of all cells in the row."
  281. #define kLit355 "Specifies the row height as a percentage, a fixed amount, or automatic fit."
  282. #define kLit356 "Specifies how many rows a cell spans."
  283. #define kLit357 "Specifies how elements are horizontally aligned within the cells."
  284. #define kLit358 "If checked, text wraps in a cell."
  285. #define kLit359 "Specifies how elements are vertically aligned with the cells."
  286. #define kLit360 "If checked, makes the selected cell a table header cell. Cell text appears in bold face type."
  287. #define kLit361 "Specifies the background color for the cell."
  288. #define kLit362 "Specifies a background image for the cell."
  289. #define kLit363 "A sample of the currently selected background image. "
  290. #define kLit364 "Removes the background image for the cell."
  291. #define kLit365 "Specifies the background color for the row."
  292. //    FileMaker support in tables
  293. #define kLit366 "Specifies the first row of the table that will be repeated when displaying records that result from a search."
  294. #define kLit367 "Specifies the last row of the table that will be repeated when displaying records that result from a search."
  295. #define kLit368 "Sets up this table to be used for displaying records that are the result of a FileMaker database search."
  296. //Applet object editor, Content tab
  297. #define kLit501 "The name of the applet."
  298. #define kLit502 "Where the applet is stored."
  299. #define kLit503 "Locates another applet."
  300. #define kLit504 "Text that appears in place of the applet if a browser does not support applets."
  301. #define kLit505 "Specifies how the applet is aligned with text on the page."
  302. #define kLit506 "Specifies the width of the applet."
  303. #define kLit507 "Specifies the amount of horizontal space around the applet."
  304. #define kLit508 "Specifies the height of the applet."
  305. #define kLit509 "Specifies the amount of vertical space around the applet."
  306. //Applet object editor, Parameters tab
  307. #define kLit551 "The name of the parameter."
  308. #define kLit552 "The value assigned to the parameter.  To edit the value, click in the Value column."
  309. #define kLit553 "Adds a new parameter. A name and value must be entered before another parameter can be added."
  310. #define kLit554 "Removes the selected parameter."
  311. #define kLit555 "Restores names of any deleted default parameters."
  312. //Applet object editor, Extended tab
  313. #define kLit571 "Specify an alternate HTML tag."
  314. #define kLit572 "Specify an applet instance name."
  315. //Plugin object editor, Parameters tab
  316. #define kLit601 "Where the plug-in is stored."
  317. #define kLit602 "Locates another plug-in."
  318. #define kLit603 "Specifies the width of the plug-in."
  319. #define kLit604 "Specifies the plug-in width as a percentage or a fixed amount."
  320. #define kLit605 "Specifies the height of the plug-in."
  321. #define kLit606 "Specifies the plug-in height as a percentage or a fixed amount."
  322. #define kLit607 "The URL for the Web page where the actual plug-in is available for downloading."
  323. //QuickTime Movie object editor, Parameters tab
  324. #define kLit701 "Where the movie is stored."
  325. #define kLit702 "Locates another movie."
  326. #define kLit703 "Specifies the width of the movie."
  327. #define kLit704 "Specifies the movie width as a percentage or a fixed amount.."
  328. #define kLit705 "Restores the size of the movie to its original dimensions."
  329. #define kLit706 "Specifies the height of the movie."
  330. #define kLit707 "Specifies the movie height as a percentage or a fixed amount."
  331. #define kLit708 "Specifies how the movie plays."
  332. #define kLit709 "If checked, the movie automatically plays when the Web page is first opened."
  333. #define kLit710 "Specifies whether or not the movie controller is displayed and how it is controlled."
  334. #define kLit711 "The URL for the Web page where QuickTime software is available for downloading."
  335. //Check Box, Parameters tab
  336. //Also used for Radio Buttons
  337. #define kLit801 "Specifies the name assigned to the item."
  338. #define kLit802 "Specifies the value for the item."
  339. #define kLit803 "If checked, the item on the Web page is selected by default."
  340. //Hidden Form Entry, Parameters tab
  341. #define kLit901 "Specifies the name, such as recipient, assigned to the hidden entry. The requirements of the CGI script may determine the name."
  342. #define kLit902 "Specifies the value, such as an email address, for the hidden entry."
  343. //Password Field, Parameters tab
  344. //see text field
  345. //Pop-up Menu, Appearance tab
  346. #define kLit1101 "Specifies the name assigned to the pop-up menu or scrolling list."
  347. #define kLit1102 "Specifies the number of items visible in the pop-up menu or scrolling list. "
  348. #define kLit1103 "Adds and removes items in the pop-up menu or scrolling list."
  349. #define kLit1104 "If checked, multiple items can be selected in a scrolling list."
  350. //Radio Button, Parameters tab
  351. //see CheckBox
  352. //Reset Button, Parameters tab
  353. //no options in this tab, so no messages
  354. //Submit Button, Parameters tab
  355. #define kLit1301 "Specifies the name assigned to the button. 'Submit' is the default name."
  356. //Text Area, Appearance tab
  357. #define kLit1401 "Specifies the name assigned to the text area."
  358. #define kLit1402 "Specifies the number of rows in the text area."
  359. #define kLit1403 "Specifies the number of columns in the text area."
  360. #define kLit1404 "Specifies the type of wrap in the text area."
  361. //Text Field, Appearance tab
  362. //Also used for Password
  363. #define kLit1501 "Specifies the name assigned to the field."
  364. #define kLit1502 "Specifies the width of the field."
  365. #define kLit1503 "Specifies the maximum number of characters that can be entered in the field."
  366. //Anchor object editor, Name tab
  367. #define kLit1601 "Specifies the name assigned to the anchor."
  368. //Horizontal Rule, Appearance tab
  369. #define kLit1701 "Specifies the thickness of the horizontal rule."
  370. #define kLit1702 "Specifies the length of the horizontal rule."
  371. #define kLit1703 "Specifies the horizontal rule width as a percentage or a fixed amount."
  372. #define kLit1704 "Specifies how the horizontal rule is aligned on the page."
  373. #define kLit1705 "If checked, the horizontal rule has a three-dimensional appearance. If not checked, the horizontal rule is solid."
  374. //Frame object editor, Content tab
  375. #define kLit2101 "Specifies the URL of the Web page in the frame."
  376. #define kLit2102 "Selects an open file or a recent URL."
  377. #define kLit2103 "Assigns a file to the frame."
  378. #define kLit2104 "Opens the file displayed in the frame in Edit Page mode."
  379. #define kLit2105 "Specifies the name assigned to the frame."
  380. //Frame object editor, Appearance tab
  381. #define kLit2151 "Specifies the size of the frame."
  382. #define kLit2152 "Specifies the frame size as a percentage, a fixed amount, or uses all of the remaining space. "
  383. #define kLit2153 "If checked, the frame cannot be resized in the browser."
  384. #define kLit2154 "Specifies the number of pixels the Web page displayed in the frame is indented from the sides of the frame."
  385. #define kLit2155 "Specifies the number of pixels the Web page displayed in the frame is indented from the top and bottom of the frame."
  386. #define kLit2156 "Specifies whether or not the scrollbars are displayed."
  387. #define kLit2157 "If checked, the border of the frame is visible."
  388. //Frame List object editor, Appearance tab
  389. #define kLit2201 "Specifies the orientation of the frames within a frame."
  390. #define kLit2202 "If checked, the border of the frame is visible."
  391. #define kLit2203 "Specifies the width of the border."
  392. // For input type=button
  393. #define kLit2300 "Button value:"
  394. #define kLit2301 "Specifies the name assigned to the button. 'Button' is the default name."
  395. #define kLit2302 "Specifies the value assigned to the button. 'Button' is the default value."
  396. //    Put additional help strings here.
  397. //#define kHelpTitle "Help"
  398. //Note: the file name will probably not change, but the name of the "Help" folder
  399. //probably will. Note that the translated name MUST be 8 chars or less.
  400. #define kHelpURL "Help/Prefs.htm"
  401. //Localized Fonts
  402. #if Platform_Mac
  403.     #define kHelpFont         Font = {Geneva, 10, {Plain}}
  404.     #define kExtentionFont     Font = EditFont
  405.     #define kStaticTextFont Font = {Geneva, 10, {Plain}}
  406.     #define kTabLabelFont     Font = {Geneva, 10, {Plain}}
  407.     #define kControlFont     Font = {Geneva, 10, {Plain}}
  408.     #define kLabelPlainFont LabelFont = {Geneva, 10, {Bold}}
  409. #else
  410.     #if Dialog_Pixels == 100
  411.         #define kHelpFont         Font = {"MS Sans Serif", 8, {Plain}}
  412.         #define kExtentionFont     Font = {"MS Sans Serif", 8, {Plain}}
  413.     #else
  414.         #define kHelpFont         Font = {"MS Sans Serif", 6, {Plain}}
  415.         #define kExtentionFont     Font = {"MS Sans Serif", 6, {Plain}}
  416.     #endif
  417.     #define kStaticTextFont Font = SystemFont
  418.     #define kTabLabelFont     Font = SystemFont
  419.     #define kControlFont     Font = SystemFont
  420.     #define kLabelPlainFont LabelFont = SystemFont
  421. #endif
  422. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  423. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  424. /************************** LOCALIZED STRING CONSTANTS END **************************************/
  425. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  426. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  427. /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
  428. //This section contains integer constants that are used to format this VDL program.
  429. //These are localizable - they only need to be changed if the localized strings 
  430. //are sufficiently longer than the US strings. Localize the strings first, then the constants.
  431. //This can be used to get a popup menu at the bottom of the test window, 
  432. //that will allow you to switch between panes of the editor. 
  433. //CAUTION: It MUST be set to 0 before shipping. DO NOT FORGET TO DO THIS!
  434. #ifdef TryMe
  435.     #define kShowDebugPopup 1
  436. #else
  437.     #define kShowDebugPopup 0
  438. #endif
  439. #if Platform_Mac
  440.     /********** HORIZONTAL RULES PANE ***********/
  441.     
  442.     //Width of the "SHADE" checkbox in the rule pane
  443.     #define kShadeCheckBoxWidth 250
  444.     
  445.     /********** IMAGES PANE ***********/
  446.     
  447.     //This is the width of the 'behavior' popup itself
  448.     #define kImageBehaviorPopupWidth    225
  449.     //This is the width of the 'alignment' popup in the images pane...
  450.     #define kImageAlignPopupWidth      138
  451.     ///...this is the width of the label of that popup, also used for the label of the 
  452.     //'behavior' popup
  453.     #define kImageAlignPopupLWidth      78
  454.     //This is the width of the static text "Client-Side Image Map" and 
  455.     //"Server-Side Image Map"
  456.     #define kImageDataLabelWidth 182 //170 @ykh 071497
  457.     
  458.     /******** POPUP PANE ***********/
  459.     //Width of the "Edit Items" button
  460.     #define kEditItemsButtonWidth 78
  461.     
  462.     //Width of the check box for allow multiple selections
  463.     #define kAllowMultipleSelectionsWidth 280
  464.     
  465.     /******* TABLES PANE **********/
  466.     //These two regulate the width of the edit texts that appear 
  467.     //along the right edge of the middle and bottom pane, so that
  468.     //they will be aligned. Label width is the width of just the label
  469.     //part, and edit width is the width of the overall label-and-edit field.
  470.     #define kTableRightLabelWidth     60
  471.     #define kTableRightEditWidth         100
  472.     
  473.     //Width of the "Alignment" popup menu in the Cell sub-pane of the tables pane.
  474.     //(Check the "Cell" checkbox in the debug controls to see this.
  475.     #define kTableCellAlignmentPopupWidth 154
  476.     
  477.     //The width of the label for this popup
  478.     #define kTableCellAlignmentPopupLabelWidth LblWidthVal + 4
  479.     //Width of the "Header Cell" check box in the Table/Cell subpane
  480.     //If you change this, you may need to change kObjectEditorBaseWidth as well 
  481.     #define kHeaderCellCheckBoxWidth 100
  482.     
  483.     //Some padding in the TableCell pane
  484.     #define kTableCellLeftPadding 107
  485.     
  486.     //Sizes of the Add Row and Remove Row Buttons. Also used for the Column Buttons
  487.     #define kAddRowButtonWidth 80
  488.     #define kRemoveRowButtonWidth 100
  489.         
  490.     //Height of the help view at the bottom of the window
  491.     #define kHelpViewHeight     30
  492.     
  493.     //width of cell alignment popups
  494.     #define kAlignmentPopups 180
  495.  
  496.     /*********** APPLET PANE ***********/
  497.     //Width of the "Alignment" popup in the upper sub-pane of the Applet pane
  498.     #define kAppletAlignmentPopupWidth     150
  499.     //Width of the label and whole edit text field for HSpace and VSpace in the Applet pane
  500.     //Not applicable on windows - the labels are laid out with the standard label width.
  501.     #define kAppletSpaceLabelWidth         55
  502.     #define kAppletSpaceEditWidth         104
  503.     #define kAppletParamButtonWidth            80
  504.     
  505.     
  506.     /*********** QTMOVIE PANE ***********/
  507.     //Width of the "Loop" popup in the upper sub-pane of the QuickTime movie pane
  508.     #define kQTLoopPopupWidth        180
  509.     
  510.     //Width of the label of the "Loop" popup in the upper sub-pane of the 
  511.     //QuickTime movie pane.
  512.     #define kQTLoopPopupLabelWidth      LblWidthVal + 4
  513.     //Width of the "Controller" popup in the lower sub-pane of the QuickTime movie pane
  514.     #define kQTControllerPopupWidth  -1
  515.     
  516.     //Width of the "Quality" popup in the lower sub-pane of the QuickTime movie pane
  517.     // #define kQTQualityPopupWidth     136
  518.     
  519.     //Width of the "Auto-play" check box
  520.     #define kAutoPlayCheckBoxWidth   80
  521.     
  522.     /********* FRAMES PANE ***********/
  523.     //Width of the "Fixed Width" check box
  524.     #define kFixedSizeCheckBoxWidth     80
  525.     //Height of page displayed in frame box
  526.     #define kPageInFrame 70
  527.     
  528.     #if Platform_Mac
  529.     #define kFrameDirectionPopupWidth     170
  530.     #else
  531.     #define kFrameDirectionPopupWidth   160
  532.     #endif
  533.     #define kFrameDirectionLabelWidth     LblWidthVal + 4
  534.     
  535.     /********* Image PANE ***********/
  536.     #define kBehaviorGroupRBWidth    130
  537.     
  538.     /********* Image/Plug-in/QT Movie PANE ***********/
  539.     #define kFilePathEditWidth        160
  540. #else
  541.     //WINDOWS
  542.     
  543.     /********** HORIZONTAL RULES PANE ***********/
  544.     
  545.     //Width of the "SHADE" checkbox in the rule pane
  546.     #define kShadeCheckBoxWidth 200
  547.     /******** POPUP PANE ***********/
  548.     //Width of the "Edit Items" button
  549.     #define kEditItemsButtonWidth 100
  550.     
  551.     //Width of the check box for allow multiple selections
  552.     #define kAllowMultipleSelectionsWidth 280
  553.     /******* IMAGES PANE *********/
  554.     //This is the width of the 'alignment' popup in the images pane...
  555.     #define kImageAlignPopupWidth      175
  556.     ///...this is the width of the label of that popup, also used for the label of the 
  557.     //'behavior' popup
  558.     #define kImageAlignPopupLWidth      103
  559.     
  560.     //This is the width of the 'behavior' popup itself
  561.     #define kImageBehaviorPopupWidth    230
  562.     
  563.     //This is the width of the static text "Client-Side Image Map" and 
  564.     //"Server-Side Image Map"
  565.     #define kImageDataLabelWidth         190 //175 @ykh 071497
  566.     /******* TABLES PANE *********/
  567.     //These two regulate the width of the edit texts that appear 
  568.     //along the right edge of the middle and bottom pane, so that
  569.     //they will be aligned. Label width is the width of just the label
  570.     //part, and edit width is the width of the overall label-and-edit field.
  571.     #define kTableRightLabelWidth 70
  572.     #define kTableRightEditWidth 100
  573.     
  574.     //Width of the "Alignment" popup menu in the Cell sub-pane of the tables pane.
  575.     //(Check the "Cell" checkbox in the debug controls to see this.
  576.     #define kTableCellAlignmentPopupWidth 178
  577.     
  578.     //The width of the label for this popup
  579.     #define kTableCellAlignmentPopupLabelWidth 103
  580.     
  581.     //Width of the "Header Cell" check box in the Table/Cell subpane
  582.     //If you change this, you may need to change kObjectEditorBaseWidth as well 
  583.     #define kHeaderCellCheckBoxWidth 100
  584.     //Some padding in the TableCell pane
  585.     #define kTableCellLeftPadding 107
  586.     
  587.     //Sizes of the Add Row and Remove Row Buttons. Also used for the Column Buttons
  588.     #define kAddRowButtonWidth 70
  589.     #define kRemoveRowButtonWidth 96
  590.     //Height of the help view at the bottom of the window
  591.     #define kHelpViewHeight     30
  592.     
  593.     //width of cell alignment popups
  594.     #if Dialog_Pixels==100
  595.     #define kAlignmentPopups 180
  596.     #else
  597.     #define kAlignmentPopups 205
  598.     #endif
  599.  
  600.     /*********** APPLET PANE ***********/
  601.     //Width of the "Alignment" popup in the upper sub-pane of the Applet pane
  602.     #define kAppletAlignmentPopupWidth 175
  603.     //Width of the label of the "Alignment" popup in the upper sub-pane of the 
  604.     //Applet pane.
  605.     #define kAppletAlignPopupLabelWidth        103
  606.     #define kAppletParamButtonWidth            80
  607.     #define kAppletSpaceLabelWidth         55
  608.     #define kAppletSpaceEditWidth         104
  609.     /*********** QTMOVIE PANE ***********/
  610.     //Width of the "Loop" popup in the upper sub-pane of the QuickTime movie pane
  611.     #define kQTLoopPopupWidth           225
  612.     
  613.     //Width of the "Controller" popup in the lower sub-pane of the QuickTime movie pane
  614.     #define kQTControllerPopupWidth  -1
  615.     
  616.     //Width of the "Quality" popup in the lower sub-pane of the QuickTime movie pane
  617.     // #define kQTQualityPopupWidth     200
  618.     //Width of the label of the "Loop" popup in the upper sub-pane of the 
  619.     //QuickTime movie pane.
  620.     //LARGE FONT CHANGE
  621.     #if Platform_Mac || Dialog_Pixels==100
  622.         #define kQTLoopPopupLabelWidth      103
  623.     #else
  624.         #define kQTLoopPopupLabelWidth 80
  625.     #endif
  626.     
  627.     //Width of the "Auto-play" check box
  628.     #define kAutoPlayCheckBoxWidth      80
  629.     
  630.     /*********** FRAMES PANE ***********/
  631.     //Width of the "Direction" popup in the Frames pane, and the width of it's label.
  632.     #define kFrameDirectionPopupWidth     230
  633.     #define kFrameDirectionLabelWidth     103
  634.     //Width of the "Fixed Width" check box
  635.     #define kFixedSizeCheckBoxWidth         100
  636.     //Height of page displayed in frame box
  637.     #define kPageInFrame 80
  638.     
  639.     /********* Image PANE ***********/
  640.     #define kBehaviorGroupRBWidth    180
  641.     
  642.     /********* Image/Plug-in/QT Movie PANE ***********/
  643.     #define kFilePathEditWidth        210
  644. #endif
  645. //Width of the margin to the left of the comment in the 'anchor' pane.    
  646. #define kAnchorCommentWidth 47
  647. // FRAME Appearance tab label widths
  648. #define kFrameTabHeight                        130
  649. #define kFrameTabWidth                        300
  650. #define kFrameAppearanceLabelWidth        90
  651. #define kFrameAppearanceEditWidth        130
  652. // TABLE tab info
  653. #define kTableTabHeight                     250
  654. #if Platform_Mac
  655. #define kImageTabHeight                     170
  656. #define kQTMovieTabHeight                    160
  657. #define kAppletTabHeight                    190 //@ykh 072997
  658. #else
  659. #define kImageTabHeight                     170
  660. #define kQTMovieTabHeight                    196
  661. #define kAppletTabHeight                    210 //@ykh 072997
  662. #endif
  663. #define kOtherTabHeight                        110
  664. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  665. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  666. /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
  667. //No further localizable data past this point
  668. /************************** END LOCALIZABLE DATA ***************************************************/
  669. /************************** END LOCALIZABLE DATA ***************************************************/
  670. /************************** END LOCALIZABLE DATA ***************************************************/
  671. #define hoAnchor 0
  672. #define hoRule 1
  673. #define hoImage 2
  674. #define hoCheckbox 3
  675. #define hoRadioButton 4
  676. #define hoTextArea 5
  677. #define hoEntryField 6
  678. #define hoPasswordField 7
  679. #define hoSelectionField 8
  680. #define hoSubmitButton 9
  681. #define hoResetButton 10
  682. #define hoButton 11
  683. #define hoLink 12
  684. #define hoPage 13
  685. #define hoText 14
  686. #define hoNone2 15
  687. #define hoTable 16
  688. #define hoApplet 17
  689. #define hoHidden 18
  690. #define hoFrame 19
  691. #define hoBreak 20
  692. #define hoQTMovie 21
  693. #define hoEmbed 22
  694. #define feHList 0
  695. #define feVList 1
  696. #define feLeaf 2
  697. ///////////////////////////////////////////////////////////////////////////
  698. // Line Break
  699. Define (BreakTop)
  700.     VList (stdBackColor) {
  701.         Spacer (Height = 0, Width = kObjectEditorBaseWidth, HScale);
  702.         Margin (5, 5, 5, 10)
  703.             StaticText (kLit159, UseParWidth, Alignment = Center, kPlainFont);
  704.     }
  705. Define (BreakBot)
  706.     VSpace (0);
  707. /*************************************************************************/
  708. /********************************* Anchor ********************************/
  709. /*************************************************************************/
  710. Define(AnchorTop)
  711.     VList(UseParWidth, stdBackColor)
  712.         {
  713.         EditText(obj.name, FilterProc = "AnchorNameFilter", Label = kLit1, StdLblWidth, UseParWidth, StdFlags);
  714.         Margin(kAnchorCommentWidth,5,0,0)
  715.             #if Platform_Mac
  716.                 StaticText( kLit2,
  717.                                   Width = UseParent, kPlainFont, EH kLit1601);
  718.             #else
  719.                 StaticText( kLit3,
  720.                                   Width = UseParent, kPlainFont, EH kLit1601);
  721.             #endif
  722.         }
  723. Define(AnchorBot)
  724.     VSpace(0);
  725. /*************************************************************************/
  726. /********************************** Rule *********************************/
  727. /*************************************************************************/
  728. Define(RuleTop)
  729.     VList(UseParWidth, stdBackColor)
  730.         {
  731.         EditText( obj.size, FilterProc = "RuleHeight", Label = kLit5,
  732.                      StdEditWidth, StdLblWidth, StdFlags, EH kLit1701 );
  733.         StdVSpace;
  734.         HList()
  735.             {
  736.             EditText( obj.width, FilterProc = "RuleWidth", Label = kLit7,
  737.                          StdLblWidth, StdEditWidth, StdFlags, EH kLit1702 );
  738.             StdHSpace;
  739.             IntegerPopup("", 0, obj.wUnit, kPopupFont, Action = ToggleWUnit, EH kLit1703)
  740.                 {
  741.                 IntItem(kLit8, 0);
  742.                 IntItem(kLit9, 1);
  743.                 };
  744.             } // HList
  745.     
  746.         StdVSpace;
  747.         HList()
  748.             {
  749.                 #if Platform_Mac || Dialog_Pixels==100
  750.                     IntegerPopup(kLit14, LblWidthVal+4, obj.hAlign, kPopupFont,     kPopupLabelFont, EH kLit1704)
  751.                 #else
  752.                     IntegerPopup(kLit14, LblWidthVal-20, obj.hAlign, kPopupFont,     kPopupLabelFont, EH kLit1704)
  753.                 #endif
  754.                 {
  755.                 IntItem(kLit18, 0);
  756.                 IntItem(kLit75, 1);
  757.                 IntItem(kLit19, 2);
  758.                 };
  759.             Spacer(Height = 0, Width = 10);
  760.             WidowCheckBox(kLit76, obj.shade, Width = kShadeCheckBoxWidth, Height = 18, kSmallBold, EH kLit1705);
  761.             }
  762.         }
  763. Define(RuleBot)
  764.     VSpace(0);
  765. /*************************************************************************/
  766. /********************************* Image *********************************/
  767. /*************************************************************************/
  768. //@ykh 070997
  769. Define(ImageWidth)
  770.     HList( stdBackColor)
  771.         {
  772.         Tag(ImageWidth)
  773.             EditText( obj.width, FilterProc = "ImageWidthFilter",
  774.                          Prefilter="ImageWidthPrefilter",
  775.                          Label = kLit7, StdLblWidth, StdEditWidth, StdFlags, EH kLit204);
  776.         
  777.         StdHSpace;
  778.         IntegerPopup("", 0, obj.wUnit, kPopupFont, Action = ToggleWUnit, EH kLit205)
  779.             {
  780.             IntItem(kLit8, 0);
  781.             IntItem(kLit9, 1);
  782.             };
  783.         
  784.         }
  785. Define(ImageHeight)
  786.     HList(stdBackColor)
  787.         {
  788.         Tag(ImageHeight)
  789.             EditText( obj.height, FilterProc = "ImageHeightFilter",
  790.                          Prefilter="ImageHeightPrefilter",
  791.                          Label = kLit5, StdLblWidth, StdEditWidth, StdFlags, EH kLit207);
  792.         
  793.         StdHSpace;
  794.         IntegerPopup("", 0, obj.hUnit, kPopupFont, Action = ToggleHUnit, EH kLit208)
  795.             {
  796.             IntItem(kLit8, 0);
  797.             IntItem(kLit9, 1);
  798.             };
  799.         }
  800. //@ykh 070997        
  801. Define(BehaviorGroupBox)
  802.     Margin(15,5,5,5,stdBackColor) //@ykh 071497
  803.     VList()
  804.     {
  805.         #if !LITE_VERSION
  806.         WidowRadioButton(kLit22, obj.pMode, 0, Height = 20, Width = kBehaviorGroupRBWidth, kStaticTextFont, EH kLit251);
  807.         WidowRadioButton(kLit23, obj.pMode, 1, Height = 20, Width = kBehaviorGroupRBWidth, kStaticTextFont, EH kLit252);
  808.         
  809.         HList(UseParent)
  810.         {
  811.             WidowRadioButton(kLit24, obj.pMode, 2, Height = 20, Width = kBehaviorGroupRBWidth, kStaticTextFont, EH kLit253);
  812.             StdHSpace;
  813.             PushButton(kLit77, 3413, "None",  kButtonFont, EH kLit254); // ccEditClientMap
  814.             StdHSpace;
  815.             PushButton(kLit78, 3414, "None",  kButtonFont, EH kLit255); // ccClearClientMap
  816.         }
  817.         #else
  818.         WidowRadioButton(kLit22, obj.pMode, 0, Height = 20, Width = kBehaviorGroupRBWidth, kStaticTextFont, EH kLit251);
  819.         WidowRadioButton(kLit23, obj.pMode, 1, Height = 20, Width = kBehaviorGroupRBWidth, kStaticTextFont, EH kLit252);
  820.         
  821.         HList(UseParent)
  822.         {
  823.             WidowRadioButton(kLit24, ccDisabledCommandCode, 2, Height = 20, Width = kBehaviorGroupRBWidth, kStaticTextFont, EH kLit253);
  824.             StdHSpace;
  825.             PushButton(kLit77, ccDisabledCommandCode, "None",  kButtonFont, EH kLit254);
  826.             StdHSpace;
  827.             PushButton(kLit78, ccDisabledCommandCode, "None",  kButtonFont, EH kLit255); 
  828.         }
  829.         #endif
  830.     }//VList
  831. Define(ImageTop) //Appearance tab
  832.     VList(UseParWidth, stdBackColor)
  833.         {
  834.         //@ykh 080797 begin added
  835.         HList(UseParWidth, stdBackColor)
  836.         {
  837.             EditText(obj.src, FilterProc = "ImageLocationFilter", Label = kLit53, StdLblWidth, Width = (LblWidthVal+kFilePathEditWidth), StdFlags, EH kLit201);
  838.             HSpace(5);
  839.             PushButton( kLit74, 4000, "SelectAImage", kButtonFont, EH kLit202); 
  840.         }
  841.         StdVSpace;
  842.         //@ykh 080797 end
  843.         //Alt Label (if picture/image map) or Name (if form button)
  844.         Switch (obj.pMode)
  845.             {
  846.             case 0:
  847.             case 2:
  848.                 EditText( obj.alt, Label = kLit11, StdLblWidth, UseParWidth,
  849.                              SmartPasteFlags , EH kLit203);
  850.             
  851.             case 1:
  852.                 EditText(obj.name, Label = kLit1, StdLblWidth, UseParWidth, StdFlags, EH kLit212);
  853.             
  854.             default: 
  855.                 VSpace(0);
  856.             }            
  857.         StdVSpace;
  858.         
  859.         //Width and height
  860.         HList(UseParWidth)
  861.             {
  862.             VList()
  863.                 {
  864.                 Call(ImageWidth);
  865.                 StdVSpace;
  866.                 Call(ImageHeight);
  867.                 }
  868.             
  869.             Margin(16, 10, 0, 0)
  870.                 PushButton(kLit10, 3420, "None",  kButtonFont, EH kLit206); // ccResetImageSize
  871.             }
  872.         StdVSpace;
  873.         
  874.         //Border
  875.         HList(UseParWidth)
  876.             {
  877.             EditText( obj.border,
  878.                          FilterProc = "ImageBorderFilter", Prefilter="ImageBorderPrefilter",
  879.                          Label = kLit12, StdLblWidth, StdEditWidth, StdFlags, EH kLit209 );
  880.             Margin(5,2,0,0)
  881.             //StdHSpace;
  882.                 StaticText(kLit8, kStaticFont);
  883.             }
  884.         StdVSpace;
  885.         
  886.         //Alignment
  887.         HList(UseParWidth) //071497
  888.         {
  889.         Margin(7,0,0,0)
  890. //$$$$MR Removed the width to allow the control to be big enough to display "Bottom"
  891. //             Fixes bug 5398
  892.         //LARGE FONT CHANGE
  893.         #if Platform_Mac || Dialog_Pixels==100
  894.             IntegerPopup(kLit14, kImageAlignPopupLWidth, obj.vAlign, kPopupFont, kPopupLabelFont, EH kLit210)
  895.         #else
  896.             IntegerPopup(kLit14, kImageAlignPopupLWidth-28, obj.vAlign, kPopupFont, kPopupLabelFont, EH kLit210)
  897.         #endif
  898.                 {
  899.                 IntItem(kLit15,     0);
  900.                 IntItem(kLit16,     1);
  901.                 IntItem(kLit17,     2);
  902.                 IntItem(kLit18,     3);
  903.                 IntItem(kLit19,      4);
  904.                 };
  905.         }
  906.             
  907.         StdVSpace;
  908.         //Tanasparency and interlacing
  909.         HList(Width = UseParent)
  910.             {
  911.             Margin(0,2,0,0)
  912.                 StaticText(kLit102,  kStaticFont, Alignment = Right, Width = kImageDataLabelWidth, EH kLit211);
  913.             StdHSpace;
  914.             PushButton(kLit103, 3415, "None", Width = 36, kButtonFont, EH kLit211); // ccEditImageData
  915.             }        
  916.         } //Appearance tab
  917.         
  918. Define(ImageBot) //Behavior tab
  919.     VList(stdBackColor, UseParWidth)
  920.         {
  921.         VSpace(20);
  922.         Label(kLit138, Single, kStaticFont, Width = UseParent)
  923.         Call(BehaviorGroupBox);            //@ykh 070997 Display behavior radio buttons
  924.         StdVSpace;        
  925.         } //Behavior tab
  926.         
  927. Define(ImageAdvanced)    //Extended tab
  928.     VList(UseParWidth, stdBackColor)
  929.         {
  930.         StdVSpace;
  931.         VSpace(58);
  932.         Call(ExtraParams);
  933.         //EditText( obj.extraParams, Label = kLit45, RightLWid (LblWidthVal),
  934.         //                 UseParWidth, StdFlags );
  935.         StdVSpace;
  936.         } // Extended tab
  937. /*************************************************************************/
  938. /************************ Check Box & Radio Button ***********************/
  939. /*************************************************************************/
  940. Define(CheckBoxAndRadioButtonTop)
  941.     VList(UseParWidth, stdBackColor)
  942.         {
  943.         EditText(obj.name, Label = kLit25, UseParWidth, StdLblWidth, StdFlags, EH kLit801);
  944.         StdVSpace;
  945.         EditText(obj.value, Label = kLit26, UseParWidth, StdLblWidth, StdFlags, EH kLit802);
  946.         Margin(LblWidthVal+5, 5, 0, 3)
  947.         WidowCheckBox(kLit27, obj.checked, Width = kCheckedCheckBoxWidth, Height = 18, kSmallBold, EH kLit803);
  948.         }
  949. Define(CheckBoxAndRadioButtonBot)
  950.     VSpace(0);
  951. /*************************************************************************/
  952. /******************************* Multiline *******************************/
  953. /*************************************************************************/
  954. Define(MultilineTop)
  955.     VList(UseParWidth, stdBackColor)
  956.         {
  957.         EditText(obj.name, Label = kLit1, UseParWidth, StdLblWidth, StdFlags, EH kLit1401);
  958.         StdVSpace;
  959.         EditText( obj.rows, FilterProc = "TextAreaRows",
  960.                      Label = kLit29, StdEditWidth, StdLblWidth, StdFlags, EH kLit1402 );
  961.         StdVSpace;
  962.         EditText( obj.columns, FilterProc = "TextAreaColumns",
  963.                      Label = kLit30, StdEditWidth, StdLblWidth, StdFlags, EH kLit1403 );
  964.         StdVSpace;
  965.     
  966.         //added by DavidM on 10/2/97  adds wrap popup to text area object editor        
  967.     //LARGE FONT CHANGE
  968.     #if Platform_Mac || Dialog_Pixels==100
  969.         IntegerPopup(kLit28, LblWidthVal, obj.wrap,kControlFont,kLabelPlainFont, EH kLit1404)
  970.     #else
  971.         IntegerPopup(kLit28, LblWidthVal-20, obj.wrap,kControlFont,kLabelPlainFont, EH kLit1404)
  972.     #endif        
  973.         {
  974.             IntItem(kLit156, 0);
  975.             IntItem(kLit157, 1);
  976.             IntItem(kLit158, 2);
  977.         };
  978.         
  979.         }
  980. Define(MultilineBot)
  981.     VSpace(0);
  982. /*************************************************************************/
  983. /******************************** EditText *******************************/
  984. /*************************************************************************/
  985. Define(TextFieldTop)
  986.     VList(UseParWidth, stdBackColor)
  987.         {
  988.         EditText(obj.name, Label = kLit1, UseParWidth, StdLblWidth, StdFlags, EH kLit1501);
  989.         StdVSpace;
  990.         EditText( obj.size, FilterProc = "TextFieldSize", Label = kLit31,
  991.                      StdEditWidth, StdLblWidth, StdFlags, EH kLit1502 );
  992.         StdVSpace;
  993.         EditText( obj.maxLength, FilterProc = "TextFieldMaxLength",
  994.                      Prefilter = "TextFieldPrefilter",
  995.                      Label = kLit32, StdEditWidth, StdLblWidth, StdFlags, EH kLit1503 );
  996.         } // TextFieldTop
  997. Define(TextFieldBot)
  998.     VSpace(0);
  999. /*************************************************************************/
  1000. /********************************* Popup *********************************/
  1001. /*************************************************************************/
  1002. Define(PopupTop)
  1003.     VList(UseParWidth, stdBackColor)
  1004.         {
  1005.         EditText( obj.name, Label = kLit1, UseParWidth, StdLblWidth ,
  1006.                      StdFlags, EH kLit1101 );
  1007.         StdVSpace;
  1008.         HList()
  1009.             {
  1010.             EditText( obj.visCount, FilterProc = "MenuVisCount",
  1011.                          Label = kLit33, StdLblWidth,
  1012.                          StdEditWidth, StdFlags, EH kLit1102 );
  1013.             HSpace(10);
  1014.             
  1015.             #if Platform_Mac
  1016.                 PushButton(kLit34, 3410, "None", Width = kEditItemsButtonWidth, kButtonFont, EH kLit1103); // ccEditPopup
  1017.             #else
  1018.                 PushButton(kLit34, 3410, "None", Width = 100, kButtonFont, EH kLit1103); // ccEditPopup
  1019.             #endif
  1020.             }
  1021.         
  1022.         Margin(LblWidthVal+5, 5, 0, 3)
  1023.             WidowCheckBox( kLit35, obj.allowMult,
  1024.                                   kSmallBold, Width = kAllowMultipleSelectionsWidth, Height = 16, EH kLit1104 );
  1025.         }
  1026. Define(PopupBot)
  1027.     VSpace(0);
  1028. /*************************************************************************/
  1029. /******************************** Buttons ********************************/
  1030. /*************************************************************************/
  1031. Define(SubmitButtonTop)
  1032.     VList(UseParWidth, stdBackColor)
  1033.         {
  1034.         EditText(obj.name, Label = kLit37, UseParWidth, StdLblWidth, StdFlags, EH kLit1301);
  1035.         }
  1036. Define(SubmitButtonBot)
  1037.     VSpace(0);
  1038. Define(ResetButtonTop)
  1039.     Margin(10,18,10,5, stdBackColor)
  1040.         StaticText( kLit38, UseParWidth, Alignment = Center, kPlainFont );
  1041. Define(ResetButtonBot)
  1042.     VSpace(0);
  1043. Define (ButtonButtonTop)
  1044. VList (UseParWidth, stdBackColor) {
  1045.     EditText (obj.value, Label = kLit37, UseParWidth, StdLblWidth, StdFlags,
  1046.               EH kLit2301);
  1047.     EditText (obj.name, Label = kLit2300, UseParWidth, StdLblWidth, StdFlags,
  1048.               EH kLit2302);
  1049. }
  1050. Define (ButtonButtonBot)
  1051.     VSpace (0);
  1052. /*************************************************************************/
  1053. /********************************* Table *********************************/
  1054. /*************************************************************************/
  1055. #if Platform_Mac
  1056.     #define RightEditParams RightLWid kTableRightLabelWidth, Width = kTableRightEditWidth
  1057. #else
  1058.     #define RightEditParams RightLWid kTableRightLabelWidth, Width = kTableRightEditWidth
  1059. #endif
  1060. Define(TableTop)    //    Table Tab
  1061.     VList(UseParWidth, stdBackColor)
  1062.     {
  1063.         //    RowCount - Add/Remove Row
  1064.         HList(UseParWidth)
  1065.         {    
  1066.             EditText( obj.rows, FilterProc = "TableRowCountFilter",
  1067.                           Label = kLit29, RightLWid 60, Width = 105, StdFlags,
  1068.                           EH kLit301 );
  1069.                           
  1070.             Spacer(Width = 10, Height = 0);
  1071.             
  1072.             PushButton(kLit46, 3400, "None", Width = kAddRowButtonWidth, kButtonFont, EH kLit302); // ccAddTableRow
  1073.             StdHSpace;
  1074.             PushButton(kLit47, 3402, "None", Width = kRemoveRowButtonWidth, kButtonFont, EH kLit303); // ccDelTableRow
  1075.         }
  1076.             
  1077.         StdVSpace;
  1078.         
  1079.         //    ColumnCount - Add/Remove Col
  1080.         HList(UseParWidth)
  1081.         {
  1082.             EditText( obj.columns, FilterProc = "TableColCountFilter",
  1083.                          Label = kLit30, RightLWid 60, Width = 105, StdFlags,
  1084.                          EH kLit304 );
  1085.                          
  1086.             Spacer(Width = 10, Height = 0);
  1087.             PushButton(kLit48, 3401, "None", Width = kAddRowButtonWidth, kButtonFont, EH kLit305); // ccAddTableCol
  1088.             StdHSpace;
  1089.             PushButton(kLit49, 3403, "None", Width = kRemoveRowButtonWidth, kButtonFont, EH kLit306); // ccDelTableCol
  1090.         }
  1091.             
  1092.         VSpace(10);
  1093.         
  1094.         //    Table width
  1095.         HList(UseParWidth)
  1096.         {    
  1097.             EditText( obj.width, FilterProc = "TableWidth",
  1098.                          Prefilter="TableWidthPrefilter",
  1099.                          Label = kLit111, RightLWid 60, Width = 105, StdFlags,
  1100.                          EH kLit307 );
  1101.             Margin(10,0,0,0)
  1102.             IntegerPopup("", 0, obj.wUnit, kPopupFont, Action = SetWUnit, EH kLit308)
  1103.             {
  1104.                 IntItem(kLit8,  0);
  1105.                 IntItem(kLit9,  1);
  1106.                 IntItem(kLit68, 2);
  1107.             };    
  1108.                 //GenericView("TableModeViewProc", Attribute = obj.wUnit, EH kLit200);
  1109.             Spacer(Width = 20, Height = 0);
  1110.             EditText( obj.cellSpacing, 
  1111.                          FilterProc = "CellSpacing",
  1112.                          Label = kLit50, 
  1113.                          RightLWid 50, Width = 95,
  1114.                          StdFlags,
  1115.                          EH kLit309 );
  1116.         }
  1117.             
  1118.         VSpace(5);
  1119.         //    Table height        
  1120.         HList(UseParWidth)
  1121.         {
  1122.             EditText( obj.height, FilterProc = "TableHeight",
  1123.                          Prefilter="TableHeightPrefilter",
  1124.                          Label = kLit112, RightLWid 60, Width = 105, StdFlags,
  1125.                          EH kLit310 );
  1126.             Margin(10,0,0,0)
  1127.             IntegerPopup("", 0, obj.hUnit, kPopupFont, Action = SetHUnit, EH kLit311)
  1128.             {
  1129.                 IntItem(kLit8,  0);
  1130.                 IntItem(kLit9,  1);
  1131.                 IntItem(kLit68, 2);
  1132.             };    
  1133.                 //GenericView("TableModeViewProc", Attribute = obj.hUnit, EH kLit200);
  1134.             Spacer(Width = 20, Height = 0);
  1135.             EditText( obj.cellPadding, 
  1136.                          FilterProc = "CellPadding",
  1137.                          Label = kLit51, 
  1138.                          RightLWid 50, Width = 95,
  1139.                          StdFlags,
  1140.                          EH kLit312 );
  1141.         }
  1142.             
  1143.         VSpace(10);
  1144.         
  1145.         //    Table border and caption
  1146.         HList(UseParWidth)
  1147.         {
  1148.             EditText( obj.border, FilterProc = "TableBorder",
  1149.                          Prefilter="TableBorderPrefilter",
  1150.                          Label = kLit12, RightLWid 60, Width = 105, StdFlags,
  1151.                          EH kLit313 );
  1152.             StdHSpace;
  1153.             //StaticText( kLit110, Width = 60, Alignment = Right, EH kLit200);
  1154.             //StdHSpace;
  1155.             //IntegerPopup("", 0, obj.caption, kPopupFont, Action = ToggleCaptionUnit, EH kLit200)
  1156.             //{
  1157.             //    IntItem(kLit124,  0);
  1158.             //    IntItem(kLit125,  1);
  1159.             //    IntItem(kLit126,  2);
  1160.             //};    
  1161.         }
  1162.         VSpace(10);
  1163.         
  1164.         // Table Color and Table Image
  1165.         HList(UseParWidth,stdBackColor)
  1166.         {
  1167.             VList()
  1168.             {
  1169.                 Spacer(Width = 0, Height = 12);
  1170.                 HList()
  1171.                 {
  1172.                     // Table Color
  1173.                     StaticText( kLit122, Width = 80, kStaticFont, Alignment = Right, EH kLit314);
  1174.                     Spacer(Width = 4, Height = 0);
  1175.                     GenericView("PrefColorControl",
  1176.                         Red = obj.backColorR, Green = obj.backColorG, Blue = obj.backColorB,
  1177.                         Label = kLit41, Width = 21, Height = 15, hotKey122,
  1178.                         ExtraString = kLitOther,
  1179.                         DefaultString = kLitDefault,
  1180.                         EnabledHelpString = kLit314,
  1181.                         DisabledHelpString = kLit314 );
  1182.                 
  1183.                     //HSpace(10);
  1184.                 
  1185.                     // Table Image
  1186.                     StaticText( kLit123, Width = 90, kStaticFont, Alignment = Right, EH kLit316);
  1187.                     Spacer(Width = 4, Height = 0);
  1188.                 }
  1189.             }
  1190.             
  1191.             //Spacer(Width = 5, Height = 0);
  1192.             HList()
  1193.             {
  1194.                 VList()
  1195.                 {
  1196.                     PushButton( kLit103, 3404, "None", Width = 50, kButtonFont, EH kLit315 );
  1197.                     StdVSpace;
  1198.                     PushButton( kLit134, 3405, "None", Width = 50, kButtonFont, EH kLit317 );
  1199.                 }
  1200.                 StdHSpace;
  1201.                 Margin(2,2,2,2, Single, Width=40, Height = 40)
  1202.                     GenericView( "TableBackPict", EH kLit316 );
  1203.             }
  1204.         }
  1205.         StdVSpace;
  1206.         Call(ExtraParams);
  1207.         //EditText( obj.extraParams, Label = kLit45,
  1208.         //                StdLblWidth, UseParWidth, StdFlags);
  1209.     } // TableTop
  1210.     
  1211. #define CellLabelWidth    LabelAlignment = Right, LabelWidth = 90
  1212. #define CellEditWidth    Width = 90 + 44
  1213. Define(TableBot)    //    Cell Tab
  1214.     VList(UseParWidth, stdBackColor)
  1215.     {
  1216.         //    Column Width
  1217.         Label( "Column", Single, Height = 40, kStaticFont, UseParWidth)
  1218.         VList(UseParWidth)
  1219.         {
  1220.             HList(UseParWidth)
  1221.             {
  1222.                 Spacer(Width = 20);
  1223.                 EditText( widthObj.size, FilterProc = "ColWidth",
  1224.                              Prefilter = "CellSizePrefilter", Label = kLit100,
  1225.                              StdLabelWidth, Width = 90, StdFlags, kPlainLabelFont,
  1226.                              EH kLit351);
  1227.                 StdHSpace;
  1228.                 IntegerPopup("", 0, widthObj.units, kPopupFont, Action = SetColWUnit, EH kLit352)
  1229.                 {
  1230.                     IntItem(kLit8,  0);
  1231.                     IntItem(kLit9,  1);
  1232.                     IntItem(kLit68, 2);
  1233.                 };
  1234.                 
  1235.                 Switch(multiSelect)
  1236.                 {
  1237.                     case 0:
  1238.                         HList(UseParWidth)
  1239.                         {
  1240.                             //    Column span
  1241.                             Spacer(Width = 20);
  1242.                             EditText( cell.colSpan, FilterProc = "TableColSpanFilter",
  1243.                                  Label = kLit44, StdLabelWidth, Width = 90, StdFlags, kPlainLabelFont,
  1244.                                  EH kLit353);
  1245.                         }
  1246.                     
  1247.                     default:
  1248.                         HSpace(0);
  1249.                 }
  1250.             }
  1251.         }
  1252.                 
  1253.         StdVSpace;
  1254.         
  1255.         //    Row Height
  1256.         Label( "Row", Single, Height = 40, kStaticFont, UseParWidth)
  1257.         VList(UseParWidth)
  1258.         {
  1259.             HList(UseParWidth)
  1260.             {
  1261.                 Spacer(Width = 20);
  1262.                 EditText( heightObj.size, FilterProc = "RowHeight",
  1263.                              Prefilter = "CellSizePrefilter", Label = kLit101,
  1264.                              StdLabelWidth, Width = 90, StdFlags, kPlainLabelFont,
  1265.                              EH kLit354);
  1266.                 StdHSpace;
  1267.                 IntegerPopup("", 0, heightObj.units, kPopupFont, Action = SetRowHUnit, EH kLit355)
  1268.                 {
  1269.                     IntItem(kLit8,  0);
  1270.                     IntItem(kLit9,  1);
  1271.                     IntItem(kLit68, 2);
  1272.                 };
  1273.                 
  1274.                 Switch(multiSelect)
  1275.                 {
  1276.                     case 0:
  1277.                         HList(UseParWidth)
  1278.                         {
  1279.                             // Row span
  1280.                             Spacer(Width = 20);
  1281.                             EditText( cell.rowSpan, FilterProc = "TableRowSpanFilter",
  1282.                                  Label = kLit41, StdLabelWidth, Width = 90, StdFlags, kPlainLabelFont,
  1283.                                  EH kLit356);
  1284.                         }
  1285.                             
  1286.                     default:
  1287.                         HSpace(0);
  1288.                 }
  1289.             }
  1290.         }
  1291.         
  1292.         StdVSpace;
  1293.         
  1294.         //    Alignment - Horizontal/Vertical
  1295.         VList(UseParWidth)
  1296.         {
  1297.             HList()
  1298.             {
  1299.                 StdVSpace;
  1300.                 IntegerPopup( kLit136, 110, cell.hAlign, Width = kAlignmentPopups,
  1301.                                 kPopupFont, kPopupLabelFont, EH kLit357)
  1302.                 {
  1303.                     IntItem(kLit18, 0);
  1304.                     IntItem(kLit75, 1);
  1305.                     IntItem(kLit19, 2);
  1306.                 };
  1307.                 
  1308.                 Spacer(Width = 20);
  1309.                 WidowCheckBox(kLit43, cell.linewrap, Height = 18, kSmallBold, Width = kHeaderCellCheckBoxWidth, EH kLit358);
  1310.                 //Spacer(Width = 0);
  1311.             }
  1312.             
  1313.             StdVSpace;
  1314.  
  1315.             HList()
  1316.             {
  1317.                 IntegerPopup( kLit137, 110, cell.vAlign, Width = kAlignmentPopups,
  1318.                                 kPopupFont, kPopupLabelFont, EH kLit359)
  1319.                 {
  1320.                     IntItem(kLit15, 0);
  1321.                     IntItem(kLit16, 1);
  1322.                     IntItem(kLit17, 2);
  1323.                     IntItem(kLit40, 3);
  1324.                 };
  1325.                 Spacer(Width = 20);
  1326.                 WidowCheckBox(kLit42, cell.type, Height = 18, kSmallBold, Width = kHeaderCellCheckBoxWidth, EH kLit360);
  1327.             }
  1328.         }
  1329.         
  1330.         
  1331.         VSpace(10);
  1332.         // Cell Color and Cell Image
  1333.         HList(UseParWidth,stdBackColor)
  1334.         {
  1335.             VList()
  1336.             {
  1337.                 //VSpace(2);
  1338.                 HList()
  1339.                 {
  1340.                     // Cell Color
  1341.                     StaticText( kLit109, Width = 80, kStaticFont, Alignment = Right,EH kLit361);
  1342.                     Spacer(Width = 4, Height = 0);
  1343.                     GenericView("PrefColorControl",
  1344.                         Red = cell.backColorR, Green = cell.backColorG, Blue = cell.backColorB,
  1345.                         Label = kLit41, Width = 21, Height = 15, hotKey109,
  1346.                         ExtraString = kLitOther,
  1347.                         DefaultString = kLitDefault,
  1348.                         EnabledHelpString = kLit361,
  1349.                         DisabledHelpString = kLit361 );
  1350.                 }
  1351.                 
  1352.                 VSpace(10);
  1353.                 
  1354.                 HList()
  1355.                 {
  1356.                     // CellRow Color
  1357.                     StaticText( kLit153, Width = 80, kStaticFont, Alignment = Right,EH kLit365);
  1358.                     Spacer(Width = 4, Height = 0);
  1359.                     GenericView("PrefColorControl",
  1360.                         Red = colorObj.backColorR, Green = colorObj.backColorG, Blue = colorObj.backColorB,
  1361.                         Label = kLit41, Width = 21, Height = 15, hotKey153,
  1362.                         ExtraString = kLitOther,
  1363.                         DefaultString = kLitDefault,
  1364.                         EnabledHelpString = kLit365,
  1365.                         DisabledHelpString = kLit365 );
  1366.                 }
  1367.             }
  1368.             
  1369.             VList()
  1370.             {
  1371.                 Spacer(Width = 0, Height = 12);
  1372.                 HList()
  1373.                 {
  1374.                     // Cell Image
  1375.                     StaticText( kLit121, Width = 90, kStaticFont, Alignment = Right, EH kLit363);
  1376.                     Spacer(Width = 4, Height = 0);
  1377.                 }
  1378.             }
  1379.             
  1380.             //Spacer(Width = 5, Height = 0);
  1381.             HList()
  1382.             {
  1383.                 VList()
  1384.                 {
  1385.                     PushButton( kLit103, 3406, "None", Width = 50, kButtonFont, EH kLit362 );
  1386.                     StdVSpace;
  1387.                     PushButton( kLit134, 3407, "None", Width = 50, kButtonFont, EH kLit364 );
  1388.                 }
  1389.                 StdHSpace;
  1390.                 Margin(2,2,2,2, Single, Width=40, Height = 40)
  1391.                     GenericView( "CellBackPict", EH kLit363 );
  1392.             }
  1393.         }
  1394.         StdVSpace;
  1395.         //Call(ExtraParams);
  1396.         Margin(0,5,0,5)
  1397.             StaticText(kExtraHTML, kStaticFont, Alignment = Left, UseParWidth );
  1398.         EditText( cell.extraParams, StdLblWidth, UseParWidth, StdFlags, kExtraHTMLHotKey, EH kExtraHTMLHelp );
  1399.         //EditText( cell.extraParams, Label = kLit45,
  1400.         //                StdLblWidth, UseParWidth, StdFlags, EH kLit200 );
  1401. } // TableBot
  1402. Define(TableAdvanced)    //    Advanced tab
  1403.     VList(UseParWidth, stdBackColor)
  1404.     {
  1405.         VSpace(10);
  1406.         
  1407.         VList(UseParWidth)
  1408.         {
  1409.             HList()
  1410.             {
  1411.                 HSpace(30);
  1412.             
  1413.                 WidowCheckBox(kLit163, obj.fileMakerPresent, Height = 18, kSmallBold, Width = 200, EH kLit368);
  1414.             }
  1415.             
  1416.             StdVSpace;
  1417.             StdVSpace;
  1418.             
  1419.             HList()
  1420.             {
  1421.                 HSpace(30);
  1422.                 
  1423.                 EditText(    obj.recordBeginRow,
  1424.                             FilterProc    = "RecordBeginRow",
  1425.                             Prefilter    = "RecordPrefilter",
  1426.                             LabelAlignment = Right,
  1427.                             Label = kLit161, LabelWidth = 140,
  1428.                             Width = 220, StdFlags, EH kLit366);
  1429.             }
  1430.         
  1431.             StdVSpace;
  1432.             HList()
  1433.             {
  1434.                 HSpace(30);    
  1435.                 EditText(    obj.recordEndRow,
  1436.                             FilterProc    = "RecordEndRow",
  1437.                             Prefilter    = "RecordPrefilter",
  1438.                             LabelAlignment = Right,
  1439.                             Label = kLit162, LabelWidth = 140,
  1440.                             Width = 220, StdFlags, EH kLit367);
  1441.             }
  1442.             StdVSpace;
  1443.             StdVSpace;
  1444.         }
  1445.     } // TableCell
  1446. /*************************************************************************/
  1447. /********************************* Applet ********************************/
  1448. /*************************************************************************/
  1449. Define(AppletTop) //Basic tab
  1450.     VList(UseParWidth, stdBackColor)
  1451.         {
  1452.         EditText(obj.code, FilterProc = "AppletCodenameFilter", Label = kLit52, StdLblWidth, UseParWidth, StdFlags, EH kLit501);
  1453.         StdVSpace;
  1454.         EditText(obj.codebase, FilterProc = "AppletCodebaseFilter", Label = kLit53, StdLblWidth, UseParWidth, StdFlags, EH kLit502);
  1455.         StdVSpace;
  1456.         HList(UseParWidth, stdBackColor)
  1457.             {
  1458.             HSpace(LblWidthVal + 6);
  1459.             PushButton( kLit74, 5010, "SelectApplet", kButtonFont, EH kLit503); //5010==ccSelectApplet
  1460.             }
  1461.         StdVSpace;
  1462.         EditText( obj.alt, Label = kLit11, StdLblWidth, UseParWidth,
  1463.                      SmartPasteFlags, EH kLit504 ); // AllowQFlags
  1464.         StdVSpace;
  1465.     //LARGE FONT CHANGE
  1466.     #if Platform_Mac || Dialog_Pixels==100
  1467.         IntegerPopup(kLit14, LblWidthVal + 4, obj.vAlign, Width = kAppletAlignmentPopupWidth , kPopupFont, kPopupLabelFont, EH kLit505)
  1468.     #else
  1469.         IntegerPopup(kLit14, LblWidthVal - 20, obj.vAlign, Width = kAppletAlignmentPopupWidth , kPopupFont, kPopupLabelFont, EH kLit505)
  1470.     #endif
  1471.             {
  1472.             IntItem(kLit15,    0);
  1473.             IntItem(kLit16, 1);
  1474.             IntItem(kLit17, 2);
  1475.             IntItem(kLit18,   3);
  1476.             IntItem(kLit19,  4);
  1477.             };
  1478.         
  1479.         // Display a warning for use of Left or Right alignment.
  1480.         #ifdef OBSOLETE // Left and right alignment are now supported.
  1481.             Switch (obj.vAlign)
  1482.                 {
  1483.                 case 3:
  1484.                 case 4:
  1485.                     Margin(10, 6, 4, 0, UseParWidth)
  1486.                         StaticText( kLit20,
  1487.                                     #if Platform_Mac
  1488.                                           Font = {Geneva, 9, {plain}}, UseParWidth );
  1489.                                     #else
  1490.                                           Font = SystemFont, UseParWidth );
  1491.                                     #endif
  1492.                 
  1493.                 default:
  1494.                     VSpace(0);
  1495.                 }
  1496.         #endif // OBSOLETE
  1497.         
  1498.         //@ykh 032497 begin new applet editor
  1499.         StdVSpace;        
  1500.         HList(UseParWidth, stdBackColor)
  1501.             {    
  1502.             EditText( obj.width, FilterProc = "AppletWidth",
  1503.                          Label = kLit7, StdLblWidth, StdEditWidth, StdFlags, EH kLit506 );
  1504.             
  1505.             HSpace(3);
  1506.             //@ykh 072997 replaced 
  1507.             //IntegerPopup("", 0, obj.wUnit, kPopupFont, Action = ToggleWUnit)
  1508.             //    {
  1509.             //    IntItem(kLit8, 0);
  1510.             //    IntItem(kLit9, 1);
  1511.             //    };
  1512.             //with
  1513.             VList(UseParWidth, stdBackColor)
  1514.             {
  1515.                 VSpace(2);
  1516.                 StaticText(kLit8, kStaticFont);
  1517.             }
  1518.             
  1519.             //@ykh In chp2.0, mac and wnd are different. Why?
  1520.             //#if Platform_Mac
  1521.                 EditText( obj.hSpace, FilterProc = "AppletHSpace",
  1522.                              Label = kLit55, RightLWid kAppletSpaceLabelWidth, Width = kAppletSpaceEditWidth, StdFlags, EH kLit507 );
  1523.             //#endif
  1524.             } // AppletWidth
  1525.         
  1526.         StdVSpace;
  1527.         HList(UseParWidth, stdBackColor)
  1528.             {
  1529.             EditText( obj.height, FilterProc = "AppletHeight",
  1530.                          Label = kLit5, StdLblWidth, StdEditWidth, StdFlags, EH kLit508 );
  1531.             
  1532.             HSpace(3);
  1533.             //@ykh 072997 replaced 
  1534.             //IntegerPopup("", 0, obj.hUnit, kPopupFont, Action = ToggleHUnit)
  1535.             //    {
  1536.             //    IntItem(kLit8, 0);
  1537.             //    IntItem(kLit9, 1);
  1538.             //    };
  1539.             //with
  1540.             VList(UseParWidth, stdBackColor)
  1541.             {
  1542.                 VSpace(2);
  1543.                 StaticText(kLit8, kStaticFont);
  1544.             }
  1545.             
  1546.             //@ykh In chp2.0, mac and wnd are different. Why?
  1547.             //#if Platform_Mac
  1548.                 EditText( obj.vSpace, FilterProc = "AppletVSpace",
  1549.                              Label = kLit56, RightLWid kAppletSpaceLabelWidth, Width = kAppletSpaceEditWidth, StdFlags, EH kLit509 );
  1550.             //#endif
  1551.             } // AppletHeight
  1552.         //@ykh 022797 end new applet editor
  1553.         
  1554.         } // AppletTop
  1555. Define(AppletAdvanced)    //Extended tab
  1556.     VList(UseParWidth, stdBackColor)
  1557.         {
  1558.         StdVSpace;
  1559.         VSpace(42);
  1560.         Call(ExtraParams);
  1561.         //EditText( obj.extraParams, Label = kLit45, RightLWid (LblWidthVal+18),
  1562.         //                 UseParWidth, StdFlags );
  1563.         StdVSpace;
  1564.         EditText( obj.name, Label = kLit131, RightLWid (LblWidthVal+18),
  1565.                          UseParWidth, StdFlags, EH kLit572 );
  1566.         StdVSpace;
  1567.         EditText( obj.content, Label = kLit57, RightLWid (LblWidthVal+18),
  1568.                          UseParWidth, StdFlags, EH kLit571 ); // AllowQFlags
  1569.         StdVSpace;
  1570.         } // Extended tab
  1571. //@ykh 022797 begin new applet editor
  1572. Define(AppletBot)    //Parameters tab
  1573.     VList(UseParWidth, stdBackColor)
  1574.         {
  1575.         StdVSpace;
  1576.         ColumnHeaderList (    MinColWidth  = 50, 
  1577.      
  1578.                                 ColLabel0 = "Name",               
  1579.                                 ColWidth0 = AppletNameWidth,           
  1580.                                 DefaultWidth0 = 90, 
  1581.                                 
  1582.                                 ColLabel1 = "Value",               
  1583.                                 ColWidth1 = AppletValueWidth,           
  1584.                                 DefaultWidth1 = 144, 
  1585.                                 
  1586.                                 BackColor = {55000, 55000, 55000} , 
  1587.                                 kStaticTextFont, 
  1588.                                 Width = UseParent                            
  1589.                             );
  1590.         VList(UseParWidth, Height = 112, VScroll, BackColor = White) //height was 172
  1591.             {
  1592.             
  1593.             GenericView("AppletParamEditor",
  1594.     //                            AppletParamEditorViewStyle, 
  1595.     //                            RootCanFold,
  1596.                                 CanEdit,
  1597.                                 CanInsertEntry,
  1598.                                 CanDeleteEntry, 
  1599.                                 CanEditCol0,
  1600.                                 CanEditCol1,
  1601.     //                            SelDomain = "AppletParamListViewDomain",
  1602.     //                            BackColor = {45000, 45000, 45000}, 
  1603.                                 BackColor = White,
  1604.                                 kStaticTextFont );
  1605.             }//VList
  1606.         StdVSpace;
  1607.         StdVSpace;
  1608.         
  1609.         HList(UseParWidth, stdBackColor)
  1610.             {
  1611.             #if Platform_Mac
  1612.             //HSpace(24);
  1613.             PushButton(kLit132, 5011, "None", Width = kAppletParamButtonWidth, kButtonFont, EH kLit553); // ccAddAppletParam
  1614.             HSpace(18);
  1615.             PushButton(kLit139, 5012, "None", Width = kAppletParamButtonWidth, kButtonFont, EH kLit554); // ccRemoveAppletParam
  1616.             HSpace(18);
  1617.             PushButton(kLit133, 5013, "None", Width = kAppletParamButtonWidth, kButtonFont, EH kLit555); // ccRestoreAllAppletParams
  1618.             #else
  1619.             //HSpace(72);
  1620.             PushButton(kLit132, 5011, "None", Width = kAppletParamButtonWidth, kButtonFont, EH kLit553); // ccAddAppletParam
  1621.             HSpace(30);
  1622.             PushButton(kLit139, 5012, "None", Width = kAppletParamButtonWidth, kButtonFont, EH kLit554); // ccRemoveAppletParam
  1623.             #endif
  1624.             }
  1625.         StdVSpace;
  1626.         } // AppletBot
  1627. //@ykh 032497 end new applet editor
  1628. /*************************************************************************/
  1629. /********************************* QTMovie *******************************/
  1630. /*************************************************************************/
  1631. Define(QTMovieTop)
  1632.     VList(UseParWidth, stdBackColor)
  1633.         {
  1634.         //@ykh 080797 begin added
  1635.         HList(UseParWidth, stdBackColor)
  1636.         {
  1637.             EditText(obj.src, FilterProc = "QTMovieLocationFilter", Label = kLit53, StdLblWidth, Width = (LblWidthVal+kFilePathEditWidth), StdFlags, EH kLit701 );
  1638.             HSpace(5);
  1639.             PushButton( kLit74, 4000, "SelectQTMovie", kButtonFont, EH kLit702); 
  1640.         }
  1641.         StdVSpace;
  1642.         //@ykh 080797 end
  1643.         HList(UseParWidth, stdBackColor)
  1644.             {    
  1645.             Tag(ImageWidth)
  1646.                 EditText( obj.width, FilterProc = "QTMovieWidth",
  1647.                              Label = kLit7, StdLblWidth, StdEditWidth, StdFlags, EH kLit703 );
  1648.             
  1649.             StdHSpace;
  1650.             IntegerPopup("", 0, obj.wUnit, kPopupFont, Action = ToggleWUnit, EH kLit704)
  1651.                 {
  1652.                 IntItem(kLit8, 0);
  1653.                 IntItem(kLit9, 1);
  1654.                 };
  1655.             
  1656.             HSpace(6);
  1657.             PushButton(kLit10, 3420, "None",  kButtonFont, EH kLit705); // ccResetImageSize
  1658.             } // QTMovieWidth
  1659.         
  1660.         StdVSpace;
  1661.         HList(UseParWidth, stdBackColor)
  1662.             {
  1663.             Tag(ImageHeight)
  1664.                 EditText( obj.height, FilterProc = "QTMovieHeight",
  1665.                              Label = kLit5, StdLblWidth, StdEditWidth, StdFlags, EH kLit706 );
  1666.             
  1667.             StdHSpace;
  1668.             IntegerPopup("", 0, obj.hUnit, kPopupFont, Action = ToggleHUnit, EH kLit707)
  1669.                 {
  1670.                 IntItem(kLit8, 0);
  1671.                 IntItem(kLit9, 1);
  1672.                 };
  1673.             
  1674.             } // QTMovieHeight
  1675.         
  1676.         StdVSpace;
  1677.         HList()
  1678.             {
  1679.             IntegerPopup(kLit90, kQTLoopPopupLabelWidth, obj.loop, Width = kQTLoopPopupWidth, kPopupFont, kPopupLabelFont, EH kLit708)
  1680.                 {
  1681.                 IntItem(kLit91,           0);
  1682.                 IntItem(kLit92,          1);
  1683.                 IntItem(kLit93, 2);
  1684.                 };
  1685.             
  1686.             StdHSpace;
  1687.             
  1688.             WidowCheckBox( kLit94, obj.autoPlay, Width = kAutoPlayCheckBoxWidth,
  1689.                                   Height = 18, kSmallBold, EH kLit709 );
  1690.             }
  1691.         
  1692.         #ifdef DISABLED
  1693.             IntegerPopup(kLit81, kQTLoopPopupLabelWidth, obj.quality, Width = kQTQualityPopupWidth, kPopupFont,kPopupLabelFont, EH kLit710)
  1694.                 {
  1695.                 IntItem(kLit87, 1);
  1696.                 IntItem(kLit88, 0);
  1697.                 IntItem(kLit89, 2);
  1698.                 };
  1699.             StdVSpace;
  1700.         #endif // DISABLED
  1701.         
  1702.         StdVSpace;
  1703.         HList(UseParWidth)
  1704.             {
  1705.             IntegerPopup( kLit82, kQTLoopPopupLabelWidth, obj.controller,
  1706.                               Width = kQTControllerPopupWidth, kPopupFont, kPopupLabelFont,
  1707.                               Action = SetController , EH kLit710)
  1708.                 {
  1709.                 IntItem(kLit83,       1);
  1710.                 IntItem(kLit84,        0);
  1711.                 // IntItem(kLit85,     2);
  1712.                 IntItem(kLit86,      3);
  1713.                 };
  1714.         
  1715.             #ifdef DISABLED
  1716.                 Spacer(UseParWidth, Height=0);
  1717.                 
  1718.                 EditText( obj.playRate, FilterProc = "PlayRateFilter",
  1719.                              Prefilter="PlayRatePrefilter",
  1720.                              Label = kLit96, StdLblWidth, StdEditWidth, StdFlags );
  1721.             #endif // DISABLED
  1722.             }
  1723.         
  1724.         StdVSpace;
  1725.         EditText( obj.pluginsPage, Label = kLit95, StdLblWidth,
  1726.                      UseParWidth, StdFlags, EH kLit711 );
  1727.         } // QTMovieTop
  1728. Define(QTMovieBot)
  1729.     VList(UseParWidth, stdBackColor)
  1730.         {
  1731.         } // QTMovieBot
  1732. /*************************************************************************/
  1733. /********************************** Embed ********************************/
  1734. /*************************************************************************/
  1735. Define(EmbedTop)
  1736.     VList(UseParWidth, stdBackColor)
  1737.         {
  1738.         //@ykh 080797 begin added
  1739.         HList(UseParWidth, stdBackColor)
  1740.         {
  1741.             EditText(obj.src, FilterProc = "PluginLocationFilter", Label = kLit53, StdLblWidth, Width = (LblWidthVal+kFilePathEditWidth), StdFlags, EH kLit601);
  1742.             HSpace(5);
  1743.             PushButton( kLit74, 4000, "SelectPlugin", kButtonFont, EH kLit602); 
  1744.         }
  1745.         StdVSpace;
  1746.         //@ykh 080797 end
  1747.         HList(UseParWidth, stdBackColor)
  1748.             {    
  1749.             EditText( obj.width, FilterProc = "AppletWidth",
  1750.                          Label = kLit7, StdLblWidth, StdEditWidth, StdFlags, EH kLit603 );
  1751.             
  1752.             StdHSpace;
  1753.             IntegerPopup("", 0, obj.wUnit, kPopupFont, Action = ToggleWUnit, EH kLit604)
  1754.                 {
  1755.                 IntItem(kLit8, 0);
  1756.                 IntItem(kLit9, 1);
  1757.                 };
  1758.             
  1759.             } // EmbedWidth
  1760.         
  1761.         StdVSpace;
  1762.         HList(UseParWidth, stdBackColor)
  1763.             {
  1764.             EditText( obj.height, FilterProc = "AppletHeight",
  1765.                          Label = kLit5, StdLblWidth, StdEditWidth, StdFlags, EH kLit605 );
  1766.             
  1767.             StdHSpace;
  1768.             IntegerPopup("", 0, obj.hUnit, kPopupFont, Action = ToggleHUnit, EH kLit606)
  1769.                 {
  1770.                 IntItem(kLit8, 0);
  1771.                 IntItem(kLit9, 1);
  1772.                 };
  1773.             
  1774.             } // EmbedHeight
  1775.         
  1776.         StdVSpace;
  1777.         EditText( obj.pluginsPage, Label = kLit95, StdLblWidth,
  1778.                      UseParWidth, StdFlags, EH kLit607 );
  1779.         } // EmbedTop
  1780. Define(EmbedBot)
  1781.     VList(UseParWidth, stdBackColor)
  1782.         {
  1783.         } // EmbedBot
  1784. /*************************************************************************/
  1785. /************************** Hidden Form Entries **************************/
  1786. /*************************************************************************/
  1787. Define(HiddenTop)
  1788.     VList(UseParWidth, stdBackColor)
  1789.         {
  1790.         EditText(obj.name, Label = kLit58, UseParWidth, StdLblWidth, StdFlags, EH kLit901);
  1791.         StdVSpace;
  1792.         EditText(obj.value, Label = kLit59, UseParWidth, StdLblWidth, StdFlags, EH kLit902);
  1793.         } // HiddenTop
  1794. Define(HiddenBot)
  1795.     VSpace(0);
  1796. /*************************************************************************/
  1797. /********************************* Frame *********************************/
  1798. /*************************************************************************/
  1799. Define(FrameTop) // frame content tab
  1800.     VList(UseParWidth, stdBackColor)
  1801.     {
  1802.         Label( kLit114, Single, Height = kPageInFrame, kStaticFont, UseParWidth)
  1803.         VList(UseParWidth)
  1804.         {
  1805.             HList(UseParWidth)
  1806.             {
  1807.                 StdHSpace;
  1808.                 StdHSpace;
  1809.                 VList(UseParWidth)
  1810.                 {
  1811.                     //VSpace(10);
  1812.                     StdVSpace;
  1813.                     HList(UseParWidth)
  1814.                     {
  1815.                         EditText( obj.src, FilterProc = "FrameSrcFilter",
  1816.                                   LabelAlignment = Right,
  1817.                                   Label = kLit155,
  1818.                                   Prefilter = "FrameSrcPrefilter",
  1819.                                   Width = 250, /*UseParWidth,*/ StdFlags, EH kLit2101);
  1820.                         Spacer(Width = 10, Height = 0);
  1821.                         GenericView("LinkShortcut");
  1822.                     }
  1823.                     Margin(0, 0, 0, 0)
  1824.                     StdVSpace;
  1825.                     HList(UseParWidth)
  1826.                     {
  1827.                         PushButton(kLit151, 3015, "None",  kButtonFont, EH kLit2103); // ccEditFileLink
  1828.                         Spacer(Width = 10, Height = 0);                        
  1829.                         PushButton(kLit135, 5019, "None",  kButtonFont, EH kLit2104); // ccEditDocument
  1830.                     }
  1831.                 }
  1832.             }
  1833.         }
  1834.         
  1835.         Spacer(Height = 15, Width = 0);
  1836.         EditText(obj.name,
  1837.                 Label = kLit115, UseParWidth, /*StdLblWidth,*/
  1838.                 StdFlags, EH kLit2105 );
  1839.     }
  1840. Define(FrameBot) // frame appearance tab
  1841.     VList(UseParWidth, stdBackColor)
  1842.     {
  1843.         HList(UseParWidth)
  1844.         {
  1845.             Switch( isFrameRoot )
  1846.             {
  1847.                 case 0:
  1848.                     VList()
  1849.                     {
  1850.                         HList()
  1851.                         {
  1852.                             EditText(obj.size, FilterProc = "FrameSize",
  1853.                                 LabelAlignment = Right,
  1854.                                 Label = kLit31, Width = kFrameAppearanceEditWidth, LabelWidth = kFrameAppearanceLabelWidth,
  1855.                                 StdFlags, EH kLit2151 );
  1856.                     
  1857.                             StdHSpace;
  1858.                         
  1859.                             IntegerPopup("", 0, obj.sizeMode, kPopupFont, Action = SetFrameUnit, EH kLit2152)
  1860.                             {
  1861.                                 IntItem(kLit8,  0);
  1862.                                 IntItem(kLit9,  1);
  1863.                                 IntItem(kLit60, 2);
  1864.                             };
  1865.                         }
  1866.                         StdVSpace;
  1867.                     }
  1868.                 default:
  1869.                     VSpace(0);
  1870.             }
  1871.             StdHSpace;
  1872.             
  1873.             Switch( obj.feType )
  1874.             {
  1875.                 case feLeaf:
  1876.                     VList()
  1877.                     {
  1878.                         WidowCheckBox( kLit72, obj.noResize, Width = kFixedSizeCheckBoxWidth, Alignment = Left,
  1879.                                   Height = 18, kSmallBold, EH kLit2153 );
  1880.                     }
  1881.                 
  1882.                 default:
  1883.                     HSpace(0);
  1884.             }
  1885.         }
  1886.         
  1887.         Switch( obj.feType, UseParWidth )
  1888.         {
  1889.             case feLeaf:
  1890.                 VList(UseParWidth)
  1891.                 {        
  1892.                     StdVSpace;
  1893.                 
  1894.                     EditText(obj.marginWidth, FilterProc = "MarginWidth",
  1895.                         Prefilter = "MarginWidthPrefilter", LabelAlignment = Right,
  1896.                         Label = kLit69, Width = kFrameAppearanceEditWidth, LabelWidth = kFrameAppearanceLabelWidth,
  1897.                         StdFlags, EH kLit2154 );
  1898.         
  1899.                     StdVSpace;
  1900.         
  1901.                     EditText(obj.marginHeight, FilterProc = "MarginHeight",
  1902.                         Prefilter = "MarginHeightPrefilter", LabelAlignment = Right,
  1903.                         Label = kLit70, Width = kFrameAppearanceEditWidth, LabelWidth = kFrameAppearanceLabelWidth,
  1904.                         StdFlags, EH kLit2155 );            
  1905.         
  1906.                     StdVSpace;
  1907.                     StdVSpace;
  1908.                 
  1909.                     HList()
  1910.                     {
  1911.                         IntegerPopup(    kLit65,
  1912.                             kFrameAppearanceLabelWidth + 4,
  1913.                             obj.scrollMode,
  1914.                             Width = kFrameDirectionPopupWidth, kPopupLabelFont,  kPopupFont, EH kLit2156)
  1915.                         {
  1916.                             IntItem(kLit66, 1);
  1917.                             IntItem(kLit67, 0);
  1918.                             IntItem(kLit68, 2);
  1919.                         };
  1920.                         HSpace(20);
  1921.                         WidowCheckBox(kLit150, obj.frameBorder, Height = 18, kSmallBold, Width = kFrameAppearanceLabelWidth, EH kLit2157);
  1922.                     }
  1923.                 }
  1924.                 
  1925.             default:
  1926.                 VList(UseParWidth)
  1927.                 {
  1928.                     IntegerPopup(    kLit62, 
  1929.                                     kFrameDirectionLabelWidth, 
  1930.                                     obj.feType, 
  1931.                                     Width = kFrameDirectionPopupWidth, kPopupLabelFont, kPopupFont, EH kLit2201)
  1932.                     {
  1933.                         IntItem(kLit63, 1);
  1934.                         IntItem(kLit64, 0);
  1935.                     };
  1936.                     StdVSpace;
  1937.                     HList()
  1938.                     {
  1939.                         HSpace(20);
  1940.                         WidowCheckBox(kLit150, obj.frameBorder, Height = 18, kSmallBold, Width = kFrameAppearanceLabelWidth, EH kLit2202);
  1941.                         Switch( isFrameRoot )
  1942.                         {
  1943.                             case 1:
  1944.                                 HList()
  1945.                                 {  // borderSize
  1946.                                     EditText(obj.borderSize, FilterProc = "BorderSize",
  1947.                                         Prefilter="BorderSizePrefilter",
  1948.                                         LabelAlignment = Right, Label = kLit152,
  1949.                                         Width = kFrameAppearanceEditWidth,
  1950.                                         LabelWidth = kFrameAppearanceLabelWidth,
  1951.                                         StdFlags, EH kLit2203 );
  1952.                                     StdHSpace;
  1953.                                 }
  1954.                                 
  1955.                             default:
  1956.                                 HSpace(20);
  1957.                         }
  1958.                     }
  1959.                 }
  1960.         }
  1961.     }
  1962. Define(FrameExtended) // frame extended tab
  1963.     VList(UseParWidth, stdBackColor)
  1964.     {
  1965.         VSpace(30);
  1966.         Call(ExtraParams);
  1967.         //EditText( obj.extraParams, Label = kLit45,
  1968.         //                UseParWidth, StdFlags );
  1969.     }
  1970. /*************************************************************************/
  1971. /********************************** Main *********************************/
  1972. /*************************************************************************/
  1973. //    ========================================
  1974. //    SetTabWidth
  1975. //    ========================================
  1976. //    This function sets the tab width for your object editor.
  1977. //    Add an entry for your objType and specify the height
  1978. //    of your tabs
  1979. Define(SetTabWidth)
  1980.     Switch(objType)
  1981.     {
  1982.         case hoAnchor:
  1983.         case hoRule:
  1984.         case hoBreak:
  1985.         case hoImage:
  1986.         case hoCheckbox:
  1987.         case hoRadioButton:
  1988.         case hoTextArea:
  1989.         case hoEntryField:
  1990.         case hoPasswordField:
  1991.         case hoSelectionField:
  1992.         case hoSubmitButton:
  1993.         case hoResetButton:
  1994.         case hoButton:
  1995.         case hoTable:
  1996.         case hoApplet:
  1997.         case hoHidden:
  1998.         case hoFrame:
  1999.         case hoQTMovie:
  2000.         case hoEmbed:
  2001.         default:
  2002.             Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2003.     }
  2004. //    ========================================
  2005. //    SetTabHeight
  2006. //    ========================================
  2007. //    This function sets the tab height for your object editor.
  2008. //    Add an entry for your objType and specify the height
  2009. //    of your tabs
  2010. Define(SetTabHeight)
  2011.     Switch(objType)
  2012.     {
  2013.         case hoAnchor:
  2014.         case hoRule:
  2015.         case hoCheckbox:
  2016.         case hoRadioButton:
  2017.         case hoTextArea:
  2018.         case hoEntryField:
  2019.         case hoPasswordField:
  2020.         case hoSelectionField:
  2021.         case hoSubmitButton:
  2022.         case hoResetButton:
  2023.         case hoButton:
  2024.         case hoHidden:
  2025.         case hoEmbed:
  2026.             Spacer(Height = kOtherTabHeight, Width = 0, VScale );
  2027.             
  2028.         case hoQTMovie:
  2029.             Spacer(Height = kQTMovieTabHeight, Width = 0, VScale );
  2030.         case hoFrame:
  2031.             Spacer(Height = kFrameTabHeight, Width = 0, VScale);
  2032.             
  2033.         case hoTable:
  2034.             Spacer(Height = kTableTabHeight, Width = 0, VScale );
  2035.         case hoApplet:
  2036.             Spacer(Height = kAppletTabHeight, Width = 0, VScale );
  2037.         case hoImage:
  2038.             Spacer(Height = kImageTabHeight, Width = 0, VScale );
  2039.         
  2040.         default:
  2041.             Spacer(Height = kOtherTabHeight, Width = 0, VScale );
  2042.     }
  2043. //    ========================================
  2044. //    HelpArea
  2045. //    ========================================
  2046. //    This function draws the help area at the bottom of each object editor.
  2047. Define(HelpArea)
  2048.     Switch(objType)
  2049.     {
  2050.         //    Add the object type for any object editor that uses the
  2051.         // new tab arrangment with the help area at the bottom.
  2052.         // This will ensure that all object editors look and
  2053.         // behave the same. - Russ
  2054.         case hoLink:
  2055.         case hoPage:
  2056.         case hoText:
  2057.         case hoNone2:    //    14
  2058.             VSpace(0);
  2059.             
  2060.         case hoAnchor:
  2061.         case hoRule:
  2062.         case hoBreak:
  2063.         case hoImage:
  2064.         case hoCheckbox:
  2065.         case hoRadioButton:
  2066.         case hoTextArea:
  2067.         case hoEntryField:
  2068.         case hoPasswordField:
  2069.         case hoSelectionField:
  2070.         case hoSubmitButton:
  2071.         case hoResetButton:
  2072.         case hoButton:
  2073.         case hoTable:
  2074.         case hoApplet:
  2075.         case hoHidden:
  2076.         case hoFrame:
  2077.         case hoQTMovie:
  2078.         case hoEmbed:
  2079.         default:
  2080.             Margin(10, 0, 10, 0, stdBackColor)
  2081.             VList(UseParWidth)
  2082.             {
  2083.                 //    The seperator line above the help area
  2084.                 VList(UseParWidth)
  2085.                 {
  2086.                     Spacer(Height = 1, UseParWidth, BackColor = {25000, 25000, 25000});
  2087.                     Spacer(Height = 1, UseParWidth, BackWhite);
  2088.                 }
  2089.                 
  2090.                 VSpace(10);
  2091.                 // The help button and text area
  2092.                 HList(Width = UseParent)
  2093.                 {
  2094.                     //#if Platform_Mac
  2095.                     //PictPushButton(4000, "ContextHelpProc", HelpFile = kHelpURL)
  2096.                     //{
  2097.                     //    Enabled(Draw, 'cicn',14055 );
  2098.                     //    Disabled(Draw, 'cicn',14057 ); 
  2099.                     //    Tracking(Draw, 'cicn',14056 );
  2100.                     //};
  2101.                     //#else
  2102.                     //PushButton(kHelpTitle, 4000, "ContextHelpProc", HelpFile = kHelpURL);
  2103.                     //#endif
  2104.     
  2105.                     //StdHSpace;
  2106.                     #if Platform_Mac
  2107.                         HelpView(Width = UseParent, Height = kHelpViewHeight, kHelpFont);
  2108.                     #else
  2109.                         //Margin(2,2,2,2, Single)
  2110.                         HelpView(Width = UseParent, Height = kHelpViewHeight, kHelpFont);
  2111.                         //Spacer(Height = 10, Width = 0, VScale);
  2112.                     #endif
  2113.                 } //HList
  2114.             }
  2115.     }
  2116. Define(Flipdown)
  2117.     VList(UseParWidth,stdBackColor)
  2118.         {
  2119.         VSpace(4);
  2120.         HList(UseParWidth)
  2121.             {
  2122.             PictCheckBox(moreOEChoices)
  2123.                 {
  2124.                 On(Draw, 'cicn', 1204);
  2125.                 Off(Draw, 'cicn',1203);
  2126.                 DisabledOn(Draw,  'cicn', 1204);
  2127.                 DisabledOff(Draw, 'cicn', 1203);
  2128.                 TrackingOn(Draw,  'cicn', 1206);
  2129.                 TrackingOff(Draw, 'cicn', 1205);
  2130.                 };
  2131.             
  2132.             #if Platform_Win
  2133.                 HSpace(4);
  2134.             #else
  2135.                 HSpace(1);
  2136.             #endif
  2137.             
  2138.             VList(UseParWidth)
  2139.                 {
  2140.                 VSpace(5);
  2141.                 Spacer(Height = 1, UseParWidth, BackColor = {25000, 25000, 25000});
  2142.                 // Spacer(Height = 1, UseParWidth, BackWhite);
  2143.                 VSpace(9);
  2144.                 }
  2145.             }
  2146.         }
  2147. Define(LowerSwitch)
  2148.     VList(UseParWidth, stdBackColor)
  2149.         {
  2150.         VSpace(1);
  2151.         Switch(objType) // Lower switch
  2152.             {                
  2153.             case hoAnchor:            Call(AnchorBot);
  2154.             case hoRule:            Call(RuleBot);
  2155.             case hoBreak: Call (BreakBot);
  2156.             case hoImage:              Call(ImageBot);                
  2157.             case hoTable:             Call(TableBot);
  2158.             case hoApplet:             Call(AppletBot);
  2159.             case hoHidden:             Call(HiddenBot);
  2160.             case hoQTMovie:         Call(QTMovieBot);
  2161.             case hoEmbed:             Call(EmbedBot);
  2162.             
  2163. #if !LITE_VERSION
  2164.             case hoCheckbox:
  2165.             case hoRadioButton:      Call(CheckBoxAndRadioButtonBot);
  2166.             case hoTextArea:          Call(MultilineBot);                
  2167.             case hoEntryField: 
  2168.             case hoPasswordField:      Call(TextFieldBot);
  2169.             case hoSelectionField:  Call(PopupBot);
  2170.             case hoSubmitButton:      Call(SubmitButtonBot);
  2171.             case hoResetButton:     Call(ResetButtonBot);
  2172.             case hoButton: Call (ButtonButtonBot);
  2173.             case hoFrame:             Call(FrameBot);
  2174. #endif //!LITE_VERSION
  2175.             
  2176.             case hoLink:
  2177.             case hoPage:
  2178.             case hoText:
  2179.             case hoNone2:    //    14
  2180.                 VSpace(0);
  2181.             
  2182.             default:
  2183.                 GenericView("ObjEditorLowerPane");
  2184.             } // Lower switch
  2185.         
  2186.         Switch(objType)
  2187.             {
  2188. #if !LITE_VERSION
  2189.             case hoAnchor:
  2190.             case hoRule:
  2191.             case hoBreak:
  2192.             case hoCheckbox:
  2193.             case hoRadioButton:
  2194.             case hoTextArea:
  2195.             case hoEntryField:
  2196.             case hoPasswordField:
  2197.             case hoSelectionField:
  2198.             case hoSubmitButton:
  2199.             case hoResetButton:
  2200.             case hoButton:
  2201.             case hoHidden:
  2202.             case hoQTMovie:
  2203.             case hoEmbed:
  2204.                 // "Extra HTML" field
  2205.                 VList(UseParWidth)
  2206.                     {
  2207.                     Call(ExtraParams);
  2208.                     //EditText( obj.extraParams, Label = kLit45,
  2209.                     //             StdLblWidth, UseParWidth, StdFlags );
  2210.                     VSpace(3);
  2211.                     }
  2212. #endif //!LITE_VERSION
  2213.             
  2214.             case hoLink:
  2215.             case hoPage:
  2216.             case hoText:
  2217.             case hoNone2:    //    14
  2218.             case hoTable:
  2219.                 // No "Extra HTML" field for these object types (for hoTable,
  2220.                 // it is incorporated into the TableBot view; the other cases
  2221.                 // are either unused, or don't have an Extra HTML field.
  2222.                 VSpace(0);
  2223.             
  2224.             default:
  2225.                 // We assume that if a dynamically defined object type wants
  2226.                 // an "Extra HTML" field, it will express it in its lower
  2227.                 // view.
  2228.                 VSpace(0);
  2229.             }
  2230.         } //LowerSwitch
  2231. Define(UpperSwitch)
  2232.     HList(UseParWidth, stdBackColor)
  2233.         {
  2234.         VSpace(kUpperPaneHeight);
  2235.         Switch(objType) // Upper switch
  2236.             {
  2237.             case hoAnchor:                  Call(AnchorTop);
  2238.             case hoRule:                  Call(RuleTop);
  2239.             case hoBreak: Call (BreakTop);
  2240.             case hoImage:                  Call(ImageTop);                
  2241.             case hoTable:                 Call(TableTop);
  2242.             case hoApplet:                 Call(AppletTop);
  2243.             case hoHidden:                 Call(HiddenTop);
  2244.             case hoQTMovie:             Call(QTMovieTop);
  2245.             case hoEmbed:                 Call(EmbedTop);
  2246.             
  2247. #if !LITE_VERSION
  2248.             case hoCheckbox:
  2249.             case hoRadioButton:          Call(CheckBoxAndRadioButtonTop);
  2250.             case hoTextArea:              Call(MultilineTop);                
  2251.             case hoEntryField: 
  2252.             case hoPasswordField:          Call(TextFieldTop);
  2253.             case hoSelectionField:      Call(PopupTop);
  2254.             case hoSubmitButton:          Call(SubmitButtonTop);
  2255.             case hoResetButton:         Call(ResetButtonTop);
  2256.             case hoButton: Call (ButtonButtonTop);
  2257.             case hoFrame:                 Call(FrameTop);
  2258. #endif
  2259.             
  2260.             case hoLink:
  2261.             case hoPage:
  2262.             case hoText:
  2263.             case hoNone2:    //    14
  2264.                 Margin(5,5,5,5)
  2265.                     StaticText( kLit73, UseParWidth, Alignment = Center, kPlainFont );
  2266.             
  2267.             default:
  2268.                 GenericView("ObjEditorUpperPane");
  2269.             } // Upper switch
  2270.         } //UpperSwitch 
  2271.         
  2272. Define(FullSwitchBody)
  2273.     VList(stdBackColor)
  2274.         {
  2275.         Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2276.         Call(UpperSwitch);
  2277.         Spacer(Height = 5, Width = UseParent);
  2278.         Call(LowerSwitch);
  2279.         Spacer(Height = 5, Width = UseParent);
  2280.         Call(HelpArea);
  2281.         }
  2282. Define(AdvancedSwitchBody)
  2283.     Switch(objType)
  2284.     {
  2285.         case hoImage:
  2286.             VList(stdBackColor)
  2287.             {
  2288.                 Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2289.                 Call(ImageAdvanced);
  2290.             }
  2291.             
  2292.         case hoTable:
  2293.             VList(stdBackColor)
  2294.             {
  2295.                 Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2296.                 Call(TableAdvanced);
  2297.             }
  2298.             
  2299.         case hoApplet:
  2300.             VList(stdBackColor)
  2301.             {
  2302.                 Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2303.                 Call(AppletAdvanced);
  2304.             }
  2305.             
  2306.         case hoFrame:
  2307.             VList(stdBackColor)
  2308.             {
  2309.                 Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2310.                 Call(FrameExtended);
  2311.             }
  2312.             
  2313.         default:
  2314.             VSpace(0);
  2315.     }
  2316. Define(TabSwitch)
  2317.     VList(stdBackColor)
  2318.     {
  2319.         //    This function sets the width for each of your tabs
  2320.         Call(SetTabWidth);
  2321.         HList(stdBackColor)
  2322.         {
  2323.             Margin(10, 10, 10, 10, stdBackColor)
  2324.             Switch(tabMode)
  2325.                 {
  2326.                 default:  //"Basic" 1st tab
  2327.                     VList()
  2328.                     {
  2329.                         Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2330.                         Call(UpperSwitch);
  2331.                     }
  2332.                 case 1:  //"advanced" 2nd tab
  2333.                     VList()
  2334.                     {
  2335.                         Switch(objType)
  2336.                         {
  2337.                             case hoTable:        //    2nd tab could be cells or filemaker
  2338.                                 VList()
  2339.                                 {
  2340.                                     Switch(cellPresent)
  2341.                                     {
  2342.                                         case 0:        //    No cell present so 2nd tab must be filemaker tab
  2343.                                             VList()
  2344.                                             {
  2345.                                                 Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2346.                                                 Call(AdvancedSwitchBody);
  2347.                                             }
  2348.                                         
  2349.                                         default:    //    There is a cell present so 2nd tab must be cells tab
  2350.                                             VList()
  2351.                                             {
  2352.                                                 Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2353.                                                 Call(LowerSwitch);
  2354.                                             }
  2355.                                     }
  2356.                                 }
  2357.                                 
  2358.                             default:
  2359.                                 VList()
  2360.                                 {
  2361.                                     Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2362.                                     Call(LowerSwitch);
  2363.                                 }
  2364.                         }
  2365.                     }
  2366.             
  2367.                 case 2:  //"Both" 3rd tab
  2368.                     VList()
  2369.                     {
  2370.                         Switch(objType)
  2371.                         {
  2372.                             case hoTable: 
  2373.                             case hoApplet: // applet
  2374.                             case hoFrame: // frame
  2375.                             case hoImage:  // image
  2376.                                 Call(AdvancedSwitchBody); // for tags which don't have a "both" tab
  2377.                     
  2378.                             default:
  2379.                                 Call(FullSwitchBody);
  2380.                         }
  2381.                     }
  2382.                 } //TabMode
  2383.             // This function sets the height for each of your tabs
  2384.             Call(SetTabHeight);
  2385.         }
  2386.         //    This function inserts the help area at the bottom of your
  2387.         //    object editor
  2388.         Call(HelpArea);
  2389.     }
  2390. #if kShowDebugPopup
  2391. VList()
  2392.     {
  2393. #endif
  2394.     Margin(4,7,7,2, stdBackColor)
  2395.         VList()
  2396.             {            
  2397. #if !WANT_TABS
  2398.             Spacer(Height = 0, Width = kObjectEditorBaseWidth);
  2399.             
  2400.             Call(UpperSwitch);
  2401.             
  2402.             Switch(objType) // Lower switch
  2403.                 {        
  2404. #if !LITE_VERSION
  2405.                 case hoAnchor:
  2406.                 case hoRule:
  2407.                 case hoBreak:
  2408.                 case hoCheckbox:
  2409.                 case hoRadioButton:
  2410.                 case hoTextArea:
  2411.                 case hoEntryField: 
  2412.                 case hoPasswordField:
  2413.                 case hoSelectionField:
  2414.                 case hoSubmitButton:
  2415.                 case hoResetButton:
  2416.                 case hoButton:
  2417.                 case hoHidden:
  2418.                 case hoFrame:
  2419. #endif
  2420.                 case hoImage:                
  2421.                 case hoTable:
  2422.                 case hoApplet:
  2423.                 case hoQTMovie:
  2424.                 case hoEmbed:
  2425.                         Call(Flipdown);
  2426.                 
  2427.                 case hoLink:
  2428.                 case hoPage:
  2429.                 case hoText:
  2430.                 case hoNone2:
  2431.                 case 31:
  2432.                     VSpace(19);
  2433.                     
  2434.                 default:
  2435.                         Call(Flipdown);
  2436.                 } // Lower switch
  2437.             
  2438.             Switch(moreOEChoices, UseParWidth)
  2439.                 {
  2440.                 case 0:
  2441.                     VSpace(0);
  2442.                 
  2443.                 case 1:
  2444.                     Call(LowerSwitch);
  2445.                     
  2446.                 } // Switch(moreOEChoices)
  2447. #else //if WANT_TABS
  2448.             
  2449.             //This switch is here so that the 'default text' doesn't appear in 
  2450.             //a tab control, but appears at the root of the palette, which 
  2451.             //looks better.
  2452.             Switch(objType) // Upper switch
  2453.                 {
  2454.                 case hoAnchor: 
  2455.                     TabControl(tabMode, NoUndo,kTabLabelFont)
  2456.                         {
  2457.                         Tab(kLit140, 0);    //    Name
  2458.                         Tab(kLit143, 1);    //    Extended
  2459.                         
  2460.                         Subview:
  2461.                             Call(TabSwitch);                
  2462.                         };
  2463.                      
  2464.                 case hoCheckbox:
  2465.                 case hoRadioButton:  
  2466.                 case hoPasswordField:  
  2467.                 case hoSubmitButton:  
  2468.                 case hoResetButton: 
  2469.                 case hoButton: 
  2470.                 case hoHidden: 
  2471.                 case hoQTMovie:
  2472.                 case hoEmbed: 
  2473.                     TabControl(tabMode, NoUndo,kTabLabelFont)
  2474.                         {
  2475.                         Tab(kLit141, 0);    //    Parameters
  2476.                         Tab(kLit143, 1);    //    Extended
  2477.                         
  2478.                         Subview:
  2479.                             Call(TabSwitch);                
  2480.                         };
  2481.                         
  2482.                 case hoRule:  
  2483.                 case hoBreak:
  2484.                 case hoSelectionField:  
  2485.                 case hoTextArea:             
  2486.                 case hoEntryField: 
  2487.                     TabControl(tabMode, NoUndo,kTabLabelFont)
  2488.                         {
  2489.                         Tab(kLit142, 0);    //    Appearance
  2490.                         Tab(kLit143, 1);    //    Extended
  2491.                         
  2492.                         Subview:
  2493.                             Call(TabSwitch);                
  2494.                         };
  2495.                         
  2496.                 case hoTable: // Table
  2497.                     VList()
  2498.                     {
  2499.                         Switch(cellPresent)
  2500.                         {
  2501.                             case 0:
  2502.                                 TabControl(tabMode, NoUndo,kTabLabelFont)
  2503.                                     {
  2504.                                     Tab(kLit104, 0);
  2505.                                     Tab(kLit160, 2);
  2506.                                     
  2507.                                     Subview:
  2508.                                         Call(TabSwitch);                
  2509.                                     };
  2510.                             
  2511.                             default: 
  2512.                                 TabControl(tabMode, NoUndo,kTabLabelFont)
  2513.                                     {
  2514.                                     Tab(kLit104, 0);
  2515.                                     Tab(kLit105, 1);
  2516.                                     Tab(kLit160, 2);
  2517.                                     
  2518.                                     Subview:
  2519.                                         Call(TabSwitch);                
  2520.                                     };
  2521.                         }
  2522.                     }
  2523.                         
  2524.                 case hoApplet:
  2525.                     TabControl(tabMode, NoUndo,kTabLabelFont)
  2526.                         {
  2527.                         Tab(kLit118, 0);
  2528.                         Tab(kLit130, 1);
  2529.                         Tab(kLit120, 2);
  2530.                         
  2531.                         Subview:
  2532.                             Call(TabSwitch);                
  2533.                         };
  2534.                 case hoImage:
  2535.                     TabControl(tabMode, NoUndo,kTabLabelFont)
  2536.                         {
  2537.                         Tab(kLit119, 0);
  2538.                         Tab(kLit138, 1);
  2539.                         Tab(kLit120, 2);
  2540.                         
  2541.                         Subview:
  2542.                             Call(TabSwitch);                
  2543.                         };
  2544.                 case hoFrame:
  2545.                     VList()
  2546.                     {
  2547.                         Switch( obj.feType )
  2548.                         {
  2549.                             case feLeaf:
  2550.                                 TabControl(tabMode, NoUndo,kTabLabelFont)
  2551.                                 {
  2552.                                     Tab(kLit118, 0);
  2553.                                     Tab(kLit119, 1);
  2554.                                     Tab(kLit120, 2);
  2555.                         
  2556.                                     Subview:
  2557.                                         Call(TabSwitch);
  2558.                                 };
  2559.                             
  2560.                             default:
  2561.                                 TabControl(tabMode, NoUndo,kTabLabelFont)
  2562.                                 {
  2563.                                     //Tab(kLit118, 0);
  2564.                                     Tab(kLit119, 1);
  2565.                                     Tab(kLit120, 2);
  2566.                         
  2567.                                     Subview:
  2568.                                         Call(TabSwitch);
  2569.                                 };
  2570.                         }
  2571.                     }
  2572.                     
  2573.                 case hoNone2:
  2574.                     VList(stdBackColor)
  2575.                     {
  2576.                         Spacer(Height = 0, Width = kObjectEditorBaseWidth, HScale);
  2577.                         Margin(5,5,5,10)
  2578.                             StaticText( kLit73, UseParWidth, Alignment = Center, kPlainFont );
  2579.                     }
  2580.                     
  2581.                 default:
  2582.                     VList()
  2583.                     {
  2584.                         Switch(showExtended)
  2585.                         {
  2586.                             case 1:
  2587.                                 TabControl(tabMode, NoUndo,kTabLabelFont)
  2588.                                 {
  2589.                                     Tab(kLit141, 0);    //    Parameters
  2590.                                     Tab(kLit143, 1);    //    Extended
  2591.                         
  2592.                                     Subview:
  2593.                                         Call(TabSwitch);                
  2594.                                 };
  2595.                             
  2596.                             default:
  2597.                                 Call(FullSwitchBody);
  2598.                         }
  2599.                     }
  2600.                     //Margin(5,18,5,5)
  2601.                     //    StaticText( kLit73,
  2602.                     //                    Width = kObjectEditorBaseWidth - 40,
  2603.                     //                    Alignment = Center, kPlainFont );
  2604.                     
  2605.                 } // Base Tab switch
  2606. #endif //WANT_TABS
  2607.             
  2608.             } // Main V list
  2609.     
  2610. #if kShowDebugPopup
  2611.     
  2612.         // This is just used during testing.
  2613.         Spacer(Height = 10);
  2614.         StaticText("Debugging Menu:");
  2615.         Spacer(Height = 10);
  2616.         IntegerPopup("Type:", 50, objType, Width = 150, NoCombo, kPopupFont)
  2617.             {
  2618.             IntItem("Anchor", 0);
  2619.             IntItem("Rule",1);
  2620.             IntItem("Image",2);
  2621.             IntItem("Checkbox", 3);
  2622.             IntItem("Radio Button", 4);
  2623.             IntItem("Text Area", 5);
  2624.             IntItem("Entry Field", 6);
  2625.             IntItem("Password Field",7);
  2626.             IntItem("Selection Field", 8);
  2627.             IntItem("Submit Button", 9);
  2628.             IntItem("Reset Button", 10);        
  2629.             IntItem("Table",15);
  2630.             IntItem("Applet",16);
  2631.             IntItem("Hidden",17);
  2632.             IntItem("Frame",18);
  2633.             IntItem("Line Break", 19);
  2634.             IntItem("None", 20);
  2635.             IntItem("QTMovie", 21);
  2636.             IntItem("Embed", 22);
  2637.             };
  2638.         CheckBox("Cell", cellPresent);    
  2639.         IntegerPopup("Frame Type:", 150, obj.feType, Width = 250, NoCombo, kPopupFont)
  2640.             {
  2641.             IntItem("0", 0);
  2642.             IntItem("1", 1);
  2643.             IntItem("2", 2);
  2644.             };
  2645.         CheckBox("Is Frame Root", isFrameRoot);    
  2646.     } //Vlist
  2647. #endif
  2648.  
  2649.