modelstudent.dfm

基于DELPHI的列车时刻查询系统设计与实现

    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 = 2
    SkinObject = 'Edit'
  end
  object cbxDepID: TSeSkinComboBox
    Left = 471
    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 = 3
    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 = 471
    Top = 135
    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 = 4
    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 = 471
    Top = 101
    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 = 5
    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 = 123
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 6
    OnChange = cbxStartSiteChange
  end
  object cbxDep: TComboBox
    Left = 310
    Top = 74
    Width = 130
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 7
    OnChange = cbxDepChange
  end
  object cbxEndSite: TComboBox
    Left = 310
    Top = 117
    Width = 130
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 8
    OnChange = cbxEndSiteChange
  end
  object edtStartTime: TSeSkinMaskEdit
    Left = 94
    Top = 160
    Width = 124
    Height = 20
    EditMask = '!90:00;1;_'
    MaxLength = 5
    TabOrder = 9
    Text = '  :  '
    SkinObject = 'Edit'
  end
  object edtEndTime: TSeSkinMaskEdit
    Left = 310
    Top = 160
    Width = 130
    Height = 20
    EditMask = '!90:00;1;_'
    MaxLength = 5
    TabOrder = 10
    Text = '  :  '
    SkinObject = 'Edit'
  end
  object edtMilega: TSeSkinEdit
    Left = 96
    Top = 200
    Width = 122
    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 = 122
    Height = 22
    Cursor = crIBeam
    Performance = kspDoubleBuffer
    Transparent = False
    OnKeyPress = edtGeneralSeatKeyPress
    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 = 308
    Top = 243
    Width = 132
    Height = 23
    Cursor = crIBeam
    Performance = kspDoubleBuffer
    Transparent = False
    OnKeyPress = edtSoftSeatKeyPress
    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 = 282
    Width = 122
    Height = 22
    Cursor = crIBeam
    Performance = kspDoubleBuffer
    Transparent = False
    OnKeyPress = edtGeneralBedKeyPress
    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 = 308
    Top = 281
    Width = 132
    Height = 23
    Cursor = crIBeam
    Performance = kspDoubleBuffer
    Transparent = False
    OnKeyPress = edtSoftBedKeyPress
    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