parkspace.dfm

停车场用

object ParkForm: TParkForm
  Left = 186
  Top = 150
  Width = 499
  Height = 357
  Caption = '停车场设置'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object m_TextLabel: TLabel
    Left = 12
    Top = 6
    Width = 60
    Height = 12
    Caption = '数据表(&T):'
    FocusControl = m_TextGrid
    Font.Charset = GB2312_CHARSET
    Font.Color = clMaroon
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object m_NoteLabel: TLabel
    Left = 11
    Top = 190
    Width = 336
    Height = 12
    Caption = '注意: 只有选定"添加"或"修改"等按钮, 才能修改"当前停车场"'
    Font.Charset = GB2312_CHARSET
    Font.Color = clMaroon
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object m_SaveBut: TBitBtn
    Left = 340
    Top = 220
    Width = 80
    Height = 27
    Caption = '保存(&S)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = m_SaveButClick
    Glyph.Data = {
      F2010000424DF201000000000000760000002800000024000000130000000100
      0400000000007C01000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333334433333
      3333333333388F3333333333000033334224333333333333338338F333333333
      0000333422224333333333333833338F33333333000033422222243333333333
      83333338F3333333000034222A22224333333338F33F33338F33333300003222
      A2A2224333333338F383F3338F33333300003A2A222A222433333338F8333F33
      38F33333000034A22222A22243333338833333F3338F333300004222A2222A22
      2433338F338F333F3338F3330000222A3A2224A22243338F3838F338F3338F33
      0000A2A333A2224A2224338F83338F338F3338F300003A33333A2224A2224338
      333338F338F3338F000033333333A2224A2243333333338F338F338F00003333
      33333A2224A2233333333338F338F83300003333333333A2224A333333333333
      8F338F33000033333333333A222433333333333338F338F30000333333333333
      A224333333333333338F38F300003333333333333A223333333333333338F8F3
      000033333333333333A3333333333333333383330000}
    NumGlyphs = 2
  end
  object m_CloseBut: TBitBtn
    Left = 172
    Top = 269
    Width = 150
    Height = 30
    Caption = '关闭(&C)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = m_CloseButClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
      F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
      000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
      338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
      45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
      3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
      F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
      000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
      338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
      4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
      8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
      333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
      0000}
    NumGlyphs = 2
  end
  object m_TextGrid: TStringGrid
    Left = 8
    Top = 21
    Width = 247
    Height = 164
    Color = clTeal
    ColCount = 3
    DefaultRowHeight = 18
    RowCount = 20
    Font.Charset = GB2312_CHARSET
    Font.Color = clWhite
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
    ParentFont = False
    TabOrder = 2
    OnDrawCell = m_TextGridDrawCell
    OnSelectCell = m_TextGridSelectCell
  end
  object m_AddBut: TBitBtn
    Left = 46
    Top = 221
    Width = 80
    Height = 27
    Caption = '添加(&A)'
    TabOrder = 3
    OnClick = m_AddButClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
      33333333333F8888883F33330000324334222222443333388F3833333388F333
      000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
      F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
      223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
      3338888300003AAAAAAA33333333333888888833333333330000333333333333
      333333333333333333FFFFFF000033333333333344444433FFFF333333888888
      00003A444333333A22222438888F333338F3333800003A2243333333A2222438
      F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
      22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
      33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object m_DelBut: TBitBtn
    Left = 239
    Top = 221
    Width = 80
    Height = 27
    Caption = '删除(&D)'
    TabOrder = 4
    OnClick = m_DelButClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333000033338833333333333333333F333333333333
      0000333911833333983333333388F333333F3333000033391118333911833333
      38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
      911118111118333338F3338F833338F3000033333911111111833333338F3338
      3333F8330000333333911111183333333338F333333F83330000333333311111
      8333333333338F3333383333000033333339111183333333333338F333833333
      00003333339111118333333333333833338F3333000033333911181118333333
      33338333338F333300003333911183911183333333383338F338F33300003333
      9118333911183333338F33838F338F33000033333913333391113333338FF833
      38F338F300003333333333333919333333388333338FFF830000333333333333
      3333333333333333333888330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object m_CurGBox: TGroupBox
    Left = 262
    Top = 13
    Width = 215
    Height = 172
    Caption = '当前停车场'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    TabStop = True
    OnExit = m_CurGBoxExit
    object m_NameLabel: TLabel
      Left = 12
      Top = 54
      Width = 78
      Height = 12
      Caption = '停车场名称(&N)'
      FocusControl = m_NameEdit
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_ChargeLabel: TLabel
      Left = 13
      Top = 98
      Width = 78
      Height = 12
      Caption = '停车车位数(&M)'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_NameEdit: TEdit
      Left = 91
      Top = 45
      Width = 108
      Height = 20
      Color = clTeal
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Text = 'm_NameEdit'
      OnChange = EditTextChange
    end
    object m_SpaceEdit: TEdit
      Left = 91
      Top = 89
      Width = 88
      Height = 20
      Color = clTeal
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      Text = '0'
      OnChange = EditTextChange
    end
    object m_SpaceUpDown: TUpDown
      Left = 179
      Top = 89
      Width = 17
      Height = 20
      Associate = m_SpaceEdit
      Min = 0
      Max = 30000
      Position = 0
      TabOrder = 2
      Wrap = False
    end
  end
  object m_EditBut: TBitBtn
    Left = 143
    Top = 221
    Width = 80
    Height = 27
    Caption = '修改(&E)'
    TabOrder = 6
    OnClick = m_EditButClick
    Glyph.Data = {
      36010000424D3601000000000000760000002800000011000000100000000100
      040000000000C0000000CE0E0000C40E00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888800000008FFFFFFFFF088888800000008FEEEEEE00000800800000008FFF
      FFF0BFBFB00E800000008F0EEEE000FBFB0E800000008FF00F0FBFBFBF0E8000
      00008FE0B00000FBFB0E800000008FFF0FBFBFBFBF0E800000008FEEE0000000
      FB0E800000008FFFFF0B00BFB000800000008FEEEEE0B0000888800000008FFF
      FFFF0B0888888000000088F0F0F0F0B088888000000088707070700B08888000
      0000887070707080908880000000080808080888088880000000}
  end
  object m_StatusBar: TStatusBar
    Left = 0
    Top = 311
    Width = 491
    Height = 19
    Panels = <
      item
        Text = '设置状态'
        Width = 55
      end
      item
        Style = psOwnerDraw
        Width = 150
      end>
    SimplePanel = False
    OnDrawPanel = m_StatusBarDrawPanel
  end
end