📄 paneldemo.dfm
字号:
756E69747920486F6D65205061676500000000000100000001380000001B0000
00FFFFFFFFFFFFFFFFFFFFFFFF00000000000000000000000000000000000000
0000000C43616C69747A2042726F732E000000000001000000010100000000}
Options = [icoExpanded, icoEndNodesOnly]
ReadOnly = False
ShowMatchText = True
Sorted = False
Style = csDropDownList
TabOrder = 0
end
end
object fcGroupBox2: TfcGroupBox
Left = 228
Top = 192
Width = 253
Height = 145
Caption = 'PERSONAL INFORMATION'
Color = clYellow
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Frame.Enabled = True
Frame.NonFocusColor = clBtnFace
ParentColor = False
ParentFont = False
TabOrder = 1
object fcLabel8: TfcLabel
Left = 14
Top = 42
Width = 28
Height = 14
Caption = 'Name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clInactiveCaption
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TextOptions.Alignment = taLeftJustify
TextOptions.VAlignment = vaTop
Transparent = True
end
object fcLabel9: TfcLabel
Left = 15
Top = 82
Width = 75
Height = 14
Caption = 'Email x@x.xxx'
Font.Charset = DEFAULT_CHARSET
Font.Color = clInactiveCaption
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TextOptions.Alignment = taLeftJustify
TextOptions.VAlignment = vaTop
Transparent = True
end
object fcTreeCombo4: TfcTreeCombo
Left = 12
Top = 22
Width = 189
Height = 19
BorderStyle = bsNone
ButtonStyle = cbsDownArrow
Text = 'Peter Wilkinson'
Frame.Enabled = True
Frame.Transparent = True
DropDownCount = 8
Items.StreamVersion = 1
Items.Data = {
010000003B00000000000000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000
00000000000000000000000000000F50657465722057696C6B696E736F6E0000
0000000100000001}
Options = [icoExpanded]
ReadOnly = False
ShowButton = False
ShowMatchText = True
Sorted = False
Style = csDropDown
TabOrder = 0
TreeOptions = [tvoHideSelection, tvoShowRoot, tvoToolTips]
end
object fcTreeCombo5: TfcTreeCombo
Left = 12
Top = 62
Width = 189
Height = 19
BorderStyle = bsNone
ButtonStyle = cbsDownArrow
Text = 'pwilkins@aaa.com'
Frame.Enabled = True
Frame.Transparent = True
DropDownCount = 8
Items.StreamVersion = 1
Items.Data = {
010000003C00000000000000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000
0000000000000000000000000000107077696C6B696E73406161612E636F6D00
000000000100000001}
Options = [icoExpanded]
ReadOnly = False
ShowButton = False
ShowMatchText = True
Sorted = False
Style = csDropDown
TabOrder = 1
TreeOptions = [tvoHideSelection, tvoShowRoot, tvoToolTips]
end
end
object fcGroupBox3: TfcGroupBox
Left = 6
Top = 8
Width = 217
Height = 329
Caption = 'Groupbox Options'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Frame.Enabled = True
ParentColor = False
ParentFont = False
TabOrder = 2
object fcLabel4: TfcLabel
Left = 21
Top = 71
Width = 80
Height = 14
Caption = 'Non Focus color'
Font.Charset = DEFAULT_CHARSET
Font.Color = clInactiveCaption
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TextOptions.Alignment = taLeftJustify
TextOptions.VAlignment = vaTop
Transparent = True
end
object fcLabel5: TfcLabel
Left = 20
Top = 109
Width = 58
Height = 14
Caption = 'Focus color'
Font.Charset = DEFAULT_CHARSET
Font.Color = clInactiveCaption
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TextOptions.Alignment = taLeftJustify
TextOptions.VAlignment = vaTop
Transparent = True
end
object fcLabel6: TfcLabel
Left = 19
Top = 183
Width = 69
Height = 14
Caption = 'Caption Indent'
Font.Charset = DEFAULT_CHARSET
Font.Color = clInactiveCaption
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TextOptions.Alignment = taLeftJustify
TextOptions.VAlignment = vaTop
Transparent = True
end
object fcColorCombo1: TfcColorCombo
Left = 18
Top = 50
Width = 176
Height = 21
ColorListOptions.Font.Charset = DEFAULT_CHARSET
ColorListOptions.Font.Color = clWindowText
ColorListOptions.Font.Height = -11
ColorListOptions.Font.Name = 'MS Sans Serif'
ColorListOptions.Font.Style = []
ColorListOptions.Options = [ccoShowSystemColors, ccoShowColorNone, ccoShowStandardColors, ccoShowColorNames]
CustomColors.Strings = (
'Transparent')
DropDownCount = 8
ReadOnly = False
SelectedColor = clBtnFace
TabOrder = 0
OnChange = fcColorCombo1Change
end
object fcColorCombo2: TfcColorCombo
Left = 18
Top = 88
Width = 176
Height = 21
ColorListOptions.Font.Charset = DEFAULT_CHARSET
ColorListOptions.Font.Color = clWindowText
ColorListOptions.Font.Height = -11
ColorListOptions.Font.Name = 'MS Sans Serif'
ColorListOptions.Font.Style = []
ColorListOptions.Options = [ccoShowSystemColors, ccoShowColorNone, ccoShowStandardColors, ccoShowColorNames]
CustomColors.Strings = (
'Transparent')
DropDownCount = 8
ReadOnly = False
SelectedColor = clYellow
TabOrder = 1
OnChange = fcColorCombo2Change
end
object CheckBox1: TCheckBox
Left = 10
Top = 24
Width = 121
Height = 25
Caption = 'Transparent'
TabOrder = 2
OnClick = CheckBox1Click
end
object FullBorderCheckbox: TCheckBox
Left = 10
Top = 128
Width = 121
Height = 25
Caption = 'Full Border'
TabOrder = 3
OnClick = FullBorderCheckboxClick
end
object Edit1: TEdit
Left = 19
Top = 160
Width = 121
Height = 21
ReadOnly = True
TabOrder = 4
Text = '8'
OnChange = Edit1Change
end
object UpDown1: TUpDown
Left = 140
Top = 160
Width = 15
Height = 21
Associate = Edit1
Min = 0
Max = 50
Position = 8
TabOrder = 5
Wrap = False
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -