📄 main.dfm
字号:
object frmMain: TfrmMain
Left = 212
Top = 200
AutoScroll = False
BorderIcons = [biMinimize, biMaximize]
Caption = 'frmMain'
ClientHeight = 408
ClientWidth = 400
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object NgButton1: TTeButton
Left = 10
Top = 70
Width = 103
Height = 25
Performance = kspDoubleBuffer
OnClick = NgButton1Click
BlackAndWhiteGlyph = False
Caption = 'Menus Demo'
FontOptions.Bold = False
FontOptions.Italic = False
FontOptions.SizeDelta = 0
FontOptions.FontColor = clNone
FontOptions.StrikeOut = False
FontOptions.Underline = False
ThemeObject = 'default'
TabOrder = 0
Transparent = True
WordWrap = False
end
object NgButton2: TTeButton
Left = 10
Top = 106
Width = 103
Height = 25
Performance = kspDoubleBuffer
OnClick = NgButton2Click
BlackAndWhiteGlyph = False
Caption = 'Controls #1'
FontOptions.Bold = False
FontOptions.Italic = False
FontOptions.SizeDelta = 0
FontOptions.FontColor = clNone
FontOptions.StrikeOut = False
FontOptions.Underline = False
ThemeObject = 'default'
TabOrder = 1
Transparent = True
WordWrap = False
end
object NgButton3: TTeButton
Left = 10
Top = 144
Width = 103
Height = 25
Performance = kspDoubleBuffer
OnClick = NgButton3Click
BlackAndWhiteGlyph = False
Caption = 'Controls #2'
FontOptions.Bold = False
FontOptions.Italic = False
FontOptions.SizeDelta = 0
FontOptions.FontColor = clNone
FontOptions.StrikeOut = False
FontOptions.Underline = False
ThemeObject = 'default'
TabOrder = 2
Transparent = True
WordWrap = False
end
object NgButton4: TTeButton
Left = 30
Top = 274
Width = 103
Height = 25
Performance = kspDoubleBuffer
OnClick = NgButton4Click
BlackAndWhiteGlyph = False
Caption = 'Blend'
FontOptions.Bold = False
FontOptions.Italic = False
FontOptions.SizeDelta = 0
FontOptions.FontColor = clNone
FontOptions.StrikeOut = False
FontOptions.Underline = False
ThemeObject = 'default'
TabOrder = 3
Transparent = True
WordWrap = False
end
object NgGroupBox1: TTeGroupBox
Left = 124
Top = 64
Width = 267
Height = 109
Performance = kspNoBuffer
CaptionMargin = 12
Caption = 'Description'
CheckBoxAlignment = kalLeftJustify
ThemeObject = 'default'
Transparent = True
TabOrder = 4
UseCheckBox = False
object Label1: TLabel
Left = 14
Top = 22
Width = 243
Height = 59
AutoSize = False
Caption = 'Welcome to ThemeEngine !'
Transparent = True
WordWrap = True
end
end
object NgGroupBox2: TTeGroupBox
Left = 124
Top = 182
Width = 267
Height = 81
Performance = kspNoBuffer
CaptionMargin = 12
Caption = 'Change hue'
CheckBoxAlignment = kalLeftJustify
ThemeObject = 'default'
Transparent = True
TabOrder = 5
UseCheckBox = False
object NgTrackBar1: TTeTrackBar
Left = 14
Top = 26
Width = 237
Height = 39
Performance = kspDoubleBuffer
LineSize = 10
Max = 250
Orientation = ktoHorizontal
PageSize = 30
Position = 0
Frequency = 10
TabOrder = 0
Transparent = True
ThemeObject = 'default'
OnChange = NgTrackBar1Change
end
end
object SeSkinMenuBar1: TTeMenuBar
Left = 0
Top = 0
Width = 400
Height = 20
Performance = kspNoBuffer
Align = alTop
AutoSize = True
PopupMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
ThemeObject = 'default'
object CustomItem10: TTeItem
Caption = '&Demos'
Scrolled = False
ScrollCount = 0
object CustomItem15: TTeItem
Caption = 'Menu Demo'
Scrolled = False
ScrollCount = 0
OnClick = NgButton1Click
end
object CustomItem16: TTeItem
Caption = 'Controls #1'
Scrolled = False
ScrollCount = 0
OnClick = NgButton2Click
end
object CustomItem17: TTeItem
Caption = 'Controls #2'
Scrolled = False
ScrollCount = 0
OnClick = NgButton3Click
end
object CustomItem18: TTeItem
Caption = 'Blend'
Scrolled = False
ScrollCount = 0
OnClick = NgButton4Click
end
end
object CustomItem11: TTeItem
Caption = '&Help'
Scrolled = False
ScrollCount = 0
object CustomItem12: TTeItem
Caption = 'KS Development Site'
Scrolled = False
ScrollCount = 0
OnClick = CustomItem12Click
end
object CustomItem13: TTeItem
Caption = '-'
Scrolled = False
ScrollCount = 0
end
object CustomItem14: TTeItem
Caption = 'About...'
Scrolled = False
ScrollCount = 0
OnClick = CustomItem14Click
end
end
end
object SeSkinButton1: TTeButton
Left = 10
Top = 34
Width = 103
Height = 25
Performance = kspDoubleBuffer
OnClick = SeSkinButton1Click
BlackAndWhiteGlyph = False
Caption = 'Load Skin...'
FontOptions.Bold = False
FontOptions.Italic = False
FontOptions.SizeDelta = 0
FontOptions.FontColor = clNone
FontOptions.StrikeOut = False
FontOptions.Underline = False
ThemeObject = 'default'
TabOrder = 7
Transparent = True
WordWrap = False
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -