ttChooser.bil 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169
  1. // $XConsortium: ttChooser.bil /main/2 1996/11/11 11:59:29 drk $
  2. :bil-version 1 0
  3. :module ttChooser
  4. (
  5. :element chooser
  6. (
  7. :type :dialog
  8. :x 58
  9. :y 506
  10. :width 477
  11. :height 196
  12. :bg-color "white"
  13. :label "tt_message_handler_set"
  14. :resizable :true
  15. :visible :false
  16. :default-button chooserOkButton
  17. :help-button chooserHelpButton
  18. :children (
  19. chooserPane
  20. dialog_button_panel2
  21. )
  22. )
  23. :element chooserPane
  24. (
  25. :type :container
  26. :container-type :relative
  27. :x 0
  28. :y 0
  29. :width 473
  30. :height 192
  31. :visible :true
  32. :border-frame :shadow-in
  33. :north-attachment (:point 0 0)
  34. :south-attachment (:obj chooser 0)
  35. :east-attachment (:obj chooser 0)
  36. :west-attachment (:point 0 0)
  37. :children (
  38. chooserList
  39. chooserText
  40. )
  41. )
  42. :element chooserList
  43. (
  44. :type :list
  45. :x 20
  46. :y 10
  47. :width 433
  48. :label-type :string
  49. :label "Tt_messages"
  50. :label-position :north
  51. :selection-mode :browse
  52. :selection-required :false
  53. :num-rows 4
  54. :active :true
  55. :visible :true
  56. :north-attachment (:point 0 10)
  57. :east-attachment (:point 0 20)
  58. :west-attachment (:point 0 20)
  59. )
  60. :element chooserText
  61. (
  62. :type :text-field
  63. :text-type :alphanumeric
  64. :x 20
  65. :y 131
  66. :label-type :string
  67. :label "Tt_message:"
  68. :label-position :west
  69. :num-columns 42
  70. :max-length 80
  71. :read-only :false
  72. :active :true
  73. :visible :true
  74. :north-attachment (:obj chooserList 10)
  75. :east-attachment (:point 0 20)
  76. :west-attachment (:point 0 20)
  77. )
  78. :element dialog_button_panel2
  79. (
  80. :type :container
  81. :container-type :button-panel
  82. :width 477
  83. :height 48
  84. :visible :true
  85. :border-frame :none
  86. :children (
  87. chooserOkButton
  88. chooserCancelButton
  89. chooserHelpButton
  90. )
  91. )
  92. :element chooserOkButton
  93. (
  94. :type :button
  95. :button-type :push-button
  96. :label-type :string
  97. :label-alignment :center
  98. :label "Destroy"
  99. :active :true
  100. :visible :true
  101. :north-attachment (:point 0 5)
  102. :east-attachment (:grid-line 30 0)
  103. :west-attachment (:grid-line 10 0)
  104. )
  105. :element chooserCancelButton
  106. (
  107. :type :button
  108. :button-type :push-button
  109. :label-type :string
  110. :label-alignment :center
  111. :label "Cancel"
  112. :active :true
  113. :visible :true
  114. :north-attachment (:point 0 5)
  115. :east-attachment (:grid-line 60 0)
  116. :west-attachment (:grid-line 40 0)
  117. )
  118. :element chooserHelpButton
  119. (
  120. :type :button
  121. :button-type :push-button
  122. :label-type :string
  123. :label-alignment :center
  124. :label "Help"
  125. :active :true
  126. :visible :true
  127. :north-attachment (:point 0 5)
  128. :east-attachment (:grid-line 90 0)
  129. :west-attachment (:grid-line 70 0)
  130. )
  131. :connection
  132. (
  133. :from chooserCancelButton
  134. :to chooser
  135. :when :activate
  136. :action-type :builtin
  137. :action :hide
  138. :arg-type :void
  139. )
  140. :connection
  141. (
  142. :from chooserList
  143. :when :item-selected
  144. :action-type :call-function
  145. :action choiceSelected
  146. )
  147. :connection
  148. (
  149. :from chooserOkButton
  150. :when :activate
  151. :action-type :call-function
  152. :action choiceOkayed
  153. )
  154. :connection
  155. (
  156. :from chooserList
  157. :when :double-click
  158. :action-type :call-function
  159. :action choiceOkayed
  160. )
  161. :connection
  162. (
  163. :from chooserHelpButton
  164. :when :activate
  165. :action-type :call-function
  166. :action ttChooserHelp
  167. )
  168. )