trainprice.dfm

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

object frmTrainPrice: TfrmTrainPrice
  Left = 201
  Top = 133
  Width = 696
  Height = 480
  Caption = '价格调整'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SeSkinToolBar1: TSeSkinToolBar
    Left = 0
    Top = 0
    Width = 688
    Height = 42
    Performance = kspNoBuffer
    Transparent = False
    Align = alTop
    BorderWidth = 2
    ButtonWidth = 38
    ButtonAutoSize = True
    DividerWidth = 8
    SkinEngine = frmMain.SeSkinEngine1
    SkinObject = 'ToolBar'
    object btnAdd: TSeSkinSpeedButton
      Left = 2
      Top = 2
      Width = 38
      Height = 38
      Performance = kspNoBuffer
      Transparent = True
      Visible = False
      BlackAndWhiteGlyph = False
      Caption = '新增'
      Glyph.Data = {
        36040000424D3604000000000000360000002800000010000000100000000100
        2000000000000004000000000000000000000000000000000000FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF0000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF0000000000FFFFFF0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF000000000000000000000000000000000000000000000000000000
        000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
      Layout = blGlyphTop
      OnClick = btnAddClick
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'SpeedButton'
    end
    object btnMode: TSeSkinSpeedButton
      Left = 2
      Top = 2
      Width = 38
      Height = 38
      Performance = kspNoBuffer
      Transparent = True
      Visible = False
      BlackAndWhiteGlyph = False
      Caption = '修改'
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7C1F7C1F7C00000000000000000000000000000000
        000000001F7C1F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7F00001F7C00001F7C00000000000000000000FF7FFF7F0000FF7F00000000
        FF7F00001F7C00000000E07FFF7FE07FFF7FE07F0000FF7FFF7FFF7FFF7FFF7F
        FF7F00001F7C0000E07FFF7FE07FFF7F000000000000FF7FFF7FFF7FFF7F0000
        FF7F00001F7C0000FF7FE07FFF7FE07FFF7FE07FFF7F0000FF7F00000000FF7F
        FF7F00001F7C0000E07FFF7FE07FFF7F00000000000000000000E07F0000FF7F
        FF7F00001F7C0000FF7FE07FFF7FE07FFF7FE07FFF7FE07FFF7F0000FF7FFF7F
        FF7F00001F7C0000E07FFF7F0000000000000000000000000000FF7FFF7FFF7F
        FF7F00001F7C00000000E07FFF7FE07F00000000E07F0000FF7FFF7F00000000
        FF7F00001F7C1F7C1F7C0000000000000000E07F0000FF7FFF7FFF7FFF7FFF7F
        FF7F00001F7C1F7C1F7C1F7C1F7C0000E07F0000FF7FFF7FFF7FFF7F00000000
        000000001F7C1F7C1F7C1F7C0000E07F0000FF7FFF7F00000000FF7F0000FF7F
        FF7F00001F7C1F7C1F7C0000E07F00000000FF7FFF7FFF7FFF7FFF7F0000FF7F
        00001F7C1F7C1F7C0000007C00001F7C0000FF7FFF7FFF7FFF7FFF7F00000000
        1F7C1F7C1F7C1F7C1F7C00001F7C1F7C00000000000000000000000000001F7C
        1F7C1F7C1F7C}
      Layout = blGlyphTop
      OnClick = btnModeClick
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'SpeedButton'
    end
    object btnSave: TSeSkinSpeedButton
      Left = 2
      Top = 2
      Width = 38
      Height = 38
      Performance = kspNoBuffer
      Transparent = True
      Visible = False
      BlackAndWhiteGlyph = False
      Caption = '保存'
      Enabled = False
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000CE0E0000D80E00001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777700000000000777770FFFFFFFFF0777770F8888888F0777770FFFFFFFFF0
        777770F888888FF0777770FFFFFFFFF0777770F8888888F0777770FFFFFFFFF0
        7777744444444444777774444444444477177777777777777717777777777771
        7177777777777771177777777777777111777777777777777777}
      Layout = blGlyphTop
      OnClick = btnSaveClick
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'SpeedButton'
    end
    object SeSkinSpeedButton4: TSeSkinSpeedButton
      Left = 2
      Top = 2
      Width = 38
      Height = 38
      Performance = kspNoBuffer
      Transparent = True
      BlackAndWhiteGlyph = False
      Caption = '退出'
      Glyph.Data = {
        36040000424D3604000000000000360000002800000010000000100000000100
        2000000000000004000000000000000000000000000000000000FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF000000000000000000FF00FF000000000000000000FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF0000000000FFFF000000000000FF00FF00FF00FF00FF00FF000000
        0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
        00000000000000000000FFFF0000000000000000000000000000000000000000
        0000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF00FF00FF000000000000000000FF00FF00FF00FF00FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF000000000000000000000000000000000000000000FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF00FF00FF000000000000000000FF00FF00FF00FF00FF00FF00FF00
        FF0000000000FFFF0000FFFF0000000000008080800080808000808080000000
        0000FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
        FF00000000000000000000000000808080008080800080808000808080000000
        0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00000000000000000080808000808080008080800080808000808080000000
        0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00000000000000000000000000000000000000000000000000000000000000
        0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
        FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
      Layout = blGlyphTop
      OnClick = SeSkinSpeedButton4Click
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'SpeedButton'
    end
    object btnDelete: TSeSkinSpeedButton
      Left = 2
      Top = 2
      Width = 38
      Height = 38
      Performance = kspNoBuffer
      Transparent = True
      Visible = False
      BlackAndWhiteGlyph = False
      Caption = '删除'
      Glyph.Data = {
        42020000424D4202000000000000420000002800000010000000100000000100
        1000030000000002000000000000000000000000000000000000007C0000E003
        00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C0000000000000000000000000000000000000000
        00001F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        00001F7C1F7C1F7C1F7C1F7C0000FF7FEF3DEF3DEF3DEF3DEF3DEF3DEF3DFF7F
        00001F7C1F7C1F7C1F7C1F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        00001F7C1F7C1F7C1F7C1F7C0000FF7FEF3DEF3DEF3DEF3DEF3DEF3DFF7FFF7F
        00001F7C1F7C000000001F7C0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        00001F7C1F7CEF3D0000EF3D0000FF7FFF7F0000EF3DEF3DEF3DEF3DEF3DFF7F
        00001F7C1F7C1F7C00000000EF3D1F7C00000000FF7FFF7FFF7FFF7FFF7FFF7F
        00001F7C1F7C1F7CEF3D000000000000000000000F000F000F000F000F000F00
        00001F7C1F7C1F7CEF3D0000000000001F7C0000000000000000000000000000
        00001F7C1F7CEF3D0000000000000000EF3D1F7C1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C00000000EF3D1F7C00000000EF3D1F7C1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C00000000EF3D1F7C1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C00000000EF3D1F7C1F7C1F7C1F7C
        1F7C1F7C1F7C}
      Layout = blGlyphTop
      OnClick = btnDeleteClick
      SkinEngine = frmMain.SeSkinEngine1
      SkinObject = 'SpeedButton'
    end
  end
  object DBGrid: TStringGrid
    Left = 0
    Top = 42
    Width = 688
    Height = 411
    Align = alClient
    DefaultRowHeight = 18
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goRowSelect]
    TabOrder = 1
    OnMouseUp = DBGridMouseUp
  end
end