fFontgenD.dfm 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132
  1. object FormFontGen: TFormFontGen
  2. Left = 277
  3. Top = 178
  4. BorderStyle = bsSingle
  5. Caption = 'FontGen'
  6. ClientHeight = 454
  7. ClientWidth = 473
  8. Color = clBtnFace
  9. Font.Charset = DEFAULT_CHARSET
  10. Font.Color = clWindowText
  11. Font.Height = -14
  12. Font.Name = 'MS Sans Serif'
  13. Font.Style = []
  14. Position = poScreenCenter
  15. OnCreate = FormCreate
  16. PixelsPerInch = 120
  17. TextHeight = 16
  18. object GroupBox1: TGroupBox
  19. Left = 8
  20. Top = 10
  21. Width = 453
  22. Height = 136
  23. Margins.Left = 4
  24. Margins.Top = 4
  25. Margins.Right = 4
  26. Margins.Bottom = 4
  27. Caption = '1. Select Windows font :'
  28. TabOrder = 0
  29. object Panel1: TPanel
  30. Left = 13
  31. Top = 25
  32. Width = 428
  33. Height = 51
  34. Margins.Left = 4
  35. Margins.Top = 4
  36. Margins.Right = 4
  37. Margins.Bottom = 4
  38. BevelOuter = bvLowered
  39. Caption = 'Sample AaBbCcDd'
  40. Font.Charset = RUSSIAN_CHARSET
  41. Font.Color = clWindowText
  42. Font.Height = -14
  43. Font.Name = 'Arial'
  44. Font.Style = []
  45. ParentFont = False
  46. TabOrder = 0
  47. end
  48. object Button1: TButton
  49. Left = 178
  50. Top = 88
  51. Width = 93
  52. Height = 31
  53. Margins.Left = 4
  54. Margins.Top = 4
  55. Margins.Right = 4
  56. Margins.Bottom = 4
  57. Caption = 'Select...'
  58. TabOrder = 1
  59. OnClick = Button1Click
  60. end
  61. end
  62. object GroupBox2: TGroupBox
  63. Left = 8
  64. Top = 150
  65. Width = 453
  66. Height = 211
  67. Margins.Left = 4
  68. Margins.Top = 4
  69. Margins.Right = 4
  70. Margins.Bottom = 4
  71. Caption = '2. Check glyphs'
  72. TabOrder = 1
  73. object Image1: TImage
  74. Left = 2
  75. Top = 18
  76. Width = 449
  77. Height = 191
  78. Margins.Left = 4
  79. Margins.Top = 4
  80. Margins.Right = 4
  81. Margins.Bottom = 4
  82. Align = alClient
  83. Center = True
  84. ExplicitLeft = 3
  85. ExplicitTop = 19
  86. ExplicitWidth = 448
  87. ExplicitHeight = 190
  88. end
  89. end
  90. object GroupBox3: TGroupBox
  91. Left = 8
  92. Top = 363
  93. Width = 453
  94. Height = 81
  95. Margins.Left = 4
  96. Margins.Top = 4
  97. Margins.Right = 4
  98. Margins.Bottom = 4
  99. Caption = '3. Save font:'
  100. TabOrder = 2
  101. object Button2: TButton
  102. Left = 188
  103. Top = 30
  104. Width = 93
  105. Height = 31
  106. Margins.Left = 4
  107. Margins.Top = 4
  108. Margins.Right = 4
  109. Margins.Bottom = 4
  110. Caption = 'Save...'
  111. TabOrder = 0
  112. OnClick = Button2Click
  113. end
  114. end
  115. object FontDialog1: TFontDialog
  116. Font.Charset = DEFAULT_CHARSET
  117. Font.Color = clWindowText
  118. Font.Height = -11
  119. Font.Name = 'MS Sans Serif'
  120. Font.Style = []
  121. Left = 128
  122. Top = 210
  123. end
  124. object SaveDialog1: TSaveDialog
  125. DefaultExt = 'gsf'
  126. FileName = 'font'
  127. Filter = 'GlScene Font|*.gsf|All Files|*.*'
  128. Title = 'Save font'
  129. Left = 274
  130. Top = 214
  131. end
  132. end