📄 acselectskin.dfm
字号:
object FormSkinSelect: TFormSkinSelect
Left = 349
Top = 327
Width = 500
Height = 360
BorderStyle = bsToolWindow
Caption = 'Select skin'
Color = clBtnFace
Constraints.MinHeight = 360
Constraints.MinWidth = 500
OldCreateOrder = False
Position = poScreenCenter
Scaled = False
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object sListBox1: TsListBox
Left = 12
Top = 48
Width = 130
Height = 271
AutoCompleteDelay = 500
BoundLabel.Caption = 'Available skins :'
BoundLabel.Indent = 0
BoundLabel.Layout = sclTopLeft
BoundLabel.MaxWidth = 0
BoundLabel.UseSkinColor = True
SkinData.SkinSection = 'EDIT'
ItemHeight = 13
Anchors = [akLeft, akTop, akBottom]
TabOrder = 0
OnClick = sListBox1Click
OnDblClick = sListBox1DblClick
end
object sBitBtn1: TsBitBtn
Left = 308
Top = 294
Width = 75
Height = 25
Enabled = False
TabOrder = 1
Kind = bkOK
SkinData.SkinSection = 'BUTTON'
end
object sBitBtn2: TsBitBtn
Left = 388
Top = 294
Width = 75
Height = 25
TabOrder = 2
Kind = bkCancel
SkinData.SkinSection = 'BUTTON'
end
object sPanel1: TsPanel
Left = 159
Top = 48
Width = 321
Height = 231
Anchors = [akLeft, akTop, akRight, akBottom]
BevelOuter = bvNone
Caption = 'Skin preview'
Enabled = False
TabOrder = 3
SkinData.SkinSection = 'CHECKBOX'
end
object sDirectoryEdit1: TsDirectoryEdit
Left = 112
Top = 12
Width = 369
Height = 21
AutoSize = False
MaxLength = 255
TabOrder = 4
OnChange = sDirectoryEdit1Change
BoundLabel.Active = True
BoundLabel.Caption = 'DIrectory with skins'
BoundLabel.Indent = 0
BoundLabel.Layout = sclLeft
BoundLabel.MaxWidth = 0
BoundLabel.UseSkinColor = True
SkinData.SkinSection = 'EDIT'
GlyphMode.Grayed = False
Root = 'rfDesktop'
end
object sSkinProvider1: TsSkinProvider
SkinData.SkinSection = 'FORM'
TitleButtons = <>
Left = 448
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -