📄 edits.dfm
字号:
object frmEdits: TfrmEdits
Left = 367
Top = 253
AutoScroll = False
BorderIcons = [biMinimize, biMaximize]
Caption = 'Edit Demo'
ClientHeight = 215
ClientWidth = 450
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
PixelsPerInch = 96
TextHeight = 13
object Label2: TLabel
Left = 10
Top = 132
Width = 43
Height = 13
Caption = 'Samples:'
Transparent = True
end
object SeSkinEdit1: TTeEdit
Left = 10
Top = 154
Width = 335
Height = 21
Cursor = crIBeam
Performance = kspDoubleBuffer
AutoSize = True
BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
BevelInner = kbvLowered
BevelOuter = kbvLowered
BevelKind = kbkSingle
BevelWidth = 1
BorderWidth = 3
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordKind = pkNone
ContextMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
TabOrder = 0
Text = 'SeSkinEdit1'
ThemeObject = 'default'
end
object SeSkinRadioGroup1: TTeRadioGroup
Left = 10
Top = 10
Width = 131
Height = 113
Performance = kspNoBuffer
OnClick = SeSkinRadioGroup1Click
CaptionMargin = 12
Caption = 'Text Alignment'
CheckBoxAlignment = kalLeftJustify
ThemeObject = 'default'
Transparent = True
TabOrder = 1
UseCheckBox = False
ItemIndex = 0
Items.Strings = (
'LeftJustify'
'RightJustify'
'Center')
end
object SeSkinGroupBox1: TTeGroupBox
Left = 148
Top = 10
Width = 289
Height = 113
Performance = kspNoBuffer
CaptionMargin = 12
Caption = 'Password'
CheckBoxAlignment = kalLeftJustify
ThemeObject = 'default'
Transparent = True
TabOrder = 2
UseCheckBox = False
object Label1: TLabel
Left = 126
Top = 20
Width = 25
Height = 13
Caption = 'Char:'
Transparent = True
end
object NgRadioGroup1: TTeRadioGroup
Left = 10
Top = 42
Width = 269
Height = 61
Performance = kspNoBuffer
OnClick = NgRadioGroup1Click
CaptionMargin = 12
Caption = 'Kind'
CheckBoxAlignment = kalLeftJustify
ThemeObject = 'default'
Transparent = True
TabOrder = 0
UseCheckBox = False
Columns = 3
ItemIndex = 0
Items.Strings = (
'Char'
'Rect'
'RoundRect'
'Circle'
'Triangle')
end
object SeSkinCheckBox1: TTeCheckBox
Left = 10
Top = 18
Width = 71
Height = 20
Performance = kspDoubleBuffer
OnClick = SeSkinCheckBox1Click
Caption = 'Enabled'
AllowGrayed = False
Alignment = kalLeftJustify
Checked = False
Spacing = 5
State = kcbsUnChecked
ThemeObject = 'default'
TabOrder = 1
Transparent = True
WordWrap = False
end
object SeSkinEdit2: TTeEdit
Left = 156
Top = 16
Width = 121
Height = 21
Cursor = crIBeam
Performance = kspDoubleBuffer
AutoSize = True
BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
BevelInner = kbvLowered
BevelOuter = kbvLowered
BevelKind = kbkSingle
BevelWidth = 1
BorderWidth = 3
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
PasswordKind = pkNone
ContextMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
TabOrder = 2
Text = '#'
ThemeObject = 'default'
OnChange = SeSkinEdit2Change
end
end
object SeSkinCheckBox2: TTeCheckBox
Left = 9
Top = 187
Width = 109
Height = 20
Performance = kspDoubleBuffer
OnClick = SeSkinCheckBox2Click
Caption = 'Disable skin'
AllowGrayed = False
Alignment = kalLeftJustify
Checked = False
Spacing = 5
State = kcbsUnChecked
ThemeObject = 'default'
TabOrder = 3
Transparent = True
WordWrap = False
end
object NgForm1: TTeForm
Animation.EffectKind = '[ RANDOM ] - Random selection'
BorderIcons = [kbiClose, kbiSystemMenu, kbiMaximize, kbiRollup]
BorderStyle = kbsStandard
Caption = 'Edit Demo'
SystemMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
TrayMenuOptions.Animation.EffectKind = '[ RANDOM ] - Random selection'
Performance = ksfpNoBuffer
StayOnTop = False
StretchBackground = False
WindowState = kwsNormal
ThemeObject = 'default'
Left = 374
Top = 144
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -