blob: c00ef4e74187958cf2e4a6e5c40d20b7ac2fa5f6 (
plain) (
tree)
|
|
object FontSelFrm: TFontSelFrm
Left = 376
Top = 241
BorderIcons = []
BorderStyle = bsDialog
Caption = 'Font Selection'
ClientHeight = 412
ClientWidth = 363
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
Scaled = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 149
Width = 363
Height = 263
Align = alClient
TabOrder = 0
object GroupBox1: TGroupBox
Left = 1
Top = 1
Width = 361
Height = 261
Align = alClient
Caption = 'Sample Text'
TabOrder = 0
object SampleText: TPanel
Left = 2
Top = 15
Width = 357
Height = 244
Align = alClient
BevelOuter = bvNone
Caption = 'AaBbYyZz'
TabOrder = 0
end
end
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 363
Height = 149
Align = alTop
TabOrder = 1
object Label1: TLabel
Left = 8
Top = 6
Width = 21
Height = 13
Caption = '&Font'
end
object Label2: TLabel
Left = 186
Top = 6
Width = 20
Height = 13
Caption = '&Size'
end
object Label3: TLabel
Left = 8
Top = 71
Width = 58
Height = 13
Caption = 'Background'
end
object Label4: TLabel
Left = 153
Top = 71
Width = 54
Height = 13
Caption = 'Foreground'
end
object SizeComboBox: TComboBox
Left = 184
Top = 23
Width = 49
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 0
Text = 'SizeComboBox'
OnChange = SizeComboBoxChange
Items.Strings = (
'8'
'9'
'10'
'11'
'12'
'13'
'14'
'16'
'18'
'20'
'22'
'24'
'26'
'28'
'30'
'32'
'34'
'36'
'38'
'40'
'42')
end
object ckShowFont: TCheckBox
Left = 8
Top = 50
Width = 257
Height = 18
Caption = 'Show Font Faces'
Checked = True
State = cbChecked
TabOrder = 1
OnClick = ckShowFontClick
end
object pnlFontComboBox: TPanel
Left = 8
Top = 23
Width = 169
Height = 29
BevelOuter = bvNone
Caption = 'Font ComboBox'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object pnlBGColorCmb: TPanel
Left = 8
Top = 86
Width = 134
Height = 20
BevelOuter = bvNone
Caption = 'Color Combo'
TabOrder = 3
end
object pnlFGColorCmb: TPanel
Left = 151
Top = 86
Width = 134
Height = 20
BevelOuter = bvNone
Caption = 'Color Combo'
TabOrder = 4
end
object OKBtn: TBitBtn
Left = 280
Top = 7
Width = 75
Height = 25
Anchors = [akTop, akRight]
TabOrder = 5
OnClick = OKBtnClick
Kind = bkOK
end
object CancelBtn: TBitBtn
Left = 280
Top = 35
Width = 75
Height = 25
Anchors = [akTop, akRight]
TabOrder = 6
OnClick = CancelBtnClick
Kind = bkCancel
end
end
object FGColorDlg: TColorDialog
Ctl3D = True
Left = 312
Top = 72
end
object BGColorDlg: TColorDialog
Ctl3D = True
Left = 312
Top = 104
end
end
|