editcard.dfm

停车场用

object EditCardForm: TEditCardForm
  Left = 222
  Top = 100
  Width = 360
  Height = 303
  BorderIcons = [biSystemMenu]
  Caption = '添加/修改感应卡片'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  PixelsPerInch = 96
  TextHeight = 12
  object m_L3: TLabel
    Left = 44
    Top = 153
    Width = 66
    Height = 12
    Caption = '卡片类型(&T)'
    FocusControl = m_TypeCoBox
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object m_L1: TLabel
    Left = 42
    Top = 38
    Width = 66
    Height = 12
    Caption = '卡片号码(&N)'
    FocusControl = m_CardNoEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object m_L2: TLabel
    Left = 23
    Top = 67
    Width = 48
    Height = 12
    Caption = '卡片内码'
    FocusControl = m_DecEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clFuchsia
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object m_DecLabel: TLabel
    Left = 55
    Top = 84
    Width = 54
    Height = 12
    Caption = '十进制(&D)'
    FocusControl = m_DecEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object m_HexLabel: TLabel
    Left = 43
    Top = 108
    Width = 66
    Height = 12
    Caption = '十六进制(&H)'
    FocusControl = m_HexEdit
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 14
    Top = 190
    Width = 321
    Height = 2
  end
  object m_CancelBitBtn: TBitBtn
    Left = 257
    Top = 222
    Width = 80
    Height = 35
    Caption = '取消(&C)'
    TabOrder = 5
    Kind = bkCancel
  end
  object m_CardNoEdit: TEdit
    Left = 111
    Top = 30
    Width = 94
    Height = 20
    Color = clGreen
    Font.Charset = GB2312_CHARSET
    Font.Color = clYellow
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    Text = '1'
  end
  object m_DecEdit: TEdit
    Left = 111
    Top = 76
    Width = 116
    Height = 20
    Color = clGreen
    Font.Charset = GB2312_CHARSET
    Font.Color = clYellow
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    Text = '00000000000m_E2'
    OnChange = m_DecEditChange
  end
  object m_TypeCoBox: TComboBox
    Left = 111
    Top = 145
    Width = 195
    Height = 20
    Style = csDropDownList
    Color = clTeal
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clYellow
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ItemHeight = 12
    ParentFont = False
    TabOrder = 2
  end
  object m_AddBut: TBitBtn
    Left = 34
    Top = 222
    Width = 88
    Height = 35
    Caption = '添加(&A)'
    Default = True
    TabOrder = 3
    OnClick = OkButClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
      33333333333F8888883F33330000324334222222443333388F3833333388F333
      000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
      F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
      223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
      3338888300003AAAAAAA33333333333888888833333333330000333333333333
      333333333333333333FFFFFF000033333333333344444433FFFF333333888888
      00003A444333333A22222438888F333338F3333800003A2243333333A2222438
      F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
      22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
      33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
      3333333333338888883333330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object m_EditBut: TBitBtn
    Left = 146
    Top = 222
    Width = 88
    Height = 35
    Caption = '修改(&E)'
    TabOrder = 4
    OnClick = OkButClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
      000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
      00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
      F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
      0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
      FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
      FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
      0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
      00333377737FFFFF773333303300000003333337337777777333}
    NumGlyphs = 2
  end
  object m_HexEdit: TEdit
    Left = 111
    Top = 100
    Width = 116
    Height = 20
    Color = clGreen
    Font.Charset = GB2312_CHARSET
    Font.Color = clYellow
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    Text = '00000000000m_E2'
    OnChange = m_HexEditChange
  end
  object m_CardNoUpDown: TUpDown
    Left = 205
    Top = 30
    Width = 17
    Height = 20
    Associate = m_CardNoEdit
    Min = 1
    Max = 30000
    Position = 1
    TabOrder = 7
    Thousands = False
    Wrap = False
  end
end