home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / tcl / xf2.3-p / xf2 / xf2.3 / xftutorial / script.xfjp / example.scrpt < prev    next >
Encoding:
Text File  |  1993-11-25  |  31.4 KB  |  949 lines
  1. # tutorial
  2. global exampleLast
  3. set exampleLast 27
  4. global exampleLastSectionDone
  5. set exampleLastSectionDone -1
  6.  
  7.  
  8. set exampleName0 {╬π┬Ω}
  9. set exampleText0 {\
  10. ñ│ñ╬╬π┬Ωñ╬╛╧ñ╟ñ╧íóXF ñ╬┴α║εñ╧ñ╣ñ┘ñ╞Ñ┴Ñσí╝Ñ╚ÑΩÑóÑδ
  11. ñ╬Ñ╫ÑφÑ░ÑΘÑαñ¼╣╘ñññ▐ñ╣íúñóñ╩ñ┐ñ╧ XF ñ≥─╛└▄┴α║εñ╗ñ║
  12. ñ╦íó"Next page" Ñ▄Ñ┐Ñ≤ñ≥▓íñ╖ñ╞╬π┬Ωñ≥┐╩ñßñ╞╣╘ñ├ñ╞▓╝
  13. ñ╡ññíú
  14.  
  15. ╬π┬Ωñ╚ñ╖ñ╞íó┤╩├▒ñ╩Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩíªÑ╓ÑΘѪÑ╢ñ≥║εñ├ñ╞ñ▀
  16. ñ▐ñ╣íúñ│ñ╬ÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╧íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬│¼┴╪ñ≥
  17. ░▄╞░ñ╖ñ╞íóÑ╒ÑíÑñÑδñ╬╞Γ═╞í╩║╟╜Θñ╬ú╡ú░╣╘ñ╬ñ▀í╦ñ≥╔╜╝¿
  18. ñ╣ñδñΓñ╬ñ╟ñ╣íú
  19.  
  20. ┤≡╦▄┼¬ñ╩Ñ└ÑñÑóÑφÑ░ñ╬╣╜└«═╫┴╟ñ╚ñ╖ñ╞ñ╧íóñ▐ñ║║╟╛σ╔⌠ñ╦
  21. ÑßÑ╦Ñσí╝íªÑ╨í╝ñ¼ñóñΩñ▐ñ╣íúÑßÑ╦Ñσí╝íªÑ╨í╝ñ╦ñ╧íóú▒ñ─
  22. ñ╬ menubutton ñ¼ñóñ├ñ╞íó╔╜╝¿ñ╡ñ∞ñ┐Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ
  23. ═╞ñ≥║╞╔╜╝¿ñ╖ñ┐ñΩíóÑ╫ÑφÑ░ÑΘÑαñ≥╜¬╬╗ñ╖ñ┐ñΩñ╣ñδñ│ñ╚ñ¼
  24. ñ╟ñ¡ñ▐ñ╣íú
  25.  
  26. ÑßÑ╦Ñσí╝íªÑ╨í╝ñ╬▓╝ñ╦ñ╧íóú▓ñ─ñ╬ label ñ¼ñóñΩñ▐ñ╣íú
  27. ú▒ñ─╠▄ñ╬ label ñ╦ñ╧íó╕╜║▀╔╜╝¿ñ╡ñ∞ñ╞ñññδÑ╟ÑúÑ∞Ñ»Ñ╚
  28. ÑΩñ╬╠╛┴░ñ¼╔╜╝¿ñ╡ñ∞ñ▐ñ╣íúñ│ñ╬ label ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩ
  29. ╠╛ñ╧íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ¼╩╤╣╣ñ╡ñ∞ñδñ┐ñ╙ñ╦╣╣┐╖ñ╡ñ∞ñ▐ñ╣íú
  30. ú▓ñ─╠▄ñ╬ label ñ╦ñ╧íó╕╜║▀╔╜╝¿ñ╡ñ∞ñ╞ñññδÑ╒ÑíÑñÑδñ╬
  31. ╠╛┴░ñ¼╔╜╝¿ñ╡ñ∞ñ▐ñ╣íú
  32.  
  33. ñ╡ñΘñ╦ñ╜ñ╬▓╝ñ╦ñ╧íóú▓ñ─ñ╬ list ñ¼╩┬ñ≤ñ╟ñññ▐ñ╣íú║╕ñ╬
  34. list ñ╦ñ╧íó╕╜║▀ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩ╛σñ╬ñ╣ñ┘ñ╞ñ╬Ñ╒ÑíÑñÑδ
  35. ñ╚Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╠╛┴░ñ╬░∞═≈ñ¼╔╜╝¿ñ╡ñ∞íó▒ªñ╬ list ñ╦
  36. ñ╧íó╕╜║▀┴¬ñ╨ñ∞ñ╞ñññδÑ╒ÑíÑñÑδñ╬╞Γ═╞ñ¼╔╜╝¿ñ╡ñ∞ñ▐ñ╣íú
  37.  
  38. Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ≥░▄╞░ñ╖ñ┐ñΩíóÑ╒ÑíÑñÑδñ╬╞Γ═╞ñ≥╔╜╝¿ñ╣ñδ
  39. ñ┐ñßñ╦íó║╕ñ╬ list ╛σñ╬╣α╠▄ñ╦ñ╧íóÑ▐ѪÑ╣ñ╬║╕Ñ▄Ñ┐Ñ≤ñ╟
  40. ┴¬ñ╨ñ∞ñ┐╗■ñ╦┼¼┼÷ñ╩╞░║εñ≥╣╘ñªí╪─Ω╡┴í┘ñ¼ñ╩ñ╡ñ∞ñ╞ñññ▐
  41. ñ╣íú
  42.  
  43. ░╩╛σñ¼íó╬π┬Ωñ╚ñ╩ñδÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╬┤≡╦▄┼¬ñ╩╣╜└«ñ╟
  44. ñ╣íúñ╟ñ╧íó╗╧ñßñ▐ñ╖ñτñªíú}
  45.  
  46. set exampleCommand0 {\
  47. XFMiscClearInterpreter
  48. global xfConf xfPath
  49. set xfConf(saveInterval) 0
  50. set xfConf(onlyOneWindow) 0
  51. set xfConf(externalEditor) ""
  52. set xfConf(geometry) packer
  53. set xfConf(newPacker) 0
  54. source "$xfPath(src)/xfpacking.tcl"
  55. global curDir
  56. set curDir \[pwd\]
  57. XFEditSetType Frame 0
  58. update idletasks}
  59.  
  60.  
  61. set exampleName1 {frame ñ╬║ε└«}
  62. set exampleText1 {\
  63. ñ▐ñ║íó║ε╢╚╬╬░Φñ╦ú│ñ─ñ╬ frame ÑªÑúÑ╕ѺÑ├Ñ╚ñ≥║εñΩñ▐
  64. ñ╣íúñ│ñ∞ñ╧íóXF ñ╬ÑßÑñÑ≤íªÑªÑúÑ≤Ñ╔Ѫñ╟íó║╕ñ╬ÑΩÑ╣Ñ╚
  65. ñ½ñΘ "Frame" ñ╬╣α╠▄ñ≥┴¬ñ≤ñ╟íóÑ└Ñ╓ÑδíªÑ»ÑΩÑ├Ñ»ñ╣ñδ
  66. ñ│ñ╚ñ╦ñΦñ├ñ╞╣╘ñññ▐ñ╣íú
  67.  
  68. ░∞╚╓╛σñ╬ frame ñ╦ñ╧ÑßÑ╦Ñσí╝íªÑ╨í╝ñ¼íó├µ▒√ñ╬ frame 
  69. ñ╦ñ╧╕╜║▀ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╚Ñ╒ÑíÑñÑδ╠╛ñ≥╔╜╝¿ñ╣ñδ label
  70. ñ¼íó░∞╚╓▓╝ñ╬ frame ñ╦ñ╧Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╚Ñ╒ÑíÑñÑδñ╬╞Γ
  71. ═╞ñ≥╔╜╝¿ñ╣ñδ listbox ñ¼íóñ╜ñ∞ñ╛ñ∞┴▐╞■ñ╡ñ∞ñδñ│ñ╚ñ╦
  72. ñ╩ñΩñ▐ñ╣íú}
  73.  
  74. set exampleCommand1 {\
  75. .xfEdit.frame2.additional.additional select clear
  76. .xfEdit.frame2.template.template select clear
  77. .xfEdit.frame2.standard.standard select clear
  78. .xfEdit.frame2.standard.standard select from 4
  79. .xfEdit.frame2.standard.standard select to 4
  80. update idletasks
  81. .xfEdit.frame5.addDefault configure -relief sunken
  82. update idletasks
  83. .xfEdit.frame5.addDefault configure -state active
  84. update idletasks
  85. .xfEdit.frame5.addDefault invoke
  86. update idletasks
  87. .xfEdit.frame5.addDefault invoke
  88. update idletasks
  89. .xfEdit.frame5.addDefault invoke
  90. update idletasks
  91. .xfEdit.frame5.addDefault configure -state normal
  92. update idletasks
  93. .xfEdit.frame5.addDefault configure -relief raised
  94. update idletasks}
  95.  
  96.  
  97. set exampleName2 {║ε╢╚╬╬░Φñ╬┬τñ¡ñ╡ñ╬╩╤╣╣}
  98. set exampleText2 {\
  99. ñ▐ñ║íó║ε╢╚╬╬░Φñ≥ÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╦╔¼═╫ñ╩┬τñ¡ñ╡ñ╦╩╤
  100. ╣╣ñ╖ñ▐ñ╣íúñ│ñ∞ñ╧íóѪÑúÑ≤Ñ╔ѪíªÑ▐Ñ═í╝Ñ╕Ñπñ½ñΘ─╛└▄╩╤
  101. ╣╣ñ╣ñδñ│ñ╚ñΓñ╟ñ¡ñ▐ñ╣ñ╖íóÑ╚Ñ├Ñ╫Ñ∞Ñ┘ÑδíªÑªÑúÑ≤Ñ╔Ѫñ╬
  102. Ñ╤ÑΘÑßÑ┐ñ≥└▀─Ωñ╖ñ╞ñΣñδñ│ñ╚ñ╦ñΦñ├ñ╞ñΓ▓─╟╜ñ╟ñ╣íú}
  103.  
  104. set exampleCommand2 {\
  105. wm geometry . 450x250
  106. update idletasks}
  107.  
  108.  
  109. set exampleName3 {menubutton ñ╬║ε└«}
  110. set exampleText3 {\
  111. ╝íñ╦íó░∞╚╓╛σñ╬ frame ñ≥╕╜║▀├σ╠▄ñ╣ñδѪÑúÑ╕ѺÑ├Ñ╚ñ╚
  112. ñ╖ñ╞┴¬ñ╙ñ▐ñ╣íúñ│ñ∞ñ╧íóÑ▐ѪÑ╣ñ╬├µÑ▄Ñ┐Ñ≤ñ╟ѪÑúÑ╕ѺÑ├
  113. Ñ╚ñ≥Ñ└Ñ╓ÑδíªÑ»ÑΩÑ├Ñ»ñ╣ñδñ½íóñóñδñññ╧ XF ñ╬ÑßÑñÑ≤ñ╬
  114. ╩╘╜╕ѪÑúÑ≤Ñ╔Ѫñ╦╔╜╝¿ñ╡ñ∞ñ┐ѪÑúÑ╕ѺÑ├Ñ╚íªÑ╤Ñ╣ñ╬Ñ╫Ñδ
  115. Ñ└ѪÑ≤íªÑßÑ╦Ñσí╝ñ½ñΘ┴¬ñ╓ñ│ñ╚ñΓñ╟ñ¡ñ▐ñ╣íú
  116.  
  117. ñ╡ñ╞íóXF ñ╬ÑßÑñÑ≤íªÑªÑúÑ≤Ñ╔Ѫñ╬ "standard" ÑΩÑ╣Ñ╚
  118. ñ╬├µñ╬ menubutton ñ╬╣α╠▄ñ≥Ñ└Ñ╓ÑδíªÑ»ÑΩÑ├Ñ»ñ╖ñ╞íó
  119. menubutton ñ≥║ε└«ñ╖ñ▐ñ╣íúñ│ñ╬ menubutton ñ╦ñ╧ú▓ñ─
  120. ñ╬╣α╠▄ñ¼┤▐ñ▐ñ∞ñ▐ñ╣íúú▒ñ─ñ╧╕╜║▀ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ═╞
  121. ñ≥║╞╔╜╝¿ñ╣ñδñ┐ñßñΓñ╬íóñΓñªú▒ñ─ñ╧ÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╬
  122. ╜¬╬╗ñ╬ñ┐ñßñ╬ñΓñ╬ñ╟ñ╣íú}
  123.  
  124. set exampleCommand3 {\
  125. XFEditSetPath .frame0
  126. XFEditSetType Menubutton 0
  127. .xfEdit.frame2.additional.additional select clear
  128. .xfEdit.frame2.template.template select clear
  129. .xfEdit.frame2.standard.standard select clear
  130. .xfEdit.frame2.standard.standard select from 8
  131. .xfEdit.frame2.standard.standard select to 8
  132. update idletasks
  133. .xfEdit.frame5.addDefault configure -state active
  134. update idletasks
  135. .xfEdit.frame5.addDefault configure -relief sunken
  136. update idletasks
  137. .xfEdit.frame5.addDefault invoke
  138. update idletasks
  139. .xfEdit.frame5.addDefault configure -state normal
  140. update idletasks
  141. .xfEdit.frame5.addDefault configure -relief raised
  142. update idletasks}
  143.  
  144.  
  145. set exampleName4 {label ñ╬║ε└«}
  146. set exampleText4 {\
  147. menubutton ñ≥║ε└«ñ╖ñ┐╕σíó├µ▒√ñ╬ frame ñ≥┴¬┬≥ñ╖íóñ╜
  148. ñ│ñ╦╕╜║▀ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩíªÑ╤Ñ╣ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╬ label
  149. ѪÑúÑ╕ѺÑ├Ñ╚ñ≥║ε└«ñ╖ñ▐ñ╣íúñ╡ñΘñ╦╕╜║▀╞Γ═╞ñ¼╔╜╝¿ñ╡ñ∞
  150. ñ╞ñññδÑ╒ÑíÑñÑδñ╬╠╛┴░ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╬ label ñΓ║ε└«
  151. ñ╖ñ▐ñ╣íúѪÑúÑ╕ѺÑ├Ñ╚ñ╬┴¬┬≥ñΣ║ε└«ñ╧íóñ╣ñ╟ñ╦└Γ╠└ñ╖ñ┐
  152. ─╠ñΩñ╟ñ╣íú}
  153.  
  154. set exampleCommand4 {\
  155. XFEditSetPath .frame1
  156. XFEditSetType Label 0
  157. .xfEdit.frame2.additional.additional select clear
  158. .xfEdit.frame2.template.template select clear
  159. .xfEdit.frame2.standard.standard select clear
  160. .xfEdit.frame2.standard.standard select from 5
  161. .xfEdit.frame2.standard.standard select to 5
  162. update idletasks
  163. .xfEdit.frame5.addDefault configure -state active
  164. update idletasks
  165. .xfEdit.frame5.addDefault configure -relief sunken
  166. update idletasks
  167. .xfEdit.frame5.addDefault invoke
  168. update idletasks
  169. .xfEdit.frame5.addDefault configure -state normal
  170. update idletasks
  171. .xfEdit.frame5.addDefault configure -relief raised
  172. update idletasks
  173. .xfEdit.frame5.addDefault configure -state active
  174. update idletasks
  175. .xfEdit.frame5.addDefault configure -relief sunken
  176. update idletasks
  177. .xfEdit.frame5.addDefault invoke
  178. update idletasks
  179. .xfEdit.frame5.addDefault configure -state normal
  180. update idletasks
  181. .xfEdit.frame5.addDefault configure -relief raised
  182. update idletasks}
  183.  
  184.  
  185. set exampleName5 {listbox ñ╬║ε└«}
  186. set exampleText5 {\
  187. ╝íñ╦íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ═╞ñ╚┴¬┬≥ñ╡ñ∞ñ┐Ñ╒ÑíÑñÑδñ╬╞Γ═╞
  188. ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╬íóú▓ñ─ñ╬ listbox ñ≥║ε└«ñ╖ñ▐ñ╣íúñ▐
  189. ñ║íóXF ñ╬╩╘╜╕ѪÑúÑ≤Ñ╔Ѫ╛σñ╬ "Templates" ÑΩÑ╣Ñ╚ñ½ñΘ
  190. "Combined" ñ╬╣α╠▄ñ≥Ñ└Ñ╓ÑδíªÑ»ÑΩÑ├Ñ»ñ╖ñ╞Ñ╡Ñ╓íªÑ╟Ñú
  191. Ñ∞Ñ»Ñ╚ÑΩñ≥│½ñ¡ñ▐ñ╣íúñ╡ñΘñ╦ñ╜ñ╬├µñ½ñΘíó"ListboxLS"
  192. ñ╬╣α╠▄ñ≥┴¬ñ╙ñ▐ñ╣íúñ│ñ╬ listbox ñ╧íóñ╣ñ╟ñ╦ú▓ñ─ñ╬ 
  193. scrollbar ñ¼╔╒▓├ñ╡ñ∞ñ┐ñΓñ╬ñ╟ñóñΩíóñ│ñ╚ñ╡ñΘ listbox 
  194. ñ╚ scrollbar ñ≥┤╪╖╕╔╒ñ▒ñ┐ñΩñ╣ñδ╔¼═╫ñ╧ñóñΩñ▐ñ╗ñ≤íú}
  195.  
  196. set exampleCommand5 {\
  197. XFEditSetPath .frame2
  198. XFEditSetType Combined 2
  199. .xfEdit.frame2.additional.additional select clear
  200. .xfEdit.frame2.template.template select clear
  201. .xfEdit.frame2.standard.standard select clear
  202. .xfEdit.frame2.template.template select from 0
  203. .xfEdit.frame2.template.template select to 0
  204. update idletasks
  205. XFEditInsertTmplt Combined/
  206. update idletasks
  207. XFEditSetType ListboxS 2
  208. .xfEdit.frame2.template.template select from 9
  209. .xfEdit.frame2.template.template select to 9
  210. update idletasks
  211. XFEditInsertTmplt ListboxLS
  212. update idletasks
  213. XFEditInsertTmplt ListboxLS
  214. update idletasks}
  215.  
  216.  
  217. set exampleName6 {ѪÑúÑ╕ѺÑ├Ñ╚ñ╬Ñ∞ÑñÑóѪÑ╚}
  218. set exampleText6 {\
  219. ñ│ñ∞ñ╟íóÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╦╔¼═╫ñ╩ѪÑúÑ╕ѺÑ├Ñ╚ñ≥ñ╣ñ┘
  220. ñ╞║ε└«ñ╖ñ▐ñ╖ñ┐íú╝íñ╧ñ╜ñ╬Ñ∞ÑñÑóѪÑ╚ñ╟ñ╣íúñ▐ñ║ñ╧íóÑó
  221. Ñ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╬Ñ╚Ñ├Ñ╫Ñ∞Ñ┘ÑδíªÑªÑúÑ≤Ñ╔Ѫñ≥┴¬┬≥ñ╖íó
  222. ÑßÑ╦Ñσí╝ñ╬ "Configuration" ñ½ñΘ "Packing" ñ╬╣α╠▄ñ≥
  223. ┴¬┬≥ñ╖ñ╞ñ»ñ└ñ╡ññíúpack ñ╬ñ┐ñßñ╬ѪÑúÑ≤Ñ╔Ѫñ¼╔╜╝¿ñ╡
  224. ñ∞ñ▐ñ╣íú
  225.  
  226. packing ñ╬ѪÑúÑ≤Ñ╔Ѫñ╦ñ╧íópack ñ╬ѬÑ╫Ñ╖ÑτÑ≤ñ≥╗╪─Ω
  227. ñ╣ñδñ┐ñßñ╬Ñ▄Ñ┐Ñ≤┼∙ñ╚íóÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╬ѪÑúÑ╕ѺÑ├
  228. Ñ╚ñ≥╔╜╝¿íª┴¬┬≥ñ╣ñδñ┐ñßñ╬ú▓ñ─ñ╬ÑΩÑ╣Ñ╚ñ¼ñóñΩñ▐ñ╣íú║╟
  229. ╜Θñ╦ packing ñ╬ѪÑúÑ≤Ñ╔Ѫñ¼╔╜╝¿ñ╡ñ∞ñδñ╚íó┴¬ñ╨ñ∞ñ┐
  230. ѪÑúÑ╕ѺÑ├Ñ╚ñ╚ñ╜ñ╬║╟╜Θñ╬╗╥╢íñ╬╠╛┴░ñ¼íóÑΩÑ╣Ñ╚ñ╬├µñ╟
  231. ╚┐┼╛ñ╖ñ╞╔╜╝¿ñ╡ñ∞ñ╞ñññ▐ñ╣íú
  232.  
  233. ║╕ñ╬ÑΩÑ╣Ñ╚ñ╦ñ╧íó╕╜║▀ñ╬Ñ╚Ñ├Ñ╫Ñ∞Ñ┘ÑδíªÑªÑúÑ≤Ñ╔Ѫñ╬ñ╣
  234. ñ┘ñ╞ñ╬╗╥╢íñ¼╔╜╝¿ñ╡ñ∞ñ╞ñññ▐ñ╣íúñ│ñ╬├µñ½ñΘíópack ñ╣
  235. ñδѪÑúÑ╕ѺÑ├Ñ╚ñ╬┐╞ñ≥┴¬┬≥ñ╖ñ▐ñ╣íú▒ªñ╬ÑΩÑ╣Ñ╚ñ╦ñ╧íó╕╜
  236. ║▀├σ╠▄ñ╣ñδѪÑúÑ╕ѺÑ├Ñ╚ñ╦ pack ñ╡ñ∞ñ┐ñ╣ñ┘ñ╞ñ╬╗╥╢íñ¼
  237. ╔╜╝¿ñ╡ñ∞ñ╞ñññ▐ñ╣íúñ│ñ╬├µñ½ñΘíópack ñ╣ñδѪÑúÑ╕ѺÑ├
  238. Ñ╚ñ≥┴¬┬≥ñ╖ñ▐ñ╣íú}
  239.  
  240. set exampleCommand6 {\
  241. XFEditSetPath .
  242. .xfEdit.frame1.configMenu.m post [winfo rootx .xfEdit.frame1.configMenu] [expr [winfo rooty .xfEdit.frame1.configMenu]+[winfo height .xfEdit.frame1.configMenu]]
  243. update idletasks
  244. .xfEdit.frame1.configMenu.m activate 0
  245. update idletasks
  246. .xfEdit.frame1.configMenu.m activate 2
  247. update idletasks
  248. .xfEdit.frame1.configMenu.m invoke 2
  249. update idletasks
  250. .xfEdit.frame1.configMenu.m unpost
  251. update idletasks}
  252.  
  253.  
  254. set exampleName7 {ÑßÑ╦Ñσí╝íªÑ╨í╝ñ╬Ñ∞ÑñÑóѪÑ╚}
  255. set exampleText7 {\
  256. "Children" ÑΩÑ╣Ñ╚ñ½ñΘú▒╚╓╠▄ñ╬ frame ñ≥┴¬ñ╙íópack 
  257. ñ╬ѬÑ╫Ñ╖ÑτÑ≤ñ╬├µñ½ñΘ "fillx" Ñ¬Ñ╫Ñ╖ÑτÑ≤ñ≥┴¬ñ≤ñ╟íó
  258. ñ│ñ╬ frame ñ¼┐╞ñ╬ѪÑúÑ≤Ñ╔Ѫñ╬╔²ñ≥╦Σñß┐╘ñ»ñ╣ñΦñªñ╦
  259. ╗╪─Ωñ╖ñ▐ñ╣íú}
  260.  
  261. set exampleCommand7 {\
  262. .xfPackingToplevel.frame2.children.childs.childs select from 0
  263. .xfPackingToplevel.frame2.children.childs.childs select to 0
  264. XFPackingGetPacking . Toplevel
  265. update idletasks
  266. .xfPackingToplevel.frame2.fill.fillx configure -state active
  267. update idletasks
  268. .xfPackingToplevel.frame2.fill.fillx configure -relief sunken
  269. update idletasks
  270. .xfPackingToplevel.frame2.fill.fillx invoke
  271. update idletasks
  272. .xfPackingToplevel.frame2.fill.fillx configure -state normal
  273. update idletasks
  274. .xfPackingToplevel.frame2.fill.fillx configure -relief raised
  275. update idletasks}
  276.  
  277.  
  278. set exampleName8 {Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩíªÑΘÑ┘Ñδñ╬Ñ∞ÑñÑóѪÑ╚}
  279. set exampleText8 {\
  280. ╝íñ╦ú▓╚╓╠▄ñ╬ frame ñ≥┴¬ñ╙íóú▒╚╓╠▄ñ╬ frame ñ╚╞▒ñ╕Ѭ
  281. Ñ╫Ñ╖ÑτÑ≤ñ≥╗╪─Ωñ╖ñ▐ñ╣íúñ│ñ╬ frame ñΓñ▐ñ┐íó┐╞ñ╬ѪÑú
  282. Ñ≤Ñ╔Ѫñ╬╔²ñ≥╦Σñß┐╘ñ»ñ╖ñ▐ñ╣íú}
  283.  
  284. set exampleCommand8 {\
  285. .xfPackingToplevel.frame2.children.childs.childs select from 1
  286. .xfPackingToplevel.frame2.children.childs.childs select to 1
  287. XFPackingGetPacking . Toplevel
  288. update idletasks
  289. .xfPackingToplevel.frame2.fill.fillx configure -state active
  290. update idletasks
  291. .xfPackingToplevel.frame2.fill.fillx configure -relief sunken
  292. update idletasks
  293. .xfPackingToplevel.frame2.fill.fillx invoke
  294. update idletasks
  295. .xfPackingToplevel.frame2.fill.fillx configure -state normal
  296. update idletasks
  297. .xfPackingToplevel.frame2.fill.fillx configure -relief raised
  298. update idletasks}
  299.  
  300.  
  301. set exampleName9 {╔╜╝¿╬╬░Φñ╬Ñ∞ÑñÑóѪÑ╚}
  302. set exampleText9 {\
  303. ú│╚╓╠▄ñ╬ frame ñ≥┴¬ñ╙íóñ│ñ╬ frame ñ╦ñ╧┐╞ñ╬ѪÑúÑ≤Ñ╔
  304. Ѫñ╬╗─ñΩñ╬╢⌡┤╓í╩╔²ñΓ╣Γñ╡ñΓí╦ñ≥╦Σñß┐╘ñ»ñ╣ñΦñªñ╦╗╪─Ω
  305. ñ╖ñ▐ñ╣íúñ│ñ∞ñ╧íóѬÑ╫Ñ╖ÑτÑ≤ñ╬ "fillx" ñ╚ "filly"íó
  306. "expand" ñ╬ú│ñ─ñ≥╗╪─Ωñ╣ñδñ│ñ╚ñ╦ñΦñ├ñ╞╣╘ñññ▐ñ╣íúñ╣
  307. ñ╩ñ∩ñ┴íóѪÑúÑ╕ѺÑ├Ñ╚ñ╧╗─ñΩñ╬╢⌡┤╓░∞╟╒ñ╦╣¡ñ▓ñΘñ∞íóñ╜
  308. ñ╬╢⌡┤╓ñ≥╦Σñß┐╘ñ»ñ╖ñ▐ñ╣íú}
  309.  
  310. set exampleCommand9 {\
  311. .xfPackingToplevel.frame2.children.childs.childs select from 2
  312. .xfPackingToplevel.frame2.children.childs.childs select to 2
  313. XFPackingGetPacking . Toplevel
  314. update idletasks
  315. .xfPackingToplevel.frame2.fill.fillx configure -state active
  316. update idletasks
  317. .xfPackingToplevel.frame2.fill.fillx configure -relief sunken
  318. update idletasks
  319. .xfPackingToplevel.frame2.fill.fillx invoke
  320. update idletasks
  321. .xfPackingToplevel.frame2.fill.fillx configure -state normal
  322. update idletasks
  323. .xfPackingToplevel.frame2.fill.fillx configure -relief raised
  324. update idletasks
  325. .xfPackingToplevel.frame2.fill.filly configure -state active
  326. update idletasks
  327. .xfPackingToplevel.frame2.fill.filly configure -relief sunken
  328. update idletasks
  329. .xfPackingToplevel.frame2.fill.filly invoke
  330. update idletasks
  331. .xfPackingToplevel.frame2.fill.filly configure -state normal
  332. update idletasks
  333. .xfPackingToplevel.frame2.fill.filly configure -relief raised
  334. update idletasks
  335. .xfPackingToplevel.frame2.expand.expand configure -state active
  336. update idletasks
  337. .xfPackingToplevel.frame2.expand.expand configure -relief sunken
  338. update idletasks
  339. .xfPackingToplevel.frame2.expand.expand invoke
  340. update idletasks
  341. .xfPackingToplevel.frame2.expand.expand configure -state normal
  342. update idletasks
  343. .xfPackingToplevel.frame2.expand.expand configure -relief raised
  344. update idletasks}
  345.  
  346.  
  347. set exampleName10 {ÑßÑ╦Ñσí╝íªÑ╨í╝ñ╬╗╥╢íñ╬Ñ∞ÑñÑóѪÑ╚}
  348. set exampleText10 {\
  349. ñ▐ñ║ñ╧░∞╚╓╛σñ╬ frame ñ≥┐╞ñ╚ñ╖ñ╞┴¬ñ╙ñ▐ñ╣íúñ│ñ∞ñ╧íó
  350. ñ│ñ╬ frame ñ╬╠╛┴░í╩.frame0í╦ñ≥║╕ñ╬ÑΩÑ╣Ñ╚ñ╬├µñ½ñΘÑ▐
  351. ѪÑ╣ñ╬Ñ└Ñ╓ÑδíªÑ»ÑΩÑ├Ñ»ñ╟┴¬ñ╓ñ│ñ╚ñ╦ñΦñ├ñ╞╣╘ñññ▐ñ╣íú
  352. ñ│ñ∞ñ╦╜╛ñ├ñ╞íó"Children" ÑΩÑ╣Ñ╚ñ╬╞Γ═╞ñ¼íóÑßÑ╦Ñσí╝íª
  353. Ñ╨í╝ñ╬╗╥╢íí╩menubuttoní╦ñ╦╩╤╣╣ñ╡ñ∞ñ▐ñ╣íú"Left" ñ╬
  354. ѬÑ╫Ñ╖ÑτÑ≤ñ≥┴¬ñ╓ñ│ñ╚ñ╦ñΦñ├ñ╞íómenubutton ñ¼ frame 
  355. ñ╬║╕├╝ñ╦┤≤ñ╗ñΘñ∞ñ▐ñ╣íú}
  356.  
  357. set exampleCommand10 {\
  358. .xfPackingToplevel.frame2.children.widgets.widgets select from 13
  359. .xfPackingToplevel.frame2.children.widgets.widgets select to 13
  360. update idletasks
  361. XFPackingMakeMaster .frame0 config Toplevel
  362. update idletasks
  363. .xfPackingToplevel.frame2.children.childs.childs select from 0
  364. .xfPackingToplevel.frame2.children.childs.childs select to 0
  365. update idletasks
  366. XFPackingGetPacking .frame0 Toplevel
  367. update idletasks
  368. .xfPackingToplevel.frame2.side.left configure -state active
  369. update idletasks
  370. .xfPackingToplevel.frame2.side.left configure -relief sunken
  371. update idletasks
  372. .xfPackingToplevel.frame2.side.left invoke
  373. update idletasks
  374. .xfPackingToplevel.frame2.side.left configure -state normal
  375. update idletasks
  376. .xfPackingToplevel.frame2.side.left configure -relief raised
  377. update idletasks}
  378.  
  379.  
  380. set exampleName11 {Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩíªÑΘÑ┘Ñδñ╬╗╥╢íñ╬Ñ∞ÑñÑóѪÑ╚}
  381. set exampleText11 {\
  382. ú▓╚╓╠▄ñ╬ frame ñ≥┐╞ñ╚ñ╖ñ╞┴¬ñ╙ñ▐ñ╣íúÑ╒ÑíÑñÑδ╠╛ñ≥╔╜
  383. ╝¿ñ╣ñδÑΘÑ┘Ñδñ≥┴¬┬≥ñ╖íó▒ª├╝ñ╦╟█├╓ñ╖ñ▐ñ╣íú╝íñ╦íóÑ╟Ñú
  384. Ñ∞Ñ»Ñ╚ÑΩ╠╛ñ≥╔╜╝¿ñ╣ñδÑΘÑ┘Ñδñ≥┴¬┬≥ñ╖íó║╕├╝ñ╦╟█├╓ñ╖ñ╞íó
  385. ñ╡ñΘñ╦ñ╜ñ╬ÑΘÑ┘Ñδñ≥ frame ñ╬╗─ñΩñ╬╢⌡┤╓ñ╬╔²░∞╟╒ñ╦╣¡
  386. ñ▓ñ▐ñ╣íú}
  387.  
  388. set exampleCommand11 {\
  389. .xfPackingToplevel.frame2.children.widgets.widgets select from 10
  390. .xfPackingToplevel.frame2.children.widgets.widgets select to 10
  391. update idletasks
  392. XFPackingMakeMaster .frame1 config Toplevel
  393. update idletasks
  394. .xfPackingToplevel.frame2.children.childs.childs select from 1
  395. .xfPackingToplevel.frame2.children.childs.childs select to 1
  396. update idletasks
  397. XFPackingGetPacking .frame1 Toplevel
  398. update idletasks
  399. .xfPackingToplevel.frame2.side.right configure -state active
  400. update idletasks
  401. .xfPackingToplevel.frame2.side.right configure -relief sunken
  402. update idletasks
  403. .xfPackingToplevel.frame2.side.right invoke
  404. update idletasks
  405. .xfPackingToplevel.frame2.side.right configure -state normal
  406. update idletasks
  407. .xfPackingToplevel.frame2.side.right configure -relief raised
  408. update idletasks
  409. .xfPackingToplevel.frame2.fill.fillx configure -state active
  410. update idletasks
  411. .xfPackingToplevel.frame2.fill.fillx configure -relief sunken
  412. update idletasks
  413. .xfPackingToplevel.frame2.fill.fillx invoke
  414. update idletasks
  415. .xfPackingToplevel.frame2.fill.fillx configure -state normal
  416. update idletasks
  417. .xfPackingToplevel.frame2.fill.fillx configure -relief raised
  418. update idletasks
  419. .xfPackingToplevel.frame2.children.childs.childs select from 0
  420. .xfPackingToplevel.frame2.children.childs.childs select to 0
  421. update idletasks
  422. XFPackingGetPacking .frame1 Toplevel
  423. update idletasks
  424. .xfPackingToplevel.frame2.side.left configure -state active
  425. update idletasks
  426. .xfPackingToplevel.frame2.side.left configure -relief sunken
  427. update idletasks
  428. .xfPackingToplevel.frame2.side.left invoke
  429. update idletasks
  430. .xfPackingToplevel.frame2.side.left configure -state normal
  431. update idletasks
  432. .xfPackingToplevel.frame2.side.left configure -relief raised
  433. update idletasks
  434. .xfPackingToplevel.frame2.fill.fillx configure -state active
  435. update idletasks
  436. .xfPackingToplevel.frame2.fill.fillx configure -relief sunken
  437. update idletasks
  438. .xfPackingToplevel.frame2.fill.fillx invoke
  439. update idletasks
  440. .xfPackingToplevel.frame2.fill.fillx configure -state normal
  441. update idletasks
  442. .xfPackingToplevel.frame2.fill.fillx configure -relief raised
  443. update idletasks
  444. .xfPackingToplevel.frame2.expand.expand configure -state active
  445. update idletasks
  446. .xfPackingToplevel.frame2.expand.expand configure -relief sunken
  447. update idletasks
  448. .xfPackingToplevel.frame2.expand.expand invoke
  449. update idletasks
  450. .xfPackingToplevel.frame2.expand.expand configure -state normal
  451. update idletasks
  452. .xfPackingToplevel.frame2.expand.expand configure -relief raised
  453. update idletasks}
  454.  
  455.  
  456. set exampleName12 {╔╜╝¿╬╬░Φñ╬╗╥╢íñ╬Ñ∞ÑñÑóѪÑ╚}
  457. set exampleText12 {\
  458. ú│╚╓╠▄ñ╬ frame ñ≥┐╞ñ╚ñ╖ñ╞┴¬ñ╙ñ▐ñ╣íúñ╜ñ╖ñ╞ú▒ñ─╠▄ñ╬
  459. ÑΩÑ╣Ñ╚ñ≥┴¬┬≥ñ╖íó║╕ñ╦╟█├╓ñ╖ñ▐ñ╣íúñ╡ñΘñ╦ú▓ñ─╠▄ñ╬ÑΩÑ╣
  460. Ñ╚ñ≥┴¬┬≥ñ╖íó╞▒══ñ╦║╕ñ╦╟█├╓ñ╖ñ▐ñ╣íúñ╜ñªñ╣ñδñ╚íóú▓ñ─
  461. ╠▄ñ╬ÑΩÑ╣Ñ╚ñ╧íóú▒ñ─╠▄ñ╬ÑΩÑ╣Ñ╚ñ╬▒ª╬┘ñ╦╟█├╓ñ╡ñ∞ñ▐ñ╣íú
  462. ú▓ñ─ñ╬ÑΩÑ╣Ñ╚ñ╧íó╢ªñ╦ "fill" Ñ¬Ñ╫Ñ╖ÑτÑ≤ñ¼╗╪─Ωñ╡ñ∞ñ╞
  463. ñññ▐ñ╣íúñ╡ñΘñ╦▒ªñ╬ÑΩÑ╣Ñ╚ñ╦ñ╧ "expand" ñ¼╗╪─Ωñ╡ñ∞íó
  464. ┐╞ñ╬ѪÑúÑ≤Ñ╔Ѫñ╬╗─ñΩñ╬╢⌡┤╓░∞╟╒ñ╦╣¡ñ▓ñΘñ∞ñ▐ñ╣íú}
  465.  
  466. set exampleCommand12 {\
  467. .xfPackingToplevel.frame2.children.widgets.widgets select from 1
  468. .xfPackingToplevel.frame2.children.widgets.widgets select to 1
  469. update idletasks
  470. XFPackingMakeMaster .frame2 config Toplevel
  471. update idletasks
  472. .xfPackingToplevel.frame2.children.childs.childs select from 0
  473. .xfPackingToplevel.frame2.children.childs.childs select to 0
  474. update idletasks
  475. XFPackingGetPacking .frame2 Toplevel
  476. update idletasks
  477. .xfPackingToplevel.frame2.side.left configure -state active
  478. update idletasks
  479. .xfPackingToplevel.frame2.side.left configure -relief sunken
  480. update idletasks
  481. .xfPackingToplevel.frame2.side.left invoke
  482. update idletasks
  483. .xfPackingToplevel.frame2.side.left configure -state normal
  484. update idletasks
  485. .xfPackingToplevel.frame2.side.left configure -relief raised
  486. update idletasks
  487. .xfPackingToplevel.frame2.children.childs.childs select from 1
  488. .xfPackingToplevel.frame2.children.childs.childs select to 1
  489. update idletasks
  490. XFPackingGetPacking .frame2 Toplevel
  491. update idletasks
  492. .xfPackingToplevel.frame2.side.left configure -state active
  493. update idletasks
  494. .xfPackingToplevel.frame2.side.left configure -relief sunken
  495. update idletasks
  496. .xfPackingToplevel.frame2.side.left invoke
  497. update idletasks
  498. .xfPackingToplevel.frame2.side.left configure -state normal
  499. update idletasks
  500. .xfPackingToplevel.frame2.side.left configure -relief raised
  501. update idletasks
  502. .xfPackingToplevel.frame2.expand.expand configure -state active
  503. update idletasks
  504. .xfPackingToplevel.frame2.expand.expand configure -relief sunken
  505. update idletasks
  506. .xfPackingToplevel.frame2.expand.expand invoke
  507. update idletasks
  508. .xfPackingToplevel.frame2.expand.expand configure -state normal
  509. update idletasks
  510. .xfPackingToplevel.frame2.expand.expand configure -relief raised
  511. update idletasks}
  512.  
  513.  
  514. set exampleName13 {menubutton ñ╬Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ω}
  515. set exampleText13 {\
  516. ñ│ñ∞ñ╟Ñ∞ÑñÑóѪÑ╚ñ¼╜¬ñΩñ▐ñ╖ñ┐íú╝íñ╧íóѪÑúÑ╕ѺÑ├Ñ╚ñ╬
  517. Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ωñ╟ñ╣íúñ▐ñ║╜Θñßñ╦íóÑßÑ╦Ñσí╝íªÑ╨í╝╛σñ╬
  518. menubutton ñ≥╝ΦñΩ░╖ñññ▐ñ╣íúñ│ñ∞ñ╦ñ╧ñ▐ñ║íóÑßÑ╦Ñσí╝íª
  519. Ñ╨í╝ñ╬ frameí╩.frame0í╦ñ≥┐╞ñ╚ñ╖ñ╞┴¬ñ╙ñ▐ñ╣íúñ╜ñ╖ñ╞íó
  520. packing ñ╬ѪÑúÑ≤Ñ╔Ѫñ╬ "Child parameters" ñ╬Ñ▄Ñ┐Ñ≤
  521. ñ≥▓íñ╣ñ╚íóÑ╤ÑΘÑßÑ┐└▀─Ωñ╬ñ┐ñßñ╬ѪÑúÑ≤Ñ╔Ѫñ¼╔╜╝¿ñ╡ñ∞
  522. ñ▐ñ╣íúñóñδñññ╧íó║ε╢╚╬╬░Φ╛σñ╬ѪÑúÑ╕ѺÑ├Ñ╚ñ≥─╛└▄Ñ▐Ѫ
  523. Ñ╣ñ╬▒ªÑ▄Ñ┐Ñ≤ñ╟Ñ└Ñ╓ÑδíªÑ»ÑΩÑ├Ñ»ñ╖ñ╞ñΓ╣╜ñññ▐ñ╗ñ≤íú}
  524.  
  525. set exampleCommand13 {\
  526. .xfPackingToplevel.frame2.children.widgets.widgets select from 13
  527. .xfPackingToplevel.frame2.children.widgets.widgets select to 13
  528. update idletasks
  529. XFPackingMakeMaster .frame0 config Toplevel
  530. update idletasks
  531. .xfPackingToplevel.frame2.children.childs.childs select from 0
  532. .xfPackingToplevel.frame2.children.childs.childs select to 0
  533. update idletasks
  534. XFPackingGetPacking .frame0 Toplevel
  535. update idletasks
  536. .xfPackingToplevel.additional.chldparameters configure -state active
  537. update idletasks
  538. .xfPackingToplevel.additional.chldparameters configure -relief sunken
  539. update idletasks
  540. .xfPackingToplevel.additional.chldparameters invoke
  541. update idletasks
  542. .xfPackingToplevel.additional.chldparameters configure -state normal
  543. update idletasks
  544. .xfPackingToplevel.additional.chldparameters configure -relief raised
  545. update idletasks}
  546.  
  547.  
  548. set exampleName14 {menubutton ñ╬Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ω}
  549. set exampleText14 {\
  550. ñ▐ñ║ menubutton ñ╬ÑΘÑ┘Ñδñ¼╞■╬╧ñ╡ñ∞íó╝íñ╦ "Menu" Ñ▄
  551. Ñ┐Ñ≤ñ¼▓íñ╡ñ∞ñ╞íóÑßÑ╦Ñσí╝ñ≥─Ω╡┴ñ╣ñδñ┐ñßñ╬ѪÑúÑ≤Ñ╔Ѫ
  552. ñ¼╔╜╝¿ñ╡ñ∞ñ▐ñ╣íú}
  553.  
  554. set exampleCommand14 {\
  555. .xfMenubuttonConfig4.params1.params2.text.text delete 0 end
  556. update idletasks
  557. .xfMenubuttonConfig4.params1.params2.text.text insert end File
  558. update idletasks
  559. .xfMenubuttonConfig4.additional.menu configure -state active
  560. update idletasks
  561. .xfMenubuttonConfig4.additional.menu configure -relief sunken
  562. update idletasks
  563. .xfMenubuttonConfig4.additional.menu invoke
  564. update idletasks
  565. .xfMenubuttonConfig4.additional.menu configure -state normal
  566. update idletasks
  567. .xfMenubuttonConfig4.additional.menu configure -relief raised
  568. update idletasks}
  569.  
  570.  
  571. set exampleName15 {Ñ╫ÑδÑ└ѪÑ≤íªÑßÑ╦Ñσí╝ñ╬─Ω╡┴}
  572. set exampleText15 {\
  573. ñ│ñ│ñ╟ÑßÑ╦Ñσí╝ñ╬╣α╠▄╠╛ñ╚íóñ╜ñ╬╣α╠▄ñ¼┴¬ñ╨ñ∞ñ┐╗■ñ╦╝┬
  574. ╣╘ñ╣ñδÑ│Ñ▐Ñ≤Ñ╔ñ≥╞■╬╧ñ╖ñ▐ñ╣íú╞■╬╧ñ¼╜¬ñ├ñ╞ "Insert" 
  575. Ñ▄Ñ┐Ñ≤ñ¼▓íñ╡ñ∞ñδñ╚íóñ╜ñ╬╣α╠▄ñ╧▒ª┬ªñ╬ÑΩÑ╣Ñ╚ñ╦╔╜╝¿ñ╡
  576. ñ∞ñ▐ñ╣íú║╟╜Θñ╬╣α╠▄ "Refresh" ñ╧íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ
  577. ═╞ñ≥║╞╔╜╝¿ñ╣ñδñΓñ╬ñ╟ñ╣íúú▓ñ─ñßñ╬╣α╠▄ "Quit" ñ╧íóÑ╫
  578. ÑφÑ░ÑΘÑαñ╬╝┬╣╘ñ≥╜¬╬╗ñ╣ñδñ┐ñßñ╬ñΓñ╬ñ╟ñ╣íú}
  579.  
  580. set exampleCommand15 {\
  581. global xfStatus
  582. set xfTmpCounter [expr $xfStatus(menuCounter)-1]
  583. XFMiscSetText .xfMenuConfig5$xfTmpCounter.params1.params2.frame1.elements.elem2.command.command TkBroRefresh
  584. update idletasks
  585. .xfMenubuttonConfig4.leave.ok configure -state active
  586. update idletasks
  587. .xfMenubuttonConfig4.leave.ok configure -relief sunken
  588. update idletasks
  589. .xfMenubuttonConfig4.leave.ok invoke
  590. update idletasks
  591. .xfMenuConfig5$xfTmpCounter.params1.params2.frame1.elements.elem2.label.label delete 0 end
  592. update idletasks
  593. .xfMenuConfig5$xfTmpCounter.params1.params2.frame1.elements.elem2.label.label insert end Refresh
  594. update idletasks
  595. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -state active
  596. update idletasks
  597. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -relief sunken
  598. update idletasks
  599. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert invoke
  600. update idletasks
  601. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -state normal
  602. update idletasks
  603. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -relief raised
  604. update idletasks
  605. XFMiscSetText .xfMenuConfig5$xfTmpCounter.params1.params2.frame1.elements.elem2.command.command "destroy .; exit"
  606. update idletasks
  607. .xfMenuConfig5$xfTmpCounter.params1.params2.frame1.elements.elem2.label.label delete 0 end
  608. update idletasks
  609. .xfMenuConfig5$xfTmpCounter.params1.params2.frame1.elements.elem2.label.label insert end Quit
  610. update idletasks
  611. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -state active
  612. update idletasks
  613. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -relief sunken
  614. update idletasks
  615. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert invoke
  616. update idletasks
  617. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -state normal
  618. update idletasks
  619. .xfMenuConfig5$xfTmpCounter.params1.params2.commands.insert configure -relief raised
  620. update idletasks}
  621.  
  622.  
  623. set exampleName16 {Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩíªÑΘÑ┘Ñδñ╬Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ω}
  624. set exampleText16 {\
  625. ╝íñ╦íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩ╠╛ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╬ÑΘÑ┘Ñδñ≥╝ΦñΩ░╖
  626. ñññ▐ñ╣íú}
  627.  
  628. set exampleCommand16 {\
  629. global xfStatus
  630. set xfTmpCounter [expr $xfStatus(menuCounter)-1]
  631. .xfMenuConfig5$xfTmpCounter.leave.ok configure -state active
  632. update idletasks
  633. .xfMenuConfig5$xfTmpCounter.leave.ok configure -relief sunken
  634. update idletasks
  635. .xfMenuConfig5$xfTmpCounter.leave.ok invoke
  636. update idletasks
  637. .xfPackingToplevel.frame2.children.widgets.widgets select from 10
  638. .xfPackingToplevel.frame2.children.widgets.widgets select to 10
  639. update idletasks
  640. XFPackingMakeMaster .frame1 config Toplevel
  641. update idletasks
  642. .xfPackingToplevel.frame2.children.childs.childs select from 0
  643. .xfPackingToplevel.frame2.children.childs.childs select to 0
  644. update idletasks
  645. XFPackingGetPacking .frame1 Toplevel
  646. update idletasks
  647. .xfPackingToplevel.additional.chldparameters configure -state active
  648. update idletasks
  649. .xfPackingToplevel.additional.chldparameters configure -relief sunken
  650. update idletasks
  651. .xfPackingToplevel.additional.chldparameters invoke
  652. update idletasks
  653. .xfPackingToplevel.additional.chldparameters configure -state normal
  654. update idletasks
  655. .xfPackingToplevel.additional.chldparameters configure -relief raised
  656. update idletasks}
  657.  
  658.  
  659. set exampleName17 {Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩíªÑΘÑ┘Ñδñ╬Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ω}
  660. set exampleText17 {\
  661. ñ│ñ│ñ╟íóú▓╚╓╠▄ñ╬ frame ñ╬║╕┬ªñ╬ÑΘÑ┘Ñδñ¼Ñ╟ÑúÑ∞Ñ»Ñ╚
  662. ÑΩñ╬Ñ╤Ñ╣╠╛ñ≥╔╜╝¿ñ╣ñδñΦñªñ╦└▀─Ωñ╖ñ▐ñ╣íúñ│ñ╬ÑΘÑ┘Ñδñ╦
  663. ñ╧íó╝Ω┬│ñ¡ñ½ñΘ═╞░╫ñ╦╗▓╛╚ñ╟ñ¡ñδñΦñªñ╦ "dirName" ñ╚
  664. ñññªÑ╖Ñ≤Ñ▄ÑΩÑ├Ñ»╠╛ñ¼─Ω╡┴ñ╡ñ∞ñ▐ñ╣íúñ╡ñΘñ╦íóÑΘÑ┘Ñδñ╬
  665. ╜Θ┤ⁿ├═ñ╚ñ╖ñ╞ "/usr/local..." ñ¼═┐ñ¿ñΘñ∞ñ▐ñ╣íú}
  666.  
  667. set exampleCommand17 {\
  668. .xfLabelConfig4.params1.params2.text.text delete 0 end
  669. update idletasks
  670. .xfLabelConfig4.params1.params2.text.text insert end /usr/local...
  671. update idletasks
  672. .xfLabelConfig4.params1.params2.symname.symname delete 0 end
  673. update idletasks
  674. .xfLabelConfig4.params1.params2.symname.symname insert end dirName
  675. update idletasks}
  676.  
  677.  
  678. set exampleName18 {ñ╜ñ╬┬╛ñ╬Ñ╤ÑΘÑßÑ┐}
  679. set exampleText18 {\
  680. ñ╡ñΘñ╦Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ωñ≥┬│ñ▒ñδñ∩ñ▒ñ╟ñ╣ñ¼íóñ│ñ│ñ╟ñ╧ñ╜
  681. ñ╬Ñ└ÑñÑóÑφÑ░ñ╧╛╩╬¼ñ╖íóñ╣ñ┘ñ╞ñ╬Ñ╤ÑΘÑßÑ┐ñ╬└▀─Ωñ¼╜¬ñ├
  682. ñ┐ñΓñ╬ñ╚ñ╖ñ▐ñ╣íú}
  683.  
  684. set exampleCommand18 {\
  685. .frame1 configure -borderwidth 0
  686. .frame1.label4 configure -anchor w
  687. .frame2 configure -borderwidth 0
  688. .frame2.frame.listbox1 configure -geometry 20x10
  689. XFMiscSetSymbolicName .frame1.label5 fileName
  690. XFMiscSetSymbolicName .frame2.frame.listbox1 dirList
  691. XFMiscSetSymbolicName .frame2.frame6.listbox1 contentsList
  692. update idletasks
  693. .xfLabelConfig4.leave.ok configure -state active
  694. update idletasks
  695. .xfLabelConfig4.leave.ok configure -relief sunken
  696. update idletasks
  697. .xfLabelConfig4.leave.ok invoke
  698. update idletasks
  699. .xfPackingToplevel.frame1.ok configure -state active
  700. update idletasks
  701. .xfPackingToplevel.frame1.ok configure -relief sunken
  702. update idletasks
  703. .xfPackingToplevel.frame1.ok invoke
  704. update idletasks}
  705.  
  706.  
  707. set exampleName19 {╞░║εñ╬─Ω╡┴}
  708. set exampleText19 {\
  709. ñ│ñ∞ñ╟Ñ╫ÑφÑ░ÑΘÑαñ╬┬τ╧╚ñ¼ñ╟ñ¡ñ▐ñ╖ñ┐íú╝íñ╧íó╝Ω┬│ñ¡ñ≥
  710. ─Ω╡┴ñ╖ñ╞í╪╡í╟╜í┘ñ≥─╔▓├ñ╖ñ▐ñ╣íúñ▐ñ║╜Θñßñ╦íóÑ╫ÑφÑ░ÑΘ
  711. Ñαñ╬║╟╜Θíóñ╣ñ╩ñ∩ñ┴ñ╣ñ┘ñ╞ñ╬ѪÑúÑ╕ѺÑ├Ñ╚ñ¼║εñΘñ∞ñ┐─╛
  712. ╕σñ╦╝┬╣╘ñ╡ñ∞ñδ╝Ω┬│ñ¡ñ≥─Ω╡┴ñ╖ñ▐ñ╣íúñ│ñ╬Ñ╜í╝Ñ╣ñ╧í╩Ñß
  713. ÑñÑ≤íªÑδí╝Ñ╫ñ╦└⌐╕µñ¼┼╧ñ╡ñ∞ñδ┴░ñ╦╝┬╣╘ñ╡ñ∞ñδ║╟╕σñ╬Ñ╜í╝
  714. Ñ╣ñ╚ñññª░╒╠úñ╟í╦"end source" ñ╚╕╞ñ╨ñ∞ñ▐ñ╣íú╩╘╜╕ѪÑú
  715. Ñ≤Ñ╔Ѫñ╬ÑßÑ╦Ñσí╝ "Programming" ñ½ñΘ "End source" 
  716. ñ╬╣α╠▄ñ≥┴¬ñ≤ñ╟íóÑ│í╝Ñ╔ñ≥╞■╬╧ñ╖ñ╞▓╝ñ╡ññíú}
  717.  
  718. set exampleCommand19 {\
  719. .xfEdit.frame1.infoMenu.m post [winfo rootx .xfEdit.frame1.infoMenu] [expr [winfo rooty .xfEdit.frame1.infoMenu]+[winfo height .xfEdit.frame1.infoMenu]]
  720. update idletasks
  721. .xfEdit.frame1.infoMenu.m activate 0
  722. update idletasks
  723. .xfEdit.frame1.infoMenu.m activate 1
  724. update idletasks
  725. .xfEdit.frame1.infoMenu.m activate 2
  726. update idletasks
  727. .xfEdit.frame1.infoMenu.m activate 4
  728. update idletasks
  729. .xfEdit.frame1.infoMenu.m activate 5
  730. update idletasks
  731. .xfEdit.frame1.infoMenu.m activate 6
  732. update idletasks
  733. .xfEdit.frame1.infoMenu.m activate 7
  734. update idletasks
  735. .xfEdit.frame1.infoMenu.m activate 8
  736. update idletasks
  737. .xfEdit.frame1.infoMenu.m invoke 8
  738. update idletasks
  739. .xfEdit.frame1.infoMenu.m unpost
  740. update idletasks}
  741.  
  742.  
  743. set exampleName20 {end source ñ╬─Ω╡┴}
  744. set exampleText20 {\
  745. ñ│ñ╬Ñ╜í╝Ñ╣ñ╧íó╕╜║▀ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩ╠╛ñ≥╩▌╗²ñ╣ñδñ┐ñßñ╬
  746. "curDir" ñ╚ñññª╠╛┴░ñ╬┬τ░Φ╩╤┐⌠ñ≥─Ω╡┴ñ╖ñ▐ñ╣íúñ╜ñ╬╕σíó
  747. ╕╜║▀ñ╬Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ═╞ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╦íóÑΩÑ╣Ñ╚ñ╬
  748. ╞Γ═╞ñ¼╣╣┐╖ñ╡ñ∞ñ▐ñ╣íúÑ╞Ñ╣Ñ╚ñ╟ñ╧ñ│ñ╬ "end source" ñ╧
  749. ╔╛▓┴ñ╡ñ∞ñ╩ñññ╬ñ╟íóñ│ñ╬╗■┼└ñ╟Ñ╞Ñ╣Ñ╚ñ≥╝┬╣╘ñ╣ñδñ┐ñßñ╦
  750. ñ╧íóñ│ñ╬┬τ░Φ╩╤┐⌠ñ≥╝Ωñ╟í╩╩╠ñ╬ XF ñ╬Ñ└ÑñÑóÑφÑ░ñ≥═╤ññ
  751. ñ╞í╦─Ω╡┴ñ╖ñ╩ñ▒ñ∞ñ╨ñ╩ñΩñ▐ñ╗ñ≤íú}
  752.  
  753. set exampleCommand20 {\
  754. XFMiscSetText .xfInfoProc.frame4.text.text "global curDir
  755. set curDir \[pwd\]
  756. TkBroRefresh"
  757. update idletasks}
  758.  
  759.  
  760. set exampleName21 {╝Ω┬│ñ¡ñ╦ñ─ñññ╞}
  761. set exampleText21 {\
  762. ÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ╬╝Ω┬│ñ¡ñ≥─Ω╡┴ñ╖ñ┐ñΩ╩╤╣╣ñ╖ñ┐ñΩñ╣ñδ
  763. ñ┐ñßñ╬Ñ└ÑñÑóÑφÑ░íªÑªÑúÑ≤Ñ╔Ѫñ≥╕╞ñ╙╜╨ñ╖ñ▐ñ╣íú╩╘╜╕ѪÑú
  764. Ñ≤Ñ╔Ѫñ╬ÑßÑ╦Ñσí╝ "Programming" ñ½ñΘ "Procedures" 
  765. ñ╬╣α╠▄ñ≥┴¬┬≥ñ╖ñ╞▓╝ñ╡ññíú}
  766.  
  767. set exampleCommand21 {\
  768. .xfInfoProc.frame1.add configure -state active
  769. update idletasks
  770. .xfInfoProc.frame1.add configure -relief sunken
  771. update idletasks
  772. .xfInfoProc.frame1.add invoke
  773. update idletasks
  774. .xfInfoProc.frame3.ok configure -state active
  775. update idletasks
  776. .xfInfoProc.frame3.ok configure -relief sunken
  777. update idletasks
  778. .xfInfoProc.frame3.ok invoke
  779. update idletasks
  780. .xfEdit.frame1.infoMenu.m post [winfo rootx .xfEdit.frame1.infoMenu] [expr [winfo rooty .xfEdit.frame1.infoMenu]+[winfo height .xfEdit.frame1.infoMenu]]
  781. update idletasks
  782. .xfEdit.frame1.infoMenu.m activate 0
  783. update idletasks
  784. .xfEdit.frame1.infoMenu.m activate 1
  785. update idletasks
  786. .xfEdit.frame1.infoMenu.m invoke 1
  787. update idletasks
  788. .xfEdit.frame1.infoMenu.m unpost
  789. update idletasks}
  790.  
  791.  
  792. set exampleName22 {Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ═╞ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╬╝Ω┬│ñ¡}
  793. set exampleText22 {\
  794. ñ│ñ╬Ñ└ÑñÑóÑφÑ░íªÑªÑúÑ≤Ñ╔Ѫñ≥═╤ñññ╞íó╝Ω┬│ñ¡ñ╬╠╛┴░ñΣ
  795. ░·┐⌠íóÑ╜í╝Ñ╣Ñ│í╝Ñ╔ñ╩ñ╔ñ≥─Ω╡┴ñ╣ñδñ│ñ╚ñ¼ñ╟ñ¡ñ▐ñ╣íúñ│
  796. ñ│ñ╟ñ╧ "TkBroRefresh" ñ╚ñññª╠╛┴░ñ╟íó┐╖ñ┐ñ╦Ñ╟ÑúÑ∞Ñ»
  797. Ñ╚ÑΩñ¼╞╔ñ▐ñ∞ñ┐╗■ñ╦íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬ÑΩÑ╣Ñ╚ñ≥╔╜╝¿ñ╣ñδ
  798. ñ┐ñßñ╬╝Ω┬│ñ¡ñ≥╞■╬╧ñ╖ñ▐ñ╖ñ┐íú}
  799.  
  800. set exampleCommand22 {\
  801. XFMiscSetText .xfInfoProc.frame4.text.text "
  802. global curDir
  803.  
  804. set list \[exec ls -a\]
  805. \[SymbolicName dirList\] delete 0 end
  806. \[SymbolicName contentsList\] delete 0 end
  807. \[SymbolicName dirName\] configure -text \$curDir
  808. \[SymbolicName fileName\] configure -text {}
  809. foreach i \$list {
  810.   \[SymbolicName dirList\] insert end \$i
  811. }
  812. update"
  813. update idletasks
  814. .xfInfoProc.current.current delete 0 end
  815. update idletasks
  816. .xfInfoProc.current.current insert end TkBroRefresh
  817. update idletasks
  818. .xfInfoProc.frame4.args.args delete 0 end
  819. update idletasks}
  820.  
  821.  
  822. set exampleName23 {Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╞Γ═╞ñ≥╔╜╝¿ñ╣ñδñ┐ñßñ╬╝Ω┬│ñ¡}
  823. set exampleText23 {\
  824. "Insert" Ñ▄Ñ┐Ñ≤ñ≥▓íñ╖ñ╞íó╝Ω┬│ñ¡ñ≥─Ω╡┴ñ╖ñ▐ñ╣íú}
  825.  
  826. set exampleCommand23 {\
  827. .xfInfoProc.frame1.add configure -state active
  828. update idletasks
  829. .xfInfoProc.frame1.add configure -relief sunken
  830. update idletasks
  831. .xfInfoProc.frame1.add invoke
  832. update idletasks
  833. .xfInfoProc.frame1.add configure -relief raised
  834. update idletasks}
  835.  
  836.  
  837. set exampleName24 {ñ╜ñ╬┬╛ñ╬╝Ω┬│ñ¡}
  838. set exampleText24 {\
  839. ñ╡ñΘñ╦╝Ω┬│ñ¡ñ╬─Ω╡┴ñ≥┬│ñ▒ñδñ∩ñ▒ñ╟ñ╣ñ¼íóñ│ñ│ñ╟ñ╧ñ╜ñ╬
  840. Ñ└ÑñÑóÑφÑ░ñ╧╛╩╬¼ñ╖íóñ╣ñ┘ñ╞ñ╬╝Ω┬│ñ¡ñ╬─Ω╡┴ñ¼╜¬ñ├ñ┐ñΓ
  841. ñ╬ñ╚ñ╖ñ▐ñ╣íú}
  842.  
  843. set exampleCommand24 {\
  844. proc TkBroOpen {fname} {
  845.   global curDir
  846.  
  847.   if {[file isdirectory $fname]} {
  848.     cd $fname
  849.     set curDir [pwd]
  850.     TkBroRefresh
  851.   } {
  852.     set thisfile [open $fname r]
  853.     [SymbolicName contentsList] delete 0 end
  854.     [SymbolicName fileName] configure -text $fname
  855.     for { set i 1 } { $i<50 } { incr i } {
  856.       [SymbolicName contentsList] insert end [ gets $thisfile ]
  857.     }
  858.     update
  859.     close $thisfile
  860.   }
  861. }
  862. update idletasks
  863. .xfInfoProc.frame3.ok configure -state active
  864. update idletasks
  865. .xfInfoProc.frame3.ok configure -relief sunken
  866. update idletasks
  867. .xfInfoProc.frame3.ok invoke
  868. update idletasks}
  869.  
  870.  
  871. set exampleName25 {ÑΩÑ╣Ñ╚ñ╦┬╨ñ╣ñδ╞░║εñ╬─Ω╡┴}
  872. set exampleText25 {\
  873. Ñ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬╩╤╣╣ñΣÑ╒ÑíÑñÑδñ╬╔╜╝¿ñ≥╗╪╝¿ñ╣ñδñ┐ñßñ╬
  874. ╞░║εñ≥íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ╬ listbox ñ╬╣α╠▄ñ╦┬╨ñ╖ñ╞─Ω╡┴
  875. ñ╖ñ▐ñ╣íú╩╘╜╕ѪÑúÑ≤Ñ╔Ѫñ╬ÑßÑ╦Ñσí╝ "Configuration" 
  876. ñ½ñΘ "Binding" ñ╬╣α╠▄ñ≥┴¬┬≥ñ╖ñ╞íóbinding ñ╬Ñ└ÑñÑó
  877. ÑφÑ░íªÑªÑúÑ≤Ñ╔Ѫñ≥╕╞ñ╙╜╨ñ╖ñ╞▓╝ñ╡ññíú}
  878.  
  879. set exampleCommand25 {\
  880. XFEditSetPath [SymbolicName dirList]
  881. .xfEdit.frame1.configMenu.m post [winfo rootx .xfEdit.frame1.configMenu] [expr [winfo rooty .xfEdit.frame1.configMenu]+[winfo height .xfEdit.frame1.configMenu]]
  882. update idletasks
  883. .xfEdit.frame1.configMenu.m activate 0
  884. update idletasks
  885. .xfEdit.frame1.configMenu.m activate 2
  886. update idletasks
  887. .xfEdit.frame1.configMenu.m activate 3
  888. update idletasks
  889. .xfEdit.frame1.configMenu.m activate 4
  890. update idletasks
  891. .xfEdit.frame1.configMenu.m activate 5
  892. update idletasks
  893. .xfEdit.frame1.configMenu.m activate 6
  894. update idletasks
  895. .xfEdit.frame1.configMenu.m invoke 6
  896. update idletasks
  897. .xfEdit.frame1.configMenu.m unpost
  898. update idletasks}
  899.  
  900.  
  901. set exampleName26 {ÑΩÑ╣Ñ╚ñ╦┬╨ñ╣ñδ╞░║εñ╬─Ω╡┴}
  902. set exampleText26 {\
  903. ñ▐ñ║ñ╧íó"Current event:" ñ╦ÑñÑ┘Ñ≤Ñ╚ñ╬╠╛┴░ñ≥╞■╬╧ñ╖
  904. ñ▐ñ╣íúñ│ñ╬ÑñÑ┘Ñ≤Ñ╚ñ¼íóÑΩÑ╣Ñ╚ñ╦┬╨ñ╖ñ╞─Ω╡┴ñ╣ñδ╞░║εñ≥
  905. ░·ñ¡╡»ñ│ñ╣ñ¡ñ├ñ½ñ▒ñ╚ñ╩ñδñΓñ╬ñ╟ñ╣íú╞░║εñ╦┤╪ñ╣ñδ╝Ω┬│
  906. ñ¡ñ╬╡¡╜╥ñ╧íóÑ└ÑñÑóÑφÑ░íªÑªÑúÑ≤Ñ╔Ѫñ╬▓╝╔⌠ñ╦ñóñδÑ╞Ñ¡
  907. Ñ╣Ñ╚íªÑ╒Ñúí╝ÑδÑ╔ñ╦╞■╬╧ñ╖ñ╞▓╝ñ╡ññíúñ│ñ╬╬πñ╟─Ω╡┴ñ╡ñ∞
  908. ñ┐╝Ω┬│ñ¡ "TkBroOpen" ñ╧íóÑ╟ÑúÑ∞Ñ»Ñ╚ÑΩñ≥╩╤╣╣ñ╖íóÑ╒Ñí
  909. ÑñÑδñ╬╞Γ═╞ñ≥╔╜╝¿ñ╣ñδñΓñ╬ñ╟ñ╣íú}
  910.  
  911. set exampleCommand26 {\
  912. XFMiscSetText .xfBindingListbox.value.value "
  913. TkBroOpen \[%W get \[%W nearest %y\]\]"
  914. update idletasks
  915. .xfBindingListbox.current.current delete 0 end
  916. update idletasks
  917. .xfBindingListbox.current.current insert end <Button-1>
  918. update idletasks
  919. .xfBindingListbox.frame2.insert configure -state active
  920. update idletasks
  921. .xfBindingListbox.frame2.insert configure -relief sunken
  922. update idletasks
  923. .xfBindingListbox.frame2.insert invoke
  924. update idletasks
  925. .xfBindingListbox.frame2.insert configure -state normal
  926. update idletasks
  927. .xfBindingListbox.frame2.insert configure -relief raised
  928. update idletasks}
  929.  
  930.  
  931. set exampleName27 {╜¬ñΩñ╦}
  932. set exampleText27 {\
  933. ñ│ñªñ╖ñ╞ÑóÑ╫ÑΩÑ▒í╝Ñ╖ÑτÑ≤ñ¼┤░└«ñ╖ñ┐ñΘíó╩╘╜╕ѪÑúÑ≤Ñ╔
  934. Ѫñ╬ÑßÑ╦Ñσí╝ "File" ñ½ñΘ "Save" ñ▐ñ┐ñ╧ "Save as..." 
  935. ñ╬╣α╠▄ñ≥┴¬┬≥ñ╖ñ╞íóÑ╫ÑφÑ░ÑΘÑαñ≥Ñ╗í╝Ñ╓ñ╖ñ▐ñ╖ñτñªíú
  936.  
  937. ░╩╛σñ╟íó╬π┬Ωñ╬╛╧ñ≥╜¬ñΩñ▐ñ╣íú
  938.  
  939. Ñ┴Ñσí╝Ñ╚ÑΩÑóÑδñ≥╜¬╬╗ñ╣ñδñ╦ñ╧íóÑßÑ╦Ñσí╝ "File" ñ½ñΘ 
  940. "Quit" ñ╬╣α╠▄ñ≥┴¬┬≥ñ╖ñ╞▓╝ñ╡ññíú}
  941.  
  942. set exampleCommand27 {\
  943. .xfBindingListbox.frame1.ok configure -state active
  944. update idletasks
  945. .xfBindingListbox.frame1.ok configure -relief sunken
  946. update idletasks
  947. .xfBindingListbox.frame1.ok invoke
  948. update idletasks}
  949.