card.dfm

停车场用

        Alignment = taCenter
        Expanded = False
        Title.Alignment = taCenter
        Title.Caption = '截止日期'
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        Title.Alignment = taCenter
        Title.Caption = '卡片状态'
        Visible = True
      end>
  end
  object m_TitlePanel: TPanel
    Left = 0
    Top = 81
    Width = 622
    Height = 19
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 2
    object m_TextLabel: TLabel
      Left = 5
      Top = 5
      Width = 54
      Height = 12
      Caption = '数据表(&T)'
      FocusControl = m_TextDBGrid
      Font.Charset = GB2312_CHARSET
      Font.Color = clMaroon
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_RecNumLabel: TLabel
      Left = 320
      Top = 5
      Width = 36
      Height = 12
      Caption = '记录数'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_RecNumPanel: TPanel
      Left = 359
      Top = 0
      Width = 128
      Height = 18
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Caption = '1212121'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object m_TextDBNavigator: TDBNavigator
      Left = 502
      Top = 0
      Width = 120
      Height = 19
      DataSource = m_CardDataSource
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      Align = alRight
      ConfirmDelete = False
      TabOrder = 1
    end
  end
  object m_ButPanel: TPanel
    Left = 0
    Top = 435
    Width = 622
    Height = 53
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 3
    object m_CardFormatLabel: TLabel
      Left = 110
      Top = 13
      Width = 90
      Height = 12
      Caption = '卡片内码格式(&H)'
      FocusControl = m_CardFormatCoBox
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_CloseBut: TBitBtn
      Left = 531
      Top = 10
      Width = 85
      Height = 37
      Caption = '关闭(&C)'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = m_CloseButClick
      Kind = bkClose
    end
    object m_AddBut: TBitBtn
      Left = 229
      Top = 23
      Width = 69
      Height = 24
      Caption = '添加(&A)'
      TabOrder = 1
      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 = 392
      Top = 23
      Width = 69
      Height = 24
      Caption = '删除(&D)'
      TabOrder = 2
      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_EditBut: TBitBtn
      Left = 311
      Top = 23
      Width = 69
      Height = 24
      Caption = '修改(&E)'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = m_EditButClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF773333303300000003333337337777777333}
      NumGlyphs = 2
    end
    object m_InqBut: TBitBtn
      Left = 3
      Top = 15
      Width = 97
      Height = 26
      Caption = '查询(&I)...'
      TabOrder = 4
      OnClick = m_InqButClick
      Glyph.Data = {
        B6030000424DB603000000000000360000002800000012000000100000000100
        18000000000080030000C40E0000C40E00000000000000000000FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFCED3D6CED3D6CED3D6CED3
        D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CE
        D3D6CED3D6FFFFFF0000FFFFFFCED3D6000000000000000000000000000000CE
        D3D6CED3D6CED3D6CED3D6CED3D6000000000000000000000000000000FFFFFF
        0000FFFFFFCED3D6000000FFFFFF000000000000000000CED3D6CED3D6CED3D6
        CED3D6CED3D6000000FFFFFF000000000000000000FFFFFF0000FFFFFFCED3D6
        000000FFFFFF000000000000000000CED3D6CED3D6CED3D6CED3D6CED3D60000
        00FFFFFF000000000000000000FFFFFF0000FFFFFFCED3D60000000000000000
        00000000000000000000000000CED3D600000000000000000000000000000000
        0000000000FFFFFF0000FFFFFFCED3D6000000000000FFFFFF00000000000000
        0000000000000000000000FFFFFF000000000000000000000000000000FFFFFF
        0000FFFFFFCED3D6000000000000FFFFFF000000000000000000CED3D6000000
        000000FFFFFF000000000000000000000000000000FFFFFF0000FFFFFFCED3D6
        000000000000FFFFFF000000000000000000CED3D6000000000000FFFFFF0000
        00000000000000000000000000FFFFFF0000FFFFFFCED3D6CED3D60000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000CED3D6FFFFFF0000FFFFFFCED3D6CED3D6CED3D6000000FFFFFF00000000
        0000000000CED3D6000000FFFFFF000000000000000000CED3D6CED3D6FFFFFF
        0000FFFFFFCED3D6CED3D6CED3D6000000000000000000000000000000CED3D6
        000000000000000000000000000000CED3D6CED3D6FFFFFF0000FFFFFFCED3D6
        CED3D6CED3D6CED3D6000000000000000000CED3D6CED3D6CED3D60000000000
        00000000CED3D6CED3D6CED3D6FFFFFF0000FFFFFFCED3D6CED3D6CED3D6CED3
        D6000000FFFFFF000000CED3D6CED3D6CED3D6000000FFFFFF000000CED3D6CE
        D3D6CED3D6FFFFFF0000FFFFFFCED3D6CED3D6CED3D6CED3D600000000000000
        0000CED3D6CED3D6CED3D6000000000000000000CED3D6CED3D6CED3D6FFFFFF
        0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000}
    end
    object m_CardFormatCoBox: TComboBox
      Left = 121
      Top = 27
      Width = 79
      Height = 20
      Style = csDropDownList
      Color = clGreen
      DropDownCount = 5
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 5
      OnChange = m_CardFormatCoBoxChange
      Items.Strings = (
        '十进制'
        '十六进制')
    end
  end
  object m_CardDataSource: TDataSource
    OnDataChange = m_CardDataSourceDataChange
    Left = 152
    Top = 128
  end
end