uMain.lfm 6.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310
  1. object Form1: TForm1
  2. Left = 281
  3. Height = 600
  4. Top = 416
  5. Width = 800
  6. ActiveControl = Panel1
  7. BorderStyle = bsSingle
  8. Caption = 'ZenFont 0.2.6(LCL)'
  9. ClientHeight = 600
  10. ClientWidth = 800
  11. Constraints.MinHeight = 600
  12. Constraints.MinWidth = 800
  13. OnActivate = FormActivate
  14. OnClose = FormClose
  15. OnResize = FormResize
  16. Position = poScreenCenter
  17. LCLVersion = '2.2.4.0'
  18. Visible = True
  19. object GroupBox1: TGroupBox
  20. Left = 0
  21. Height = 200
  22. Top = 400
  23. Width = 800
  24. Align = alBottom
  25. Caption = 'Parameters'
  26. ClientHeight = 176
  27. ClientWidth = 798
  28. TabOrder = 0
  29. object CheckBoxAntialiasing: TCheckBox
  30. Left = 10
  31. Height = 27
  32. Top = 95
  33. Width = 114
  34. Caption = 'Antialiasing'
  35. Checked = True
  36. OnChange = CheckBoxAntialiasingChange
  37. State = cbChecked
  38. TabOrder = 0
  39. end
  40. object CheckBoxPack: TCheckBox
  41. Left = 10
  42. Height = 27
  43. Top = 120
  44. Width = 62
  45. Caption = 'Pack'
  46. Checked = True
  47. OnChange = CheckBoxPackChange
  48. State = cbChecked
  49. TabOrder = 1
  50. end
  51. object LabelCurrentPage: TLabel
  52. Left = 10
  53. Height = 23
  54. Top = 55
  55. Width = 104
  56. Caption = 'Current Page:'
  57. ParentColor = False
  58. end
  59. object ComboBoxPageSize: TComboBox
  60. Left = 90
  61. Height = 35
  62. Top = 10
  63. Width = 70
  64. ItemHeight = 0
  65. ItemIndex = 1
  66. Items.Strings = (
  67. '128'
  68. '256'
  69. '512'
  70. '1024'
  71. '2048'
  72. )
  73. OnChange = ComboBoxPageSizeChange
  74. Style = csDropDownList
  75. TabOrder = 2
  76. Text = '256'
  77. end
  78. object LabelPageSize: TLabel
  79. Left = 10
  80. Height = 23
  81. Top = 15
  82. Width = 76
  83. Caption = 'Page Size:'
  84. ParentColor = False
  85. end
  86. object ButtonChooseFont: TButton
  87. Left = 10
  88. Height = 25
  89. Top = 150
  90. Width = 150
  91. Caption = 'Choose Font'
  92. OnClick = ButtonChooseFontClick
  93. TabOrder = 3
  94. end
  95. object ButtonSaveFont: TButton
  96. Left = 642
  97. Height = 25
  98. Top = 40
  99. Width = 150
  100. Anchors = [akTop, akRight]
  101. Caption = 'Save Font'
  102. OnClick = ButtonSaveFontClick
  103. TabOrder = 5
  104. end
  105. object ButtonExit: TButton
  106. Left = 642
  107. Height = 25
  108. Top = 150
  109. Width = 150
  110. Anchors = [akTop, akRight]
  111. Caption = 'Exit'
  112. OnClick = ButtonExitClick
  113. TabOrder = 6
  114. end
  115. object ButtonRebuildFont: TButton
  116. Left = 642
  117. Height = 25
  118. Top = 10
  119. Width = 150
  120. Anchors = [akTop, akRight]
  121. Caption = 'Rebuild Font'
  122. OnClick = ButtonRebuildFontClick
  123. TabOrder = 4
  124. end
  125. object GroupBox2: TGroupBox
  126. Left = 170
  127. Height = 70
  128. Top = 105
  129. Width = 462
  130. Anchors = [akTop, akLeft, akRight]
  131. Caption = 'Char Padding'
  132. ClientHeight = 46
  133. ClientWidth = 460
  134. TabOrder = 7
  135. object Label1: TLabel
  136. Left = 120
  137. Height = 23
  138. Top = 15
  139. Width = 32
  140. Caption = 'Top:'
  141. ParentColor = False
  142. end
  143. object Label2: TLabel
  144. Left = 10
  145. Height = 23
  146. Top = 15
  147. Width = 33
  148. Caption = 'Left:'
  149. ParentColor = False
  150. end
  151. object Label3: TLabel
  152. Left = 220
  153. Height = 23
  154. Top = 15
  155. Width = 44
  156. Caption = 'Right:'
  157. ParentColor = False
  158. end
  159. object Label4: TLabel
  160. Left = 340
  161. Height = 23
  162. Top = 15
  163. Width = 61
  164. Caption = 'Bottom:'
  165. ParentColor = False
  166. end
  167. object SpinTop: TSpinEdit
  168. Left = 160
  169. Height = 40
  170. Top = 0
  171. Width = 50
  172. OnChange = SpinTopChange
  173. TabOrder = 1
  174. Value = 2
  175. end
  176. object SpinLeft: TSpinEdit
  177. Left = 60
  178. Height = 40
  179. Top = 0
  180. Width = 50
  181. OnChange = SpinLeftChange
  182. TabOrder = 0
  183. Value = 2
  184. end
  185. object SpinRight: TSpinEdit
  186. Left = 280
  187. Height = 40
  188. Top = 0
  189. Width = 50
  190. OnChange = SpinRightChange
  191. TabOrder = 2
  192. Value = 2
  193. end
  194. object SpinBottom: TSpinEdit
  195. Left = 400
  196. Height = 40
  197. Top = 0
  198. Width = 50
  199. OnChange = SpinBottomChange
  200. TabOrder = 3
  201. Value = 2
  202. end
  203. end
  204. object SpinCurrentPage: TSpinEdit
  205. Left = 110
  206. Height = 40
  207. Top = 50
  208. Width = 50
  209. Enabled = False
  210. MaxValue = 1
  211. MinValue = 1
  212. OnChange = SpinCurrentPageChange
  213. TabOrder = 8
  214. Value = 1
  215. end
  216. object GroupBox3: TGroupBox
  217. Left = 295
  218. Height = 95
  219. Top = 0
  220. Width = 337
  221. Anchors = [akTop, akLeft, akRight]
  222. Caption = 'Chars'
  223. ClientHeight = 71
  224. ClientWidth = 335
  225. TabOrder = 9
  226. object ButtonDefaultSymbols: TButton
  227. Left = 11
  228. Height = 25
  229. Top = 45
  230. Width = 150
  231. Caption = 'Set default'
  232. OnClick = ButtonDefaultSymbolsClick
  233. TabOrder = 0
  234. end
  235. object ButtonImportSymbols: TButton
  236. Left = 174
  237. Height = 25
  238. Top = 45
  239. Width = 150
  240. Anchors = [akTop, akRight]
  241. Caption = 'Import from file'
  242. OnClick = ButtonImportSymbolsClick
  243. TabOrder = 1
  244. end
  245. object EditChars: TEdit
  246. Left = 11
  247. Height = 40
  248. Top = 0
  249. Width = 314
  250. Anchors = [akTop, akLeft, akRight]
  251. TabOrder = 2
  252. end
  253. end
  254. object GroupBox4: TGroupBox
  255. Left = 170
  256. Height = 95
  257. Top = 0
  258. Width = 120
  259. Caption = 'Test String'
  260. ClientHeight = 71
  261. ClientWidth = 118
  262. TabOrder = 10
  263. object EditTest: TEdit
  264. Left = 10
  265. Height = 40
  266. Top = 0
  267. Width = 95
  268. TabOrder = 0
  269. Text = 'Test'
  270. end
  271. end
  272. end
  273. object Panel1: TPanel
  274. Left = 0
  275. Height = 400
  276. Top = 0
  277. Width = 800
  278. Align = alClient
  279. Caption = 'Processing...'
  280. TabOrder = 1
  281. OnMouseDown = Panel1MouseDown
  282. OnMouseMove = Panel1MouseMove
  283. OnMouseUp = Panel1MouseUp
  284. end
  285. object SaveFontDialog: TSaveDialog
  286. Title = 'Save Font'
  287. Filter = 'Zen Font Info|*.zfi'
  288. Left = 130
  289. end
  290. object FontDialog: TFontDialog
  291. Title = 'Choose the Font'
  292. Font.Height = -13
  293. Font.Name = 'Sans'
  294. MinFontSize = 0
  295. MaxFontSize = 0
  296. Left = 230
  297. end
  298. object OpenDialog: TOpenDialog
  299. Title = 'Open text file'
  300. Filter = 'Any UTF-8 file|*.*'
  301. Left = 30
  302. end
  303. object Timer1: TTimer
  304. Enabled = False
  305. Interval = 16
  306. OnTimer = Timer1Timer
  307. Left = 32
  308. Top = 64
  309. end
  310. end