housefrm.dfm

文件名称:一个房屋中介管理系统 这是我去年下半年闲得没事写的一个中介管理系统

      MaxLength = 10
      TabOrder = 11
      OnKeyDown = ainput24KeyDown
      OnKeyPress = ainput24KeyPress
    end
    object Edit3: TEdit
      Left = 288
      Top = 40
      Width = 80
      Height = 20
      TabStop = False
      Anchors = [akLeft, akBottom]
      TabOrder = 29
      OnKeyDown = Edit3KeyDown
    end
    object ainput9: TComboBox
      Left = 72
      Top = 72
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      ItemHeight = 12
      TabOrder = 0
      Text = #20080#21334
      OnKeyDown = ainput9KeyDown
      OnKeyPress = ainput9KeyPress
      Items.Strings = (
        #20080#21334
        #31199#36161)
    end
    object ainput10: TComboBox
      Left = 228
      Top = 68
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      ItemHeight = 12
      TabOrder = 1
      Text = #23621#20303#29992#25151
      OnKeyDown = ainput10KeyDown
      OnKeyPress = ainput9KeyPress
      Items.Strings = (
        #23621#20303#29992#25151
        #21150#20844#29992#25151
        #33829#19994#29992#25151)
    end
    object ainput11: TComboBox
      Left = 384
      Top = 68
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      ItemHeight = 12
      TabOrder = 2
      Text = #26032#25151
      OnKeyDown = ainput11KeyDown
      OnKeyPress = ainput9KeyPress
      Items.Strings = (
        #26032#25151
        #20108#25163#25151)
    end
    object ainput12: TComboBox
      Left = 540
      Top = 68
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      ItemHeight = 12
      TabOrder = 3
      Text = #21830#21697#25151
      OnKeyDown = ainput12KeyDown
      OnKeyPress = ainput9KeyPress
      Items.Strings = (
        #21830#21697#25151)
    end
    object ainput43: TComboBox
      Left = 712
      Top = 68
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      ItemHeight = 12
      TabOrder = 4
      Text = #20013#22871
      OnKeyDown = ainput43KeyDown
      OnKeyPress = ainput9KeyPress
      Items.Strings = (
        #22823#22871
        #20013#22871
        #23567#22871)
    end
    object ainput20: TEdit
      Left = 324
      Top = 108
      Width = 20
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 4
      TabOrder = 7
      OnKeyDown = ainput20KeyDown
      OnKeyPress = ainput20KeyPress
    end
    object ainput21: TEdit
      Left = 374
      Top = 108
      Width = 20
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 4
      TabOrder = 8
      OnKeyDown = ainput21KeyDown
      OnKeyPress = ainput20KeyPress
    end
    object ainput22: TEdit
      Left = 424
      Top = 108
      Width = 20
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 4
      TabOrder = 9
      OnKeyDown = ainput22KeyDown
      OnKeyPress = ainput20KeyPress
    end
    object ainput5: TEdit
      Left = 72
      Top = 145
      Width = 80
      Height = 20
      HelpContext = 6
      Anchors = [akLeft, akBottom]
      MaxLength = 10
      TabOrder = 12
      OnKeyDown = ainput5KeyDown
      OnKeyPress = ainput5KeyPress
    end
    object ainput6: TEdit
      Left = 228
      Top = 142
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 10
      TabOrder = 13
      OnKeyDown = ainput6KeyDown
      OnKeyPress = ainput6KeyPress
    end
    object ainput44: TEdit
      Left = 384
      Top = 142
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 10
      TabOrder = 14
      OnKeyDown = ainput44KeyDown
      OnKeyPress = ainput20KeyPress
    end
    object ainput14: TEdit
      Left = 712
      Top = 142
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 8
      TabOrder = 16
      OnKeyDown = ainput14KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput15: TEdit
      Left = 72
      Top = 181
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 20
      TabOrder = 17
      OnKeyDown = ainput15KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput16: TEdit
      Left = 228
      Top = 181
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 10
      TabOrder = 18
      OnKeyDown = ainput16KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput17: TEdit
      Left = 384
      Top = 181
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 20
      TabOrder = 19
      OnKeyDown = ainput17KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput18: TEdit
      Left = 712
      Top = 181
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 10
      TabOrder = 21
      OnKeyDown = ainput18KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput2: TEdit
      Left = 72
      Top = 217
      Width = 230
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 10
      TabOrder = 22
      OnKeyDown = ainput2KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput3: TEdit
      Left = 384
      Top = 215
      Width = 410
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 20
      TabOrder = 23
      OnKeyDown = ainput3KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput4: TEdit
      Left = 72
      Top = 254
      Width = 233
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 20
      TabOrder = 24
      OnKeyDown = ainput4KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput13: TEdit
      Left = 384
      Top = 252
      Width = 410
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 50
      TabOrder = 25
      OnKeyDown = ainput13KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput39: TEdit
      Left = 72
      Top = 290
      Width = 398
      Height = 20
      Anchors = [akLeft, akBottom]
      MaxLength = 50
      TabOrder = 26
      OnKeyDown = ainput39KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object Button1: TButton
      Left = 484
      Top = 290
      Width = 75
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = #28155'  '#21152
      TabOrder = 27
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 578
      Top = 290
      Width = 75
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = #20462'  '#25913
      TabOrder = 28
      OnClick = Button2Click
    end
    object DBGrid1: TDBGrid
      Left = 2
      Top = 391
      Width = 805
      Height = 116
      TabStop = False
      Align = alBottom
      Anchors = [akLeft, akTop, akRight]
      DataSource = DataModule2.inputsource
      ReadOnly = True
      TabOrder = 30
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnDblClick = DBGrid1DblClick
    end
    object ainput26: TCheckBox
      Left = 8
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #27700
      TabOrder = 31
    end
    object ainput33: TCheckBox
      Left = 8
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #28909#27700#27668
      TabOrder = 32
    end
    object ainput27: TCheckBox
      Left = 100
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #30005
      TabOrder = 33
    end
    object ainput34: TCheckBox
      Left = 100
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #31354#35843
      TabOrder = 34
    end
    object ainput28: TCheckBox
      Left = 192
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #29028#27668
      TabOrder = 35
    end
    object ainput35: TCheckBox
      Left = 192
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #24425#30005
      TabOrder = 36
    end
    object ainput29: TCheckBox
      Left = 284
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #38381#36335#30005#35270
      TabOrder = 37
    end
    object ainput36: TCheckBox
      Left = 284
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #20912#31665
      TabOrder = 38
    end
    object ainput30: TCheckBox
      Left = 376
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #23553#38451#21488
      TabOrder = 39
    end
    object ainput37: TCheckBox
      Left = 376
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #27927#34915#26426
      TabOrder = 40
    end
    object ainput38: TCheckBox
      Left = 468
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #23478#20855
      TabOrder = 41
    end
    object ainput31: TCheckBox
      Left = 468
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #36710#24211
      TabOrder = 42
    end
    object ainput32: TCheckBox
      Left = 560
      Top = 330
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #30005#35805
      TabOrder = 43
    end
    object ainput41: TCheckBox
      Left = 560
      Top = 362
      Width = 97
      Height = 17
      TabStop = False
      Anchors = [akLeft, akBottom]
      Caption = #25512#33616#20013#20171
      TabOrder = 44
    end
    object Button3: TButton
      Left = 672
      Top = 322
      Width = 75
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = #23548'  '#20837
      TabOrder = 45
      TabStop = False
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 672
      Top = 353
      Width = 75
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = #21024'  '#38500
      TabOrder = 46
      TabStop = False
      OnClick = Button4Click
    end
    object ainput40: TDateTimePicker
      Left = 540
      Top = 181
      Width = 80
      Height = 20
      Anchors = [akLeft, akBottom]
      CalAlignment = dtaLeft
      Date = 37260.702294213
      Time = 37260.702294213
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 20
      OnKeyDown = ainput40KeyDown
      OnKeyPress = ainput9KeyPress
    end
    object ainput7: TComboBox
      Left = 72
      Top = 108
      Width = 80