📄 addtrain.dfm
字号:
00001F7C1F7C1F7C0000007C00001F7C0000FF7FFF7FFF7FFF7FFF7F00000000
1F7C1F7C1F7C1F7C1F7C00001F7C1F7C00000000000000000000000000001F7C
1F7C1F7C1F7C}
Layout = blGlyphTop
OnClick = btnRepainClick
SkinEngine = frmMain.SeSkinEngine1
SkinObject = 'SpeedButton'
end
end
object edtName: TSeSkinEdit
Left = 94
Top = 72
Width = 152
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
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
TabOrder = 0
SkinObject = 'Edit'
end
object edtSumTime: TSeSkinEdit
Left = 334
Top = 200
Width = 171
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
OnKeyPress = edtSumTimeKeyPress
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
TabOrder = 4
SkinObject = 'Edit'
end
object cbxDepID: TSeSkinComboBox
Left = 517
Top = 72
Width = 165
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
Visible = False
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
ReadOnly = True
TabOrder = 6
AutoComplete = False
ComboStyle = kcsDropDownList
DropDownCount = 8
ItemHeight = 15
Flat = True
ItemIndex = -1
ListStyle = lbStandard
ShowCheckBoxes = False
WordWrap = False
SkinEngine = frmMain.SeSkinEngine1
SkinObject = 'ComboBox'
end
object cbxStartSiteID: TSeSkinComboBox
Left = 517
Top = 111
Width = 165
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
Visible = False
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
ReadOnly = True
TabOrder = 7
AutoComplete = False
ComboStyle = kcsDropDownList
DropDownCount = 8
ItemHeight = 15
Flat = True
ItemIndex = -1
ListStyle = lbStandard
ShowCheckBoxes = False
WordWrap = False
SkinEngine = frmMain.SeSkinEngine1
SkinObject = 'ComboBox'
end
object cbxEndSiteID: TSeSkinComboBox
Left = 517
Top = 141
Width = 165
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
Visible = False
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
ReadOnly = True
TabOrder = 8
AutoComplete = False
ComboStyle = kcsDropDownList
DropDownCount = 8
ItemHeight = 15
Flat = True
ItemIndex = -1
ListStyle = lbStandard
ShowCheckBoxes = False
WordWrap = False
SkinEngine = frmMain.SeSkinEngine1
SkinObject = 'ComboBox'
end
object cbxStartSite: TComboBox
Left = 94
Top = 117
Width = 150
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 2
OnChange = cbxStartSiteChange
end
object cbxDep: TComboBox
Left = 336
Top = 72
Width = 169
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 1
OnChange = cbxDepChange
end
object cbxEndSite: TComboBox
Left = 336
Top = 120
Width = 169
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 3
OnChange = cbxEndSiteChange
end
object edtStartTime: TSeSkinMaskEdit
Left = 94
Top = 160
Width = 151
Height = 20
EditMask = '!90:00;1;_'
MaxLength = 5
TabOrder = 9
Text = ' : '
SkinObject = 'Edit'
end
object edtEndTime: TSeSkinMaskEdit
Left = 336
Top = 160
Width = 169
Height = 20
EditMask = '!90:00;1;_'
MaxLength = 5
TabOrder = 10
Text = ' : '
SkinObject = 'Edit'
end
object edtMilega: TSeSkinEdit
Left = 96
Top = 200
Width = 149
Height = 22
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
OnKeyPress = edtMilegaKeyPress
AutoSize = True
BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
BevelInner = kbvLowered
BevelOuter = kbvLowered
BevelKind = kbkSingle
BevelWidth = 1
BorderWidth = 3
PasswordKind = pkNone
TabOrder = 11
SkinObject = 'Edit'
end
object edtGeneralSeat: TSeSkinEdit
Left = 96
Top = 243
Width = 149
Height = 22
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
OnKeyPress = edtMilegaKeyPress
AutoSize = True
BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
BevelInner = kbvLowered
BevelOuter = kbvLowered
BevelKind = kbkSingle
BevelWidth = 1
BorderWidth = 3
PasswordKind = pkNone
TabOrder = 12
SkinObject = 'Edit'
end
object edtSoftSeat: TSeSkinEdit
Left = 334
Top = 243
Width = 171
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
OnKeyPress = edtSumTimeKeyPress
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
TabOrder = 13
SkinObject = 'Edit'
end
object edtGeneralBed: TSeSkinEdit
Left = 96
Top = 288
Width = 149
Height = 22
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
OnKeyPress = edtMilegaKeyPress
AutoSize = True
BevelSides = [kbsLeft, kbsTop, kbsRight, kbsBottom]
BevelInner = kbvLowered
BevelOuter = kbvLowered
BevelKind = kbkSingle
BevelWidth = 1
BorderWidth = 3
PasswordKind = pkNone
TabOrder = 14
SkinObject = 'Edit'
end
object edtSoftBed: TSeSkinEdit
Left = 334
Top = 288
Width = 171
Height = 23
Cursor = crIBeam
Performance = kspDoubleBuffer
Transparent = False
OnKeyPress = edtSumTimeKeyPress
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
TabOrder = 15
SkinObject = 'Edit'
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -