StartupUnit.dfm 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100
  1. object StartupForm: TStartupForm
  2. Left = 168
  3. Top = 86
  4. BorderIcons = [biSystemMenu]
  5. BorderStyle = bsDialog
  6. Caption = 'Welcome'
  7. ClientHeight = 265
  8. ClientWidth = 305
  9. Color = clBtnFace
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -11
  13. Font.Name = 'MS Sans Serif'
  14. Font.Style = []
  15. OldCreateOrder = False
  16. Position = poScreenCenter
  17. OnShow = DirectoryBoxChange
  18. PixelsPerInch = 96
  19. TextHeight = 13
  20. object Label1: TLabel
  21. Left = 16
  22. Top = 16
  23. Width = 273
  24. Height = 25
  25. AutoSize = False
  26. Caption =
  27. 'Please double-click on the folder you installed or unzipped TI-G' +
  28. 'CC in.'
  29. WordWrap = True
  30. end
  31. object Label2: TLabel
  32. Left = 16
  33. Top = 44
  34. Width = 196
  35. Height = 13
  36. Caption = 'If you did not download TI-GCC yet, click '
  37. end
  38. object DownloadLabel: TURLLabel
  39. Left = 212
  40. Top = 44
  41. Width = 21
  42. Height = 13
  43. Cursor = crHandPoint
  44. Caption = 'here'
  45. Font.Charset = DEFAULT_CHARSET
  46. Font.Color = clHighlight
  47. Font.Height = -11
  48. Font.Name = 'MS Sans Serif'
  49. Font.Style = [fsUnderline]
  50. ParentFont = False
  51. URL = 'http://www.ticalc.org/pub/win/asm/tigcc.zip'
  52. ShowWindow = swShowMaximized
  53. end
  54. object Label3: TLabel
  55. Left = 233
  56. Top = 44
  57. Width = 3
  58. Height = 13
  59. Caption = '.'
  60. end
  61. object OKButton: TButton
  62. Left = 56
  63. Top = 224
  64. Width = 81
  65. Height = 25
  66. Caption = '&OK'
  67. Default = True
  68. Enabled = False
  69. TabOrder = 0
  70. OnClick = OKButtonClick
  71. end
  72. object CancelButton: TButton
  73. Left = 168
  74. Top = 224
  75. Width = 81
  76. Height = 25
  77. Cancel = True
  78. Caption = '&Cancel'
  79. ModalResult = 2
  80. TabOrder = 1
  81. end
  82. object DirectoryBox: TDirectoryListBox
  83. Left = 16
  84. Top = 64
  85. Width = 273
  86. Height = 113
  87. ItemHeight = 16
  88. TabOrder = 2
  89. OnChange = DirectoryBoxChange
  90. end
  91. object DriveBox: TDriveComboBox
  92. Left = 16
  93. Top = 184
  94. Width = 273
  95. Height = 19
  96. DirList = DirectoryBox
  97. TabOrder = 3
  98. TextCase = tcUpperCase
  99. end
  100. end