unit21.dfm

停车厂管理系统 麻雀虽小 但是五脏齐全

object tckbl: Ttckbl
  Left = 150
  Top = 100
  Width = 621
  Height = 470
  Caption = #20572#36710#21345#21150#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label14: TLabel
    Left = 224
    Top = 24
    Width = 49
    Height = 13
    Caption = #21345#21495#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label15: TLabel
    Left = 392
    Top = 24
    Width = 60
    Height = 13
    Caption = #39044#23384#37329#39069#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label16: TLabel
    Left = 40
    Top = 24
    Width = 60
    Height = 13
    Caption = #29992#25143#31867#22411#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label18: TLabel
    Left = 40
    Top = 56
    Width = 62
    Height = 13
    Caption = #29992#25143'     ID'#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label17: TLabel
    Left = 224
    Top = 56
    Width = 49
    Height = 13
    Caption = #22995#21517#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label19: TLabel
    Left = 40
    Top = 88
    Width = 60
    Height = 13
    Caption = #24615'        '#21035#65306
  end
  object Label20: TLabel
    Left = 224
    Top = 88
    Width = 41
    Height = 13
    Caption = #24180#40836#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label21: TLabel
    Left = 392
    Top = 56
    Width = 60
    Height = 13
    Caption = #32852#31995#30005#35805#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label22: TLabel
    Left = 36
    Top = 120
    Width = 60
    Height = 13
    Caption = #32852#31995#22320#22336#65306
  end
  object Label23: TLabel
    Left = 32
    Top = 152
    Width = 97
    Height = 13
    Caption = #20572#36710#21345#20449#24687#65306
  end
  object Label24: TLabel
    Left = 32
    Top = 272
    Width = 60
    Height = 13
    Caption = #23458#25143#20449#24687#65306
  end
  object Label8: TLabel
    Left = 392
    Top = 88
    Width = 60
    Height = 13
    Caption = #36523#20221#35777#21495#65306
  end
  object edcardid: TEdit
    Left = 280
    Top = 16
    Width = 81
    Height = 21
    MaxLength = 10
    TabOrder = 0
    OnExit = edcardidExit
    OnKeyPress = edcardidKeyPress
  end
  object edmoney: TEdit
    Left = 456
    Top = 16
    Width = 113
    Height = 21
    MaxLength = 5
    TabOrder = 1
    OnKeyPress = edmoneyKeyPress
  end
  object userclass: TComboBox
    Left = 112
    Top = 16
    Width = 81
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    TabOrder = 2
    OnChange = userclassChange
  end
  object bsstopcard: TBitBtn
    Left = 496
    Top = 136
    Width = 73
    Height = 26
    Caption = #21150#29702
    TabOrder = 3
    OnClick = bsstopcardClick
    Kind = bkOK
  end
  object dbedit1: TEdit
    Left = 112
    Top = 48
    Width = 81
    Height = 21
    MaxLength = 8
    TabOrder = 4
    OnExit = dbedit1Exit
    OnKeyPress = edcardidKeyPress
  end
  object dbedit2: TEdit
    Left = 280
    Top = 48
    Width = 81
    Height = 21
    MaxLength = 8
    TabOrder = 5
  end
  object dbcombobox1: TComboBox
    Left = 112
    Top = 80
    Width = 81
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 6
    Text = #30007
    Items.Strings = (
      #30007
      #22899)
  end
  object dbedit3: TEdit
    Left = 279
    Top = 80
    Width = 82
    Height = 21
    MaxLength = 2
    TabOrder = 7
    OnKeyPress = dbedit3KeyPress
  end
  object dbedit4: TEdit
    Left = 456
    Top = 48
    Width = 113
    Height = 21
    MaxLength = 12
    TabOrder = 8
    OnKeyPress = dbedit4KeyPress
  end
  object dbedit5: TEdit
    Left = 112
    Top = 112
    Width = 457
    Height = 21
    MaxLength = 50
    TabOrder = 9
  end
  object DBGrid5: TDBGrid
    Left = 32
    Top = 168
    Width = 553
    Height = 97
    DataSource = ds_card
    ReadOnly = True
    TabOrder = 10
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'cardid'
        Title.Caption = #21345#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'storemoney'
        Title.Caption = #20313#39069
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'customerclass'
        Title.Caption = #23458#25143#31867#22411
        Visible = True
      end>
  end
  object DBGrid4: TDBGrid
    Left = 32
    Top = 292
    Width = 553
    Height = 125
    DataSource = ds_customers
    ReadOnly = True
    TabOrder = 11
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'useid'
        Title.Caption = #29992#25143'ID'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'cardid'
        Title.Caption = #21345#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'usename'
        Title.Caption = #22995#21517
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'sex'
        Title.Caption = #24615#21035
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'age'
        Title.Caption = #24180#40836
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'tele'
        Title.Caption = #32852#31995#30005#35805
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shfenid'
        Title.Caption = #36523#20221#35777#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'address'
        Title.Caption = #32852#31995#22320#22336
        Visible = True
      end>
  end
  object ShFenId: TEdit
    Left = 456
    Top = 80
    Width = 113
    Height = 21
    MaxLength = 18
    TabOrder = 12
    OnKeyPress = dbedit4KeyPress
  end
  object BitBtn1: TBitBtn
    Left = 408
    Top = 136
    Width = 75
    Height = 25
    Caption = #26597#35810#20313#39069
    TabOrder = 13
    OnClick = BitBtn1Click
  end
  object adot_card: TADOTable
    Connection = DataModule11.ccsj
    CursorType = ctStatic
    TableName = 'stopcard'
    Left = 236
    Top = 179
  end
  object adoq_car: TADOQuery
    Connection = DataModule11.ccsj
    Parameters = <>
    Left = 292
    Top = 187
  end
  object adot_customers: TADOTable
    Connection = DataModule11.ccsj
    CursorType = ctStatic
    TableName = 'customers'
    Left = 308
    Top = 291
  end
  object ds_customers: TDataSource
    DataSet = adot_customers
    Left = 260
    Top = 291
  end
  object ds_card: TDataSource
    DataSet = adot_card
    Left = 180
    Top = 203
  end
  object adoq_recharge: TADOQuery
    Connection = DataModule11.ccsj
    Parameters = <>
    Left = 340
    Top = 209
  end
end