-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathFontEditor.dfm
More file actions
192 lines (192 loc) · 4.21 KB
/
FontEditor.dfm
File metadata and controls
192 lines (192 loc) · 4.21 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
object TFontEditor
Left = 0
Top = 0
BorderStyle = bsDialog
Caption = '瀛椾綋缂栬緫鍣?
ClientHeight = 381
ClientWidth = 484
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object pnlMain: TPanel
Left = 0
Top = 0
Width = 484
Height = 381
Align = alClient
BevelOuter = bvNone
TabOrder = 0
object pnlPreview: TPanel
Left = 0
Top = 265
Width = 484
Height = 116
Align = alBottom
BevelKind = bkTile
BevelOuter = bvNone
TabOrder = 0
object lblPreview: TLabel
Left = 24
Top = 40
Width = 433
Height = 28
Alignment = taCenter
AutoSize = False
Caption = '娆㈣繋浣跨敤瀛椾綋缂栬緫鍣?- Welcome to Font Editor - ABC123'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
end
object pnlSettings: TPanel
Left = 0
Top = 0
Width = 484
Height = 265
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object lblFontName: TLabel
Left = 24
Top = 24
Width = 60
Height = 13
Caption = '瀛椾綋鍚嶇О锛?
end
object lblFontSize: TLabel
Left = 24
Top = 64
Width = 60
Height = 13
Caption = '瀛椾綋澶у皬锛?
end
object lblFontStyle: TLabel
Left = 24
Top = 104
Width = 60
Height = 13
Caption = '瀛椾綋鏍峰紡锛?
end
object lblFontColor: TLabel
Left = 24
Top = 152
Width = 60
Height = 13
Caption = '瀛椾綋棰滆壊锛?
end
object edtFontName: TEdit
Left = 96
Top = 21
Width = 257
Height = 21
TabOrder = 0
end
object edtFontSize: TEdit
Left = 96
Top = 61
Width = 65
Height = 21
TabOrder = 1
Text = '10'
end
object pnlColor: TPanel
Left = 96
Top = 149
Width = 65
Height = 25
BevelOuter = bvLowered
Color = clBlack
ParentBackground = False
TabOrder = 2
OnClick = pnlColorClick
end
object chkBold: TCheckBox
Left = 96
Top = 104
Width = 65
Height = 17
Caption = '绮椾綋'
TabOrder = 3
OnClick = chkBoldClick
end
object chkItalic: TCheckBox
Left = 167
Top = 104
Width = 65
Height = 17
Caption = '鏂滀綋'
TabOrder = 4
OnClick = chkItalicClick
end
object chkUnderline: TCheckBox
Left = 238
Top = 104
Width = 65
Height = 17
Caption = '涓嬪垝绾?
TabOrder = 5
OnClick = chkUnderlineClick
end
object chkStrikeout: TCheckBox
Left = 309
Top = 104
Width = 65
Height = 17
Caption = '鍒犻櫎绾?
TabOrder = 6
OnClick = chkStrikeoutClick
end
object btnSelectFont: TButton
Left = 376
Top = 20
Width = 89
Height = 25
Caption = '閫夋嫨瀛椾綋...'
TabOrder = 7
OnClick = btnSelectFontClick
end
object btnDefault: TButton
Left = 96
Top = 200
Width = 89
Height = 25
Caption = '鎭㈠榛樿'
TabOrder = 8
OnClick = btnDefaultClick
end
object btnApply: TButton
Left = 208
Top = 200
Width = 89
Height = 25
Caption = '搴旂敤鏇存敼'
TabOrder = 9
OnClick = btnApplyClick
end
end
end
object dlgFont: TFontDialog
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Options = [fdEffects, fdFixedPitchOnly]
Left = 416
Top = 64
end
object dlgColor: TColorDialog
Left = 416
Top = 120
end
end