uimicrobit.lfm 7.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386
  1. object fMicrobit: TfMicrobit
  2. Left = 1211
  3. Height = 259
  4. Top = 119
  5. Width = 297
  6. BorderIcons = []
  7. BorderStyle = bsToolWindow
  8. Caption = 'micro:bit Input Output'
  9. ClientHeight = 259
  10. ClientWidth = 297
  11. FormStyle = fsStayOnTop
  12. OnActivate = FormActivate
  13. LCLVersion = '2.0.12.0'
  14. object GroupBox1: TGroupBox
  15. Left = 8
  16. Height = 104
  17. Top = 8
  18. Width = 104
  19. Caption = 'Display'
  20. ClientHeight = 84
  21. ClientWidth = 100
  22. TabOrder = 0
  23. object Shape1: TShape
  24. Left = 8
  25. Height = 15
  26. Top = 0
  27. Width = 17
  28. Brush.Color = clRed
  29. Shape = stRoundRect
  30. end
  31. object Shape2: TShape
  32. Left = 24
  33. Height = 15
  34. Top = 0
  35. Width = 17
  36. Brush.Color = clRed
  37. Shape = stRoundRect
  38. end
  39. object Shape3: TShape
  40. Left = 40
  41. Height = 15
  42. Top = 0
  43. Width = 17
  44. Brush.Color = clRed
  45. Shape = stRoundRect
  46. end
  47. object Shape4: TShape
  48. Left = 56
  49. Height = 15
  50. Top = 0
  51. Width = 17
  52. Brush.Color = clRed
  53. Shape = stRoundRect
  54. end
  55. object Shape5: TShape
  56. Left = 72
  57. Height = 15
  58. Top = 0
  59. Width = 17
  60. Brush.Color = clRed
  61. Shape = stRoundRect
  62. end
  63. object Shape6: TShape
  64. Left = 8
  65. Height = 15
  66. Top = 16
  67. Width = 17
  68. Brush.Color = clRed
  69. Shape = stRoundRect
  70. end
  71. object Shape7: TShape
  72. Left = 24
  73. Height = 15
  74. Top = 16
  75. Width = 17
  76. Brush.Color = clRed
  77. Shape = stRoundRect
  78. end
  79. object Shape8: TShape
  80. Left = 40
  81. Height = 15
  82. Top = 16
  83. Width = 17
  84. Brush.Color = clRed
  85. Shape = stRoundRect
  86. end
  87. object Shape9: TShape
  88. Left = 56
  89. Height = 15
  90. Top = 16
  91. Width = 17
  92. Brush.Color = clRed
  93. Shape = stRoundRect
  94. end
  95. object Shape10: TShape
  96. Left = 72
  97. Height = 15
  98. Top = 16
  99. Width = 17
  100. Brush.Color = clRed
  101. Shape = stRoundRect
  102. end
  103. object Shape11: TShape
  104. Left = 8
  105. Height = 15
  106. Top = 32
  107. Width = 17
  108. Brush.Color = clRed
  109. Shape = stRoundRect
  110. end
  111. object Shape12: TShape
  112. Left = 24
  113. Height = 15
  114. Top = 32
  115. Width = 17
  116. Brush.Color = clRed
  117. Shape = stRoundRect
  118. end
  119. object Shape13: TShape
  120. Left = 40
  121. Height = 15
  122. Top = 32
  123. Width = 17
  124. Brush.Color = clRed
  125. Shape = stRoundRect
  126. end
  127. object Shape14: TShape
  128. Left = 56
  129. Height = 15
  130. Top = 32
  131. Width = 17
  132. Brush.Color = clRed
  133. Shape = stRoundRect
  134. end
  135. object Shape15: TShape
  136. Left = 72
  137. Height = 15
  138. Top = 32
  139. Width = 17
  140. Brush.Color = clRed
  141. Shape = stRoundRect
  142. end
  143. object Shape16: TShape
  144. Left = 8
  145. Height = 15
  146. Top = 48
  147. Width = 17
  148. Brush.Color = clRed
  149. Shape = stRoundRect
  150. end
  151. object Shape17: TShape
  152. Left = 24
  153. Height = 15
  154. Top = 48
  155. Width = 17
  156. Brush.Color = clRed
  157. Shape = stRoundRect
  158. end
  159. object Shape18: TShape
  160. Left = 40
  161. Height = 15
  162. Top = 48
  163. Width = 17
  164. Brush.Color = clRed
  165. Shape = stRoundRect
  166. end
  167. object Shape19: TShape
  168. Left = 56
  169. Height = 15
  170. Top = 48
  171. Width = 17
  172. Brush.Color = clRed
  173. Shape = stRoundRect
  174. end
  175. object Shape20: TShape
  176. Left = 72
  177. Height = 15
  178. Top = 48
  179. Width = 17
  180. Brush.Color = clRed
  181. Shape = stRoundRect
  182. end
  183. object Shape21: TShape
  184. Left = 8
  185. Height = 15
  186. Top = 64
  187. Width = 17
  188. Brush.Color = clRed
  189. Shape = stRoundRect
  190. end
  191. object Shape22: TShape
  192. Left = 24
  193. Height = 15
  194. Top = 64
  195. Width = 17
  196. Brush.Color = clRed
  197. Shape = stRoundRect
  198. end
  199. object Shape23: TShape
  200. Left = 40
  201. Height = 15
  202. Top = 64
  203. Width = 17
  204. Brush.Color = clRed
  205. Shape = stRoundRect
  206. end
  207. object Shape24: TShape
  208. Left = 56
  209. Height = 15
  210. Top = 64
  211. Width = 17
  212. Brush.Color = clRed
  213. Shape = stRoundRect
  214. end
  215. object Shape25: TShape
  216. Left = 72
  217. Height = 15
  218. Top = 64
  219. Width = 17
  220. Brush.Color = clRed
  221. Shape = stRoundRect
  222. end
  223. end
  224. object GBInput: TGroupBox
  225. Left = 120
  226. Height = 248
  227. Top = 8
  228. Width = 172
  229. Caption = 'Input'
  230. ClientHeight = 228
  231. ClientWidth = 168
  232. ParentFont = False
  233. TabOrder = 1
  234. object accx: TSpinEdit
  235. Left = 62
  236. Height = 23
  237. Top = 24
  238. Width = 54
  239. MaxValue = 255
  240. ParentFont = False
  241. TabOrder = 0
  242. end
  243. object accy: TSpinEdit
  244. Left = 62
  245. Height = 23
  246. Top = 52
  247. Width = 54
  248. MaxValue = 255
  249. ParentFont = False
  250. TabOrder = 1
  251. end
  252. object Label1: TLabel
  253. Left = 14
  254. Height = 15
  255. Top = 31
  256. Width = 34
  257. Caption = 'ACC.X'
  258. ParentColor = False
  259. ParentFont = False
  260. end
  261. object Label2: TLabel
  262. Left = 14
  263. Height = 15
  264. Top = 58
  265. Width = 34
  266. Caption = 'ACC.Y'
  267. ParentColor = False
  268. ParentFont = False
  269. end
  270. object accz: TSpinEdit
  271. Left = 62
  272. Height = 23
  273. Top = 81
  274. Width = 54
  275. MaxValue = 255
  276. ParentFont = False
  277. TabOrder = 2
  278. end
  279. object compass: TSpinEdit
  280. Left = 62
  281. Height = 23
  282. Top = 109
  283. Width = 54
  284. MaxValue = 255
  285. ParentFont = False
  286. TabOrder = 3
  287. end
  288. object Label16: TLabel
  289. Left = 14
  290. Height = 15
  291. Top = 87
  292. Width = 34
  293. Caption = 'ACC.Z'
  294. ParentColor = False
  295. ParentFont = False
  296. end
  297. object Label17: TLabel
  298. Left = 14
  299. Height = 15
  300. Top = 115
  301. Width = 49
  302. Caption = 'Compass'
  303. ParentColor = False
  304. ParentFont = False
  305. end
  306. object tbLogo: TToggleBox
  307. Left = 14
  308. Height = 18
  309. Top = 1
  310. Width = 50
  311. Caption = '&LOGO'
  312. ParentFont = False
  313. TabOrder = 4
  314. end
  315. object Label3: TLabel
  316. Left = 14
  317. Height = 15
  318. Top = 143
  319. Width = 34
  320. Caption = 'Sound'
  321. ParentColor = False
  322. ParentFont = False
  323. end
  324. object snd: TSpinEdit
  325. Left = 62
  326. Height = 23
  327. Top = 136
  328. Width = 54
  329. MaxValue = 255
  330. ParentFont = False
  331. TabOrder = 5
  332. end
  333. object Label4: TLabel
  334. Left = 14
  335. Height = 15
  336. Top = 170
  337. Width = 27
  338. Caption = 'Light'
  339. ParentColor = False
  340. ParentFont = False
  341. end
  342. object light: TSpinEdit
  343. Left = 62
  344. Height = 23
  345. Top = 164
  346. Width = 54
  347. MaxValue = 255
  348. ParentFont = False
  349. TabOrder = 6
  350. end
  351. object Label18: TLabel
  352. Left = 14
  353. Height = 15
  354. Top = 199
  355. Width = 40
  356. Caption = 'Gesture'
  357. ParentColor = False
  358. ParentFont = False
  359. end
  360. object cbGesture: TComboBox
  361. Left = 64
  362. Height = 23
  363. Top = 194
  364. Width = 68
  365. ItemHeight = 15
  366. ItemIndex = 0
  367. Items.Strings = (
  368. 'nothing '
  369. 'up'
  370. 'down'
  371. 'left'
  372. 'right'
  373. 'face up'
  374. 'face down'
  375. 'freefall'
  376. '3g'
  377. '6g '
  378. '8g'
  379. 'shake'
  380. )
  381. Style = csDropDownList
  382. TabOrder = 7
  383. Text = 'nothing '
  384. end
  385. end
  386. end