userdata.dfm

停车场用

object UserForm: TUserForm
  Left = 88
  Top = 51
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = '车主用户帐号管理'
  ClientHeight = 471
  ClientWidth = 665
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PrintScale = poNone
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 12
  object m_CloseBut: TBitBtn
    Left = 441
    Top = 425
    Width = 143
    Height = 36
    Caption = '关闭(&C)'
    TabOrder = 1
    OnClick = m_CloseButClick
    Kind = bkClose
  end
  object m_TextGBox: TGroupBox
    Left = 5
    Top = 50
    Width = 317
    Height = 385
    Caption = '车主用户表(&T)'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object m_RecNumLabel: TLabel
      Left = 65
      Top = 18
      Width = 36
      Height = 12
      Caption = '记录数'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_TextDBGrid: TDBGrid
      Left = 2
      Top = 32
      Width = 313
      Height = 351
      Align = alBottom
      Color = clGreen
      DataSource = m_TextDataSource
      Font.Charset = GB2312_CHARSET
      Font.Color = clWhite
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clRed
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      OnDrawColumnCell = m_TextDBGridDrawColumnCell
      OnTitleClick = m_TextDBGridTitleClick
      Columns = <
        item
          Expanded = False
          FieldName = 'CarTag'
          Title.Alignment = taCenter
          Title.Caption = '车牌号码'
          Width = 75
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clYellow
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          Title.Alignment = taCenter
          Title.Caption = '用户类型'
          Width = 89
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          Title.Alignment = taCenter
          Title.Caption = '卡片号码'
          Width = 76
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          Title.Alignment = taCenter
          Title.Caption = '用户状态'
          Width = 49
          Visible = True
        end>
    end
    object m_TextDBNavigator: TDBNavigator
      Left = 195
      Top = 14
      Width = 120
      Height = 18
      DataSource = m_TextDataSource
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
      Align = alRight
      ConfirmDelete = False
      TabOrder = 1
    end
    object m_RecNumPanel: TPanel
      Left = 103
      Top = 14
      Width = 92
      Height = 18
      Align = alRight
      BevelInner = bvLowered
      BevelOuter = bvNone
      Caption = '1212121'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
  end
  object m_CurGBox: TGroupBox
    Left = 332
    Top = 51
    Width = 328
    Height = 363
    Caption = '当前车主用户资料'
    Font.Charset = GB2312_CHARSET
    Font.Color = clMaroon
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    object m_UserTypeLabel: TLabel
      Left = 11
      Top = 151
      Width = 48
      Height = 12
      Caption = '用户类别'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_EndDateLabel: TLabel
      Left = 171
      Top = 126
      Width = 48
      Height = 12
      Caption = '截止日期'
      Font.Charset = GB2312_CHARSET
      Font.Color = clTeal
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_PriceLabel: TLabel
      Left = 171
      Top = 151
      Width = 48
      Height = 12
      Caption = '帐上余额'
      Font.Charset = GB2312_CHARSET
      Font.Color = clTeal
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_CarTagLabel: TLabel
      Left = 11
      Top = 77
      Width = 48
      Height = 12
      Caption = '车牌号码'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_CarColorLabel: TLabel
      Left = 171
      Top = 102
      Width = 48
      Height = 12
      Caption = '车身颜色'
      Font.Charset = GB2312_CHARSET
      Font.Color = clTeal
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_BeginDateLabel: TLabel
      Left = 11
      Top = 126
      Width = 48
      Height = 12
      Caption = '生效日期'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_UserNameLabel: TLabel
      Left = 11
      Top = 28
      Width = 48
      Height = 12
      Caption = '车主名称'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_AddressLabel: TLabel
      Left = 11
      Top = 53
      Width = 48
      Height = 12
      Caption = '联系地址'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_PhoneLabel: TLabel
      Left = 171
      Top = 77
      Width = 48
      Height = 12
      Caption = '联系电话'
      Font.Charset = GB2312_CHARSET
      Font.Color = clTeal
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object m_CardStateLabel: TLabel
      Left = 171
      Top = 175
      Width = 48
      Height = 12
      Caption = '用户状态'