ProgramOptionsUnit.dfm 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635
  1. object ProgramOptionsForm: TProgramOptionsForm
  2. Left = 319
  3. Top = 299
  4. ActiveControl = PageController
  5. BorderIcons = [biSystemMenu]
  6. BorderStyle = bsDialog
  7. Caption = 'Program Options'
  8. ClientHeight = 337
  9. ClientWidth = 297
  10. Color = clBtnFace
  11. Font.Charset = DEFAULT_CHARSET
  12. Font.Color = clWindowText
  13. Font.Height = -11
  14. Font.Name = 'MS Sans Serif'
  15. Font.Style = []
  16. OldCreateOrder = False
  17. Position = poScreenCenter
  18. OnShow = FormShow
  19. DesignSize = (
  20. 297
  21. 337)
  22. PixelsPerInch = 96
  23. TextHeight = 13
  24. object PageController: TPageControl
  25. Left = 8
  26. Top = 8
  27. Width = 281
  28. Height = 289
  29. ActivePage = WelcomeSheet
  30. Anchors = [akLeft, akTop, akRight, akBottom]
  31. ParentShowHint = False
  32. ShowHint = True
  33. TabOrder = 0
  34. object WelcomeSheet: TTabSheet
  35. Caption = '&Welcome'
  36. ImageIndex = 5
  37. DesignSize = (
  38. 273
  39. 261)
  40. object Label1: TLabel
  41. Left = 8
  42. Top = 32
  43. Width = 257
  44. Height = 41
  45. Anchors = [akLeft, akTop, akRight]
  46. AutoSize = False
  47. Caption =
  48. 'Welcome to the Program Options dialog. All of the selections you' +
  49. ' make here are sent to TIGCC as preprocessor macros.'
  50. WordWrap = True
  51. end
  52. object Label9: TLabel
  53. Left = 8
  54. Top = 80
  55. Width = 257
  56. Height = 65
  57. Anchors = [akLeft, akTop, akRight]
  58. AutoSize = False
  59. Caption =
  60. 'Moving the mouse over a specific option displays the macro name ' +
  61. 'for that option. You can look up this macro in the documentation' +
  62. ' by right-clicking on the item. Always do this before using some' +
  63. 'thing with an exclamation mark.'
  64. WordWrap = True
  65. end
  66. end
  67. object CalculatorSheet: TTabSheet
  68. Caption = 'C&alculator'
  69. DesignSize = (
  70. 273
  71. 261)
  72. object Label2: TLabel
  73. Left = 8
  74. Top = 10
  75. Width = 257
  76. Height = 28
  77. Anchors = [akLeft, akTop, akRight]
  78. AutoSize = False
  79. Caption = 'Please select which calculator(s) the program will support:'
  80. WordWrap = True
  81. end
  82. object Label5: TLabel
  83. Left = 8
  84. Top = 96
  85. Width = 257
  86. Height = 25
  87. Anchors = [akLeft, akTop, akRight]
  88. AutoSize = False
  89. Caption =
  90. 'If you write a program for more than one calculator, consider th' +
  91. 'e differences in screen size.'
  92. WordWrap = True
  93. end
  94. object Label12: TLabel
  95. Left = 8
  96. Top = 136
  97. Width = 257
  98. Height = 54
  99. Anchors = [akLeft, akTop, akRight]
  100. AutoSize = False
  101. Caption =
  102. 'Optimizing calculator pseudo-constants can decrease program size' +
  103. ' and increase performance, but it implies that programs cannot b' +
  104. 'e transferred between calculators of different type.'
  105. WordWrap = True
  106. end
  107. object TI89CheckBox: TCheckBox
  108. Left = 16
  109. Top = 40
  110. Width = 73
  111. Height = 17
  112. Hint = 'USE_TI89'
  113. Caption = 'TI-&89'
  114. Checked = True
  115. State = cbChecked
  116. TabOrder = 0
  117. OnClick = CalcCheckBoxClick
  118. OnMouseDown = ItemMouseDown
  119. end
  120. object TI92PlusCheckBox: TCheckBox
  121. Left = 16
  122. Top = 58
  123. Width = 73
  124. Height = 17
  125. Hint = 'USE_TI92PLUS'
  126. Caption = 'TI-&92 Plus'
  127. Checked = True
  128. State = cbChecked
  129. TabOrder = 1
  130. OnClick = CalcCheckBoxClick
  131. OnMouseDown = ItemMouseDown
  132. end
  133. object V200CheckBox: TCheckBox
  134. Left = 16
  135. Top = 76
  136. Width = 73
  137. Height = 17
  138. Hint = 'USE_V200'
  139. Caption = '&V200'
  140. Checked = True
  141. State = cbChecked
  142. TabOrder = 2
  143. OnClick = CalcCheckBoxClick
  144. OnMouseDown = ItemMouseDown
  145. end
  146. object OptimizeCalcConstsCheckBox: TCheckBox
  147. Left = 16
  148. Top = 196
  149. Width = 169
  150. Height = 17
  151. Hint = 'OPTIMIZE_CALC_CONSTS'
  152. Caption = '&Optimize Calculator Constants'
  153. Checked = True
  154. State = cbChecked
  155. TabOrder = 3
  156. OnMouseDown = ItemMouseDown
  157. end
  158. end
  159. object OSSheet: TTabSheet
  160. Caption = 'Operating &System'
  161. ImageIndex = 1
  162. DesignSize = (
  163. 273
  164. 261)
  165. object Label3: TLabel
  166. Left = 8
  167. Top = 16
  168. Width = 257
  169. Height = 25
  170. Anchors = [akLeft, akTop, akRight]
  171. AutoSize = False
  172. Caption = 'You also have to select the operating system it will run under.'
  173. WordWrap = True
  174. end
  175. object NoStubRadioButton: TRadioButton
  176. Left = 16
  177. Top = 48
  178. Width = 233
  179. Height = 17
  180. Caption = 'Any/no &kernel'
  181. Checked = True
  182. TabOrder = 0
  183. TabStop = True
  184. OnClick = ShellRadioButtonClick
  185. OnMouseDown = ItemMouseDown
  186. end
  187. object DoorsRadioButton: TRadioButton
  188. Left = 16
  189. Top = 68
  190. Width = 233
  191. Height = 17
  192. Hint = 'USE_KERNEL'
  193. Caption = 'Recent &Doors-compatible kernels'
  194. TabOrder = 1
  195. OnClick = ShellRadioButtonClick
  196. OnMouseDown = ItemMouseDown
  197. end
  198. object PreOSRadioButton: TRadioButton
  199. Left = 16
  200. Top = 88
  201. Width = 233
  202. Height = 17
  203. Hint = 'USE_PREOS_COMPRESSED_TABLES'
  204. Caption = '&PreOS with compressed reloc table support'
  205. TabOrder = 2
  206. OnClick = ShellRadioButtonClick
  207. OnMouseDown = ItemMouseDown
  208. end
  209. object MinAMSCheckBox: TCheckBox
  210. Left = 16
  211. Top = 136
  212. Width = 129
  213. Height = 17
  214. Hint = 'MIN_AMS'
  215. Caption = '&Minimum AMS version:'
  216. Checked = True
  217. State = cbChecked
  218. TabOrder = 3
  219. OnClick = MinAMSCheckBoxClick
  220. OnMouseDown = ItemMouseDown
  221. end
  222. object MinAMSEdit: TEdit
  223. Left = 148
  224. Top = 134
  225. Width = 31
  226. Height = 21
  227. Hint = 'MIN_AMS'
  228. TabOrder = 4
  229. Text = '1.00'
  230. OnMouseDown = ItemMouseDown
  231. end
  232. object UnofficialOSSupportCheckBox: TCheckBox
  233. Left = 16
  234. Top = 176
  235. Width = 217
  236. Height = 17
  237. Hint = 'UNOFFICIAL_OS_SUPPORT'
  238. Caption = '&Force unofficial operating system support'
  239. TabOrder = 5
  240. OnMouseDown = ItemMouseDown
  241. end
  242. end
  243. object RelocFormatSheet: TTabSheet
  244. Caption = '&Reloc Format'
  245. ImageIndex = 2
  246. object Panel2: TPanel
  247. Left = 8
  248. Top = 8
  249. Width = 249
  250. Height = 113
  251. BevelOuter = bvNone
  252. TabOrder = 0
  253. object Label4: TLabel
  254. Left = 0
  255. Top = 0
  256. Width = 249
  257. Height = 17
  258. AutoSize = False
  259. Caption = 'Choose the relocation format that suits your needs:'
  260. WordWrap = True
  261. end
  262. object RelocAMSRadioButton: TRadioButton
  263. Left = 8
  264. Top = 16
  265. Width = 233
  266. Height = 16
  267. Caption = 'AMS (large calls, &no stub)'
  268. Checked = True
  269. TabOrder = 0
  270. TabStop = True
  271. OnClick = RelocRadioButtonClick
  272. OnMouseDown = ItemMouseDown
  273. end
  274. object RelocKernelRadioButton: TRadioButton
  275. Left = 8
  276. Top = 32
  277. Width = 233
  278. Height = 16
  279. Hint = 'KERNEL_FORMAT_RELOCS'
  280. Caption = '&Kernel (medium calls, medium stub)'
  281. TabOrder = 1
  282. OnClick = RelocRadioButtonClick
  283. OnMouseDown = ItemMouseDown
  284. end
  285. object RelocCompressedRadioButton: TRadioButton
  286. Left = 8
  287. Top = 48
  288. Width = 233
  289. Height = 16
  290. Hint = 'COMPRESSED_FORMAT_RELOCS'
  291. Caption = 'C&ompressed (smallest calls, large stub)'
  292. TabOrder = 2
  293. OnClick = RelocRadioButtonClick
  294. OnMouseDown = ItemMouseDown
  295. end
  296. object RelocFLineJumpsCheckBox: TCheckBox
  297. Left = 8
  298. Top = 80
  299. Width = 233
  300. Height = 17
  301. Hint = 'USE_FLINE_JUMPS'
  302. Caption = '&F-Line (very small calls, no stub, but slow)'
  303. TabOrder = 3
  304. OnClick = RelocFLineJumpsCheckBoxClick
  305. OnMouseDown = ItemMouseDown
  306. end
  307. object RelocFLineJumps4ByteCheckBox: TCheckBox
  308. Left = 24
  309. Top = 96
  310. Width = 217
  311. Height = 17
  312. Hint = 'USE_4_BYTE_FLINE_JUMPS'
  313. Caption = '&4-Byte F-Line (even smaller) (!)'
  314. Enabled = False
  315. TabOrder = 4
  316. OnClick = RelocRadioButtonClick
  317. OnMouseDown = ItemMouseDown
  318. end
  319. object RelocMlinkRadioButton: TRadioButton
  320. Left = 8
  321. Top = 64
  322. Width = 233
  323. Height = 16
  324. Hint = 'MLINK_FORMAT_RELOCS'
  325. Caption = '&Mlink (small calls, medium stub)'
  326. TabOrder = 5
  327. OnClick = RelocRadioButtonClick
  328. OnMouseDown = ItemMouseDown
  329. end
  330. end
  331. object Panel3: TPanel
  332. Left = 8
  333. Top = 122
  334. Width = 249
  335. Height = 111
  336. BevelOuter = bvNone
  337. TabOrder = 1
  338. object Label15: TLabel
  339. Left = 0
  340. Top = 0
  341. Width = 249
  342. Height = 17
  343. AutoSize = False
  344. Caption = 'Choose the ROM call format that suits your needs:'
  345. WordWrap = True
  346. end
  347. object ROMCallDirectRadioButton: TRadioButton
  348. Left = 8
  349. Top = 16
  350. Width = 233
  351. Height = 16
  352. Caption = '&Direct (large calls, no stub)'
  353. Checked = True
  354. TabOrder = 0
  355. TabStop = True
  356. OnClick = RelocRadioButtonClick
  357. OnMouseDown = ItemMouseDown
  358. end
  359. object ROMCallKernelRadioButton: TRadioButton
  360. Left = 8
  361. Top = 32
  362. Width = 233
  363. Height = 16
  364. Hint = 'KERNEL_FORMAT_ROM_CALLS'
  365. Caption = 'K&ernel (medium calls, medium stub)'
  366. TabOrder = 1
  367. OnClick = RelocRadioButtonClick
  368. OnMouseDown = ItemMouseDown
  369. end
  370. object ROMCallCompressedRadioButton: TRadioButton
  371. Left = 8
  372. Top = 48
  373. Width = 233
  374. Height = 16
  375. Hint = 'COMPRESSED_FORMAT_ROM_CALLS'
  376. Caption = 'Com&pressed (smallest calls, large stub)'
  377. TabOrder = 2
  378. OnClick = RelocRadioButtonClick
  379. OnMouseDown = ItemMouseDown
  380. end
  381. object ROMCallFLineRadioButton: TRadioButton
  382. Left = 8
  383. Top = 80
  384. Width = 233
  385. Height = 16
  386. Hint = 'USE_FLINE_ROM_CALLS'
  387. Caption = 'F-&Line (very small calls, no stub, but slow)'
  388. TabOrder = 3
  389. OnClick = RelocRadioButtonClick
  390. OnMouseDown = ItemMouseDown
  391. end
  392. object ROMCallOptimizedCheckBox: TCheckBox
  393. Left = 8
  394. Top = 96
  395. Width = 233
  396. Height = 17
  397. Hint = 'OPTIMIZE_ROM_CALLS'
  398. Caption = 'Op&timized (medium calls, very small stub) (!)'
  399. TabOrder = 4
  400. OnMouseDown = ItemMouseDown
  401. end
  402. object ROMCallMlinkRadioButton: TRadioButton
  403. Left = 8
  404. Top = 64
  405. Width = 233
  406. Height = 16
  407. Hint = 'MLINK_FORMAT_ROM_CALLS'
  408. Caption = 'Ml&ink (small calls, medium stub)'
  409. TabOrder = 5
  410. OnClick = RelocRadioButtonClick
  411. OnMouseDown = ItemMouseDown
  412. end
  413. end
  414. object InternalFLineEmulatorCheckBox: TCheckBox
  415. Left = 8
  416. Top = 238
  417. Width = 249
  418. Height = 17
  419. Hint = 'USE_INTERNAL_FLINE_EMULATOR'
  420. Caption = '&Use internal F-Line emulator'
  421. Enabled = False
  422. TabOrder = 2
  423. OnMouseDown = ItemMouseDown
  424. end
  425. end
  426. object BSSFormatSheet: TTabSheet
  427. Caption = '&BSS/Data Format'
  428. ImageIndex = 3
  429. object Panel1: TPanel
  430. Left = 8
  431. Top = 8
  432. Width = 249
  433. Height = 97
  434. BevelOuter = bvNone
  435. TabOrder = 0
  436. object Label6: TLabel
  437. Left = 0
  438. Top = 0
  439. Width = 249
  440. Height = 27
  441. AutoSize = False
  442. Caption =
  443. 'Choose the relocation format for BSS references (i.e. references' +
  444. ' to uninitialized global variables):'
  445. WordWrap = True
  446. end
  447. object BSSKernelRadioButton: TRadioButton
  448. Left = 8
  449. Top = 48
  450. Width = 233
  451. Height = 16
  452. Hint = 'KERNEL_FORMAT_BSS'
  453. Caption = '&Kernel (medium calls, medium stub)'
  454. Checked = True
  455. TabOrder = 1
  456. TabStop = True
  457. OnMouseDown = ItemMouseDown
  458. end
  459. object BSSCompressedRadioButton: TRadioButton
  460. Left = 8
  461. Top = 64
  462. Width = 233
  463. Height = 16
  464. Hint = 'COMPRESSED_FORMAT_BSS'
  465. Caption = 'C&ompressed (smallest calls, large stub)'
  466. TabOrder = 2
  467. OnMouseDown = ItemMouseDown
  468. end
  469. object BSSMergeRadioButton: TRadioButton
  470. Left = 8
  471. Top = 32
  472. Width = 233
  473. Height = 16
  474. Hint = 'MERGE_BSS'
  475. Caption = '&Merge BSS section with data section'
  476. TabOrder = 0
  477. OnMouseDown = ItemMouseDown
  478. end
  479. object BSSMlinkRadioButton: TRadioButton
  480. Left = 8
  481. Top = 80
  482. Width = 233
  483. Height = 16
  484. Hint = 'MLINK_FORMAT_BSS'
  485. Caption = 'M&link (small calls, medium stub)'
  486. TabOrder = 3
  487. OnMouseDown = ItemMouseDown
  488. end
  489. end
  490. object Panel4: TPanel
  491. Left = 8
  492. Top = 120
  493. Width = 249
  494. Height = 81
  495. BevelOuter = bvNone
  496. TabOrder = 1
  497. object Label8: TLabel
  498. Left = 0
  499. Top = 0
  500. Width = 249
  501. Height = 27
  502. AutoSize = False
  503. Caption =
  504. 'Choose the relocation format for references to a data variable, ' +
  505. 'if it exists:'
  506. WordWrap = True
  507. end
  508. object DataVarKernelRadioButton: TRadioButton
  509. Left = 8
  510. Top = 32
  511. Width = 233
  512. Height = 16
  513. Hint = 'KERNEL_FORMAT_DATA_VAR'
  514. Caption = 'K&ernel (medium calls, medium stub)'
  515. Checked = True
  516. TabOrder = 0
  517. TabStop = True
  518. OnMouseDown = ItemMouseDown
  519. end
  520. object DataVarCompressedRadioButton: TRadioButton
  521. Left = 8
  522. Top = 48
  523. Width = 233
  524. Height = 16
  525. Hint = 'COMPRESSED_FORMAT_DATA_VAR'
  526. Caption = 'Com&pressed (smallest calls, large stub)'
  527. TabOrder = 1
  528. OnMouseDown = ItemMouseDown
  529. end
  530. object DataVarMlinkRadioButton: TRadioButton
  531. Left = 8
  532. Top = 64
  533. Width = 233
  534. Height = 16
  535. Hint = 'MLINK_FORMAT_DATA_VAR'
  536. Caption = 'Ml&ink (small calls, medium stub)'
  537. TabOrder = 2
  538. OnMouseDown = ItemMouseDown
  539. end
  540. end
  541. end
  542. object HomeScreenSheet: TTabSheet
  543. Caption = '&Home Screen'
  544. ImageIndex = 4
  545. DesignSize = (
  546. 273
  547. 261)
  548. object Label11: TLabel
  549. Left = 8
  550. Top = 100
  551. Width = 257
  552. Height = 45
  553. Anchors = [akLeft, akTop, akRight]
  554. AutoSize = False
  555. Caption =
  556. 'Note that you have to push a value to the expression stack if yo' +
  557. 'u use a custom return value, unless you throw an error.'
  558. WordWrap = True
  559. end
  560. object Label10: TLabel
  561. Left = 8
  562. Top = 48
  563. Width = 65
  564. Height = 13
  565. Caption = 'Return Value:'
  566. end
  567. object Label7: TLabel
  568. Left = 8
  569. Top = 8
  570. Width = 257
  571. Height = 33
  572. Anchors = [akLeft, akTop, akRight]
  573. AutoSize = False
  574. Caption =
  575. 'The following options affect the program when it is run from the' +
  576. ' Home Screen.'
  577. WordWrap = True
  578. end
  579. object LCDSaveCheckBox: TCheckBox
  580. Left = 16
  581. Top = 184
  582. Width = 153
  583. Height = 17
  584. Hint = 'SAVE_SCREEN'
  585. Caption = 'Save/restore &LCD contents'
  586. Checked = True
  587. State = cbChecked
  588. TabOrder = 0
  589. OnMouseDown = ItemMouseDown
  590. end
  591. object EnableErrorReturnCheckBox: TCheckBox
  592. Left = 16
  593. Top = 152
  594. Width = 169
  595. Height = 17
  596. Hint = 'ENABLE_ERROR_RETURN'
  597. Caption = 'Enable returning &errors to AMS'
  598. TabOrder = 1
  599. OnMouseDown = ItemMouseDown
  600. end
  601. object ReturnValueRadioButton: TRadioButton
  602. Left = 16
  603. Top = 81
  604. Width = 89
  605. Height = 17
  606. Hint = 'RETURN_VALUE'
  607. Caption = 'Custom &value'
  608. TabOrder = 2
  609. OnMouseDown = ItemMouseDown
  610. end
  611. object ReturnDoneRadioButton: TRadioButton
  612. Left = 16
  613. Top = 64
  614. Width = 89
  615. Height = 17
  616. Caption = #39#39'&Done'#39#39
  617. Checked = True
  618. TabOrder = 3
  619. TabStop = True
  620. OnMouseDown = ItemMouseDown
  621. end
  622. end
  623. end
  624. object CloseButton: TButton
  625. Left = 208
  626. Top = 304
  627. Width = 81
  628. Height = 25
  629. Anchors = [akRight, akBottom]
  630. Caption = '&Close'
  631. Default = True
  632. ModalResult = 1
  633. TabOrder = 1
  634. end
  635. end