ec_setvariables.lfm 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375
  1. inherited ECSetVariablesFrame: TECSetVariablesFrame
  2. Height = 462
  3. Width = 409
  4. Caption = 'Set variables'
  5. ClientHeight = 462
  6. ClientWidth = 409
  7. inherited EcResultPanel: TPanel
  8. Height = 52
  9. Top = 410
  10. Width = 409
  11. ClientHeight = 52
  12. ClientWidth = 409
  13. inherited EcResultLineBevel: TBevel
  14. Width = 409
  15. end
  16. inherited EcOkBitBtn: TBitBtn
  17. Left = 258
  18. Height = 36
  19. Width = 60
  20. end
  21. inherited EcCancelBitBtn: TBitBtn
  22. Left = 322
  23. Height = 36
  24. end
  25. end
  26. object VarToSetGroupBox: TGroupBox[1]
  27. Left = 0
  28. Height = 102
  29. Top = 0
  30. Width = 406
  31. Anchors = [akTop, akLeft, akRight]
  32. AutoSize = True
  33. Caption = 'Variable to set'
  34. ClientHeight = 82
  35. ClientWidth = 404
  36. TabOrder = 1
  37. object SingleVarRadioButton: TRadioButton
  38. AnchorSideTop.Control = SingleVarEditButton
  39. AnchorSideTop.Side = asrCenter
  40. Left = 4
  41. Height = 23
  42. Top = 10
  43. Width = 126
  44. BorderSpacing.Left = 4
  45. Caption = 'Single variable:'
  46. Checked = True
  47. OnChange = AnyRadioButtonChanged
  48. TabOrder = 1
  49. end
  50. object VarRangeRadioButton: TRadioButton
  51. AnchorSideTop.Control = VarRangeFromSpinEdit
  52. AnchorSideTop.Side = asrCenter
  53. Left = 4
  54. Height = 23
  55. Top = 53
  56. Width = 126
  57. Caption = 'Variable range:'
  58. OnChange = AnyRadioButtonChanged
  59. TabOrder = 0
  60. end
  61. object SingleVarEditButton: TEditButton
  62. AnchorSideLeft.Control = SingleVarRadioButton
  63. AnchorSideLeft.Side = asrBottom
  64. Left = 134
  65. Height = 35
  66. Top = 4
  67. Width = 265
  68. Anchors = [akTop, akLeft, akRight]
  69. BorderSpacing.Left = 4
  70. BorderSpacing.Top = 4
  71. BorderSpacing.Right = 4
  72. ButtonCaption = '...'
  73. ButtonWidth = 23
  74. MaxLength = 0
  75. NumGlyphs = 1
  76. OnButtonClick = SingleVarEditButtonButtonClick
  77. OnDblClick = SingleVarEditButtonButtonClick
  78. OnKeyPress = SingleVarEditButtonKeyPress
  79. PasswordChar = #0
  80. TabOrder = 2
  81. end
  82. object VarRangeFromLabel: TLabel
  83. AnchorSideLeft.Control = VarRangeRadioButton
  84. AnchorSideLeft.Side = asrBottom
  85. AnchorSideTop.Control = VarRangeFromSpinEdit
  86. AnchorSideTop.Side = asrCenter
  87. Left = 134
  88. Height = 17
  89. Top = 56
  90. Width = 32
  91. BorderSpacing.Left = 4
  92. Caption = 'from'
  93. ParentColor = False
  94. end
  95. object VarRangeFromSpinEdit: TSpinEdit
  96. AnchorSideLeft.Control = VarRangeFromLabel
  97. AnchorSideLeft.Side = asrBottom
  98. AnchorSideTop.Control = SingleVarEditButton
  99. AnchorSideTop.Side = asrBottom
  100. Left = 170
  101. Height = 35
  102. Top = 47
  103. Width = 80
  104. BorderSpacing.Left = 4
  105. BorderSpacing.Top = 8
  106. MaxValue = 10000
  107. MinValue = 1
  108. TabOrder = 3
  109. Value = 1
  110. end
  111. object VarRangeToSpinEdit: TSpinEdit
  112. AnchorSideLeft.Control = VarRangeToLabel
  113. AnchorSideLeft.Side = asrBottom
  114. Left = 271
  115. Height = 35
  116. Top = 33
  117. Width = 80
  118. BorderSpacing.Right = 4
  119. BorderSpacing.Bottom = 4
  120. MaxValue = 10000
  121. MinValue = 1
  122. TabOrder = 4
  123. Value = 1
  124. end
  125. object VarRangeToLabel: TLabel
  126. AnchorSideLeft.Control = VarRangeFromSpinEdit
  127. AnchorSideLeft.Side = asrBottom
  128. AnchorSideTop.Control = VarRangeFromSpinEdit
  129. AnchorSideTop.Side = asrCenter
  130. Left = 254
  131. Height = 17
  132. Top = 56
  133. Width = 13
  134. BorderSpacing.Left = 4
  135. BorderSpacing.Right = 4
  136. Caption = 'to'
  137. ParentColor = False
  138. end
  139. end
  140. object OperatorRadioGroup: TRadioGroup[2]
  141. AnchorSideLeft.Control = VarToSetGroupBox
  142. AnchorSideTop.Control = VarToSetGroupBox
  143. AnchorSideTop.Side = asrBottom
  144. AnchorSideRight.Control = VarToSetGroupBox
  145. AnchorSideRight.Side = asrBottom
  146. Left = 0
  147. Height = 20
  148. Top = 110
  149. Width = 406
  150. Anchors = [akTop, akLeft, akRight]
  151. AutoFill = True
  152. AutoSize = True
  153. BorderSpacing.Top = 8
  154. Caption = 'Operator'
  155. ChildSizing.LeftRightSpacing = 6
  156. ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
  157. ChildSizing.EnlargeVertical = crsHomogenousChildResize
  158. ChildSizing.ShrinkHorizontal = crsScaleChilds
  159. ChildSizing.ShrinkVertical = crsScaleChilds
  160. ChildSizing.Layout = cclLeftToRightThenTopToBottom
  161. ChildSizing.ControlsPerLine = 6
  162. Columns = 6
  163. TabOrder = 2
  164. end
  165. object OperandGroupBox: TGroupBox[3]
  166. AnchorSideLeft.Control = VarToSetGroupBox
  167. AnchorSideTop.Control = OperatorRadioGroup
  168. AnchorSideTop.Side = asrBottom
  169. AnchorSideRight.Control = VarToSetGroupBox
  170. AnchorSideRight.Side = asrBottom
  171. Left = 0
  172. Height = 235
  173. Top = 138
  174. Width = 406
  175. Anchors = [akTop, akLeft, akRight]
  176. AutoSize = True
  177. BorderSpacing.Top = 8
  178. Caption = 'Operand'
  179. ClientHeight = 215
  180. ClientWidth = 404
  181. TabOrder = 3
  182. object ConstantOperandRadioButton: TRadioButton
  183. AnchorSideTop.Control = ConstantOperandSpinEdit
  184. AnchorSideTop.Side = asrCenter
  185. Left = 4
  186. Height = 23
  187. Top = 10
  188. Width = 88
  189. BorderSpacing.Left = 4
  190. Caption = 'Constant:'
  191. Checked = True
  192. OnChange = AnyRadioButtonChanged
  193. TabOrder = 0
  194. end
  195. object ConstantOperandSpinEdit: TSpinEdit
  196. AnchorSideLeft.Control = ConstantOperandRadioButton
  197. AnchorSideLeft.Side = asrBottom
  198. Left = 100
  199. Height = 35
  200. Top = 4
  201. Width = 106
  202. BorderSpacing.Left = 8
  203. BorderSpacing.Top = 4
  204. MaxValue = 99999999
  205. MinValue = -99999999
  206. TabOrder = 1
  207. end
  208. object VariableOperandRadioButton: TRadioButton
  209. AnchorSideLeft.Control = ConstantOperandRadioButton
  210. AnchorSideTop.Control = VariableOperandEditButton
  211. AnchorSideTop.Side = asrCenter
  212. Left = 4
  213. Height = 23
  214. Top = 53
  215. Width = 85
  216. Caption = 'Variable:'
  217. OnChange = AnyRadioButtonChanged
  218. TabOrder = 2
  219. end
  220. object VariableOperandEditButton: TEditButton
  221. AnchorSideLeft.Control = VariableOperandRadioButton
  222. AnchorSideLeft.Side = asrBottom
  223. AnchorSideTop.Control = ConstantOperandSpinEdit
  224. AnchorSideTop.Side = asrBottom
  225. Left = 97
  226. Height = 35
  227. Top = 47
  228. Width = 300
  229. Anchors = [akTop, akLeft, akRight]
  230. BorderSpacing.Left = 8
  231. BorderSpacing.Top = 8
  232. ButtonCaption = '...'
  233. ButtonWidth = 23
  234. MaxLength = 0
  235. NumGlyphs = 1
  236. OnButtonClick = VariableOperandEditButtonButtonClick
  237. OnDblClick = VariableOperandEditButtonButtonClick
  238. OnKeyPress = VariableOperandEditButtonKeyPress
  239. PasswordChar = #0
  240. TabOrder = 3
  241. end
  242. object RandomOperandRadioButton: TRadioButton
  243. AnchorSideLeft.Control = ConstantOperandRadioButton
  244. AnchorSideTop.Control = RandomFromSpinEdit
  245. AnchorSideTop.Side = asrCenter
  246. Left = 4
  247. Height = 23
  248. Top = 96
  249. Width = 84
  250. Caption = 'Random:'
  251. OnChange = AnyRadioButtonChanged
  252. TabOrder = 4
  253. end
  254. object RandomFromLabel: TLabel
  255. AnchorSideLeft.Control = RandomOperandRadioButton
  256. AnchorSideLeft.Side = asrBottom
  257. AnchorSideTop.Control = RandomFromSpinEdit
  258. AnchorSideTop.Side = asrCenter
  259. Left = 96
  260. Height = 17
  261. Top = 99
  262. Width = 32
  263. BorderSpacing.Left = 8
  264. Caption = 'from'
  265. ParentColor = False
  266. end
  267. object RandomFromSpinEdit: TSpinEdit
  268. AnchorSideLeft.Control = RandomFromLabel
  269. AnchorSideLeft.Side = asrBottom
  270. AnchorSideTop.Control = VariableOperandEditButton
  271. AnchorSideTop.Side = asrBottom
  272. Left = 132
  273. Height = 35
  274. Top = 90
  275. Width = 80
  276. BorderSpacing.Left = 4
  277. BorderSpacing.Top = 8
  278. MaxValue = 99999999
  279. MinValue = -99999999
  280. TabOrder = 5
  281. end
  282. object RandomToLabel: TLabel
  283. AnchorSideLeft.Control = RandomFromSpinEdit
  284. AnchorSideLeft.Side = asrBottom
  285. AnchorSideTop.Control = RandomFromSpinEdit
  286. AnchorSideTop.Side = asrCenter
  287. Left = 216
  288. Height = 17
  289. Top = 99
  290. Width = 13
  291. BorderSpacing.Left = 4
  292. BorderSpacing.Right = 4
  293. Caption = 'to'
  294. ParentColor = False
  295. end
  296. object RandomToSpinEdit: TSpinEdit
  297. AnchorSideLeft.Control = RandomToLabel
  298. AnchorSideLeft.Side = asrBottom
  299. AnchorSideTop.Control = VariableOperandEditButton
  300. AnchorSideTop.Side = asrBottom
  301. Left = 233
  302. Height = 35
  303. Top = 90
  304. Width = 80
  305. BorderSpacing.Left = 4
  306. BorderSpacing.Top = 8
  307. MaxValue = 99999999
  308. MinValue = -99999999
  309. TabOrder = 6
  310. end
  311. object GameDataRadioButton: TRadioButton
  312. AnchorSideLeft.Control = ConstantOperandRadioButton
  313. AnchorSideTop.Control = GameDataEditButton
  314. AnchorSideTop.Side = asrCenter
  315. Left = 4
  316. Height = 23
  317. Top = 139
  318. Width = 102
  319. Caption = 'Game data:'
  320. OnChange = AnyRadioButtonChanged
  321. TabOrder = 7
  322. end
  323. object GameDataEditButton: TEditButton
  324. AnchorSideLeft.Control = GameDataRadioButton
  325. AnchorSideLeft.Side = asrBottom
  326. AnchorSideTop.Control = RandomFromSpinEdit
  327. AnchorSideTop.Side = asrBottom
  328. Left = 114
  329. Height = 35
  330. Top = 133
  331. Width = 283
  332. Anchors = [akTop, akLeft, akRight]
  333. BorderSpacing.Left = 8
  334. BorderSpacing.Top = 8
  335. ButtonCaption = '...'
  336. ButtonWidth = 23
  337. MaxLength = 0
  338. NumGlyphs = 1
  339. OnButtonClick = GameDataEditButtonButtonClick
  340. OnDblClick = GameDataEditButtonButtonClick
  341. OnKeyPress = GameDataEditButtonKeyPress
  342. PasswordChar = #0
  343. TabOrder = 8
  344. end
  345. object ScriptRadioButton: TRadioButton
  346. AnchorSideLeft.Control = ConstantOperandRadioButton
  347. AnchorSideTop.Control = ScriptEdit
  348. AnchorSideTop.Side = asrCenter
  349. Left = 4
  350. Height = 23
  351. Top = 182
  352. Width = 68
  353. Caption = 'Script:'
  354. OnChange = AnyRadioButtonChanged
  355. TabOrder = 9
  356. end
  357. object ScriptEdit: TEdit
  358. AnchorSideLeft.Control = ScriptRadioButton
  359. AnchorSideLeft.Side = asrBottom
  360. AnchorSideTop.Control = GameDataEditButton
  361. AnchorSideTop.Side = asrBottom
  362. Left = 80
  363. Height = 35
  364. Top = 176
  365. Width = 317
  366. Anchors = [akTop, akLeft, akRight]
  367. BorderSpacing.Left = 8
  368. BorderSpacing.Top = 8
  369. BorderSpacing.Right = 4
  370. BorderSpacing.Bottom = 4
  371. TabOrder = 10
  372. end
  373. end
  374. end