editlesseeunit.dfm

一个售楼系统

    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    ItemHeight = 13
    Items.Strings = (
      #26412#22320#20010#20154
      #22806#22320#20010#20154
      #26412#22320#21333#20301
      #22806#22320#21333#20301
      #22269#22806#20010#20154
      #22269#22806#21333#20301)
    TabOrder = 4
  end
  object DBComboBox2: TDBComboBox
    Left = 107
    Top = 151
    Width = 169
    Height = 21
    DataField = #24615#21035
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    ItemHeight = 13
    Items.Strings = (
      #30007
      #22899)
    TabOrder = 5
  end
  object DBDateTimeEditEh1: TDBDateTimeEditEh
    Left = 107
    Top = 183
    Width = 169
    Height = 21
    DataField = #20986#29983#26085#26399
    DataSource = ViewLesseeForm.DataSource2
    EditButtons = <>
    ImeMode = imClose
    Kind = dtkDateEh
    TabOrder = 6
    Visible = True
    OnExit = DBDateTimeEditEh1Exit
  end
  object DBEdit3: TDBEdit
    Left = 107
    Top = 215
    Width = 169
    Height = 21
    DataField = #22269#31821
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    TabOrder = 7
  end
  object DBEdit4: TDBEdit
    Left = 107
    Top = 247
    Width = 169
    Height = 21
    DataField = #36523#20221#35777#21495
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    TabOrder = 8
  end
  object DBEdit5: TDBEdit
    Left = 564
    Top = 56
    Width = 169
    Height = 21
    DataField = #32852#31995#30005#35805
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    TabOrder = 9
  end
  object DBEdit6: TDBEdit
    Left = 564
    Top = 87
    Width = 169
    Height = 21
    DataField = #30005#23376#37038#31665
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    TabOrder = 10
  end
  object DBEdit7: TDBEdit
    Left = 564
    Top = 119
    Width = 169
    Height = 21
    DataField = #32852#31995#22320#22336
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    TabOrder = 11
  end
  object DBEdit8: TDBEdit
    Left = 564
    Top = 151
    Width = 169
    Height = 21
    DataField = #37038#25919#32534#30721
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    TabOrder = 12
  end
  object DBNumberEditEh1: TDBNumberEditEh
    Left = 564
    Top = 183
    Width = 169
    Height = 21
    DataField = #26376#25910#20837
    DataSource = ViewLesseeForm.DataSource2
    EditButtons = <>
    ImeMode = imClose
    TabOrder = 13
    Visible = True
  end
  object DBDateTimeEditEh2: TDBDateTimeEditEh
    Left = 564
    Top = 247
    Width = 169
    Height = 21
    DataField = #30331#35760#26085#26399
    DataSource = ViewLesseeForm.DataSource2
    EditButtons = <>
    ImeMode = imClose
    Kind = dtkDateEh
    TabOrder = 14
    Visible = True
    OnExit = DBDateTimeEditEh2Exit
  end
  object DBComboBox4: TDBComboBox
    Left = 107
    Top = 295
    Width = 169
    Height = 21
    DataField = #19994#21153#21592#32534#21495
    DataSource = ViewLesseeForm.DataSource2
    ImeMode = imClose
    ItemHeight = 13
    Items.Strings = (
      #26412#22320#20010#20154
      #22806#22320#20010#20154
      #26412#22320#21333#20301
      #22806#22320#21333#20301
      #22269#22806#20010#20154
      #22269#22806#21333#20301)
    TabOrder = 15
    OnChange = DBComboBox4Change
  end
  object DBGrid1: TDBGrid
    Left = 107
    Top = 324
    Width = 790
    Height = 69
    DataSource = DataSource1
    ImeMode = imClose
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 16
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #19994#21153#21592#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #22995#21517
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24615#21035
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20986#29983#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36523#20221#35777#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32852#31995#30005#35805
        Visible = True
      end
      item
        Expanded = False
        FieldName = #32852#31995#22320#22336
        Visible = True
      end>
  end
  object DBGrid2: TDBGrid
    Left = 108
    Top = 400
    Width = 789
    Height = 129
    DataSource = DataSource2
    ImeMode = imClose
    ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 17
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #39033#30446#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24162#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25151#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = #38144#21806#31867#22411
        Visible = True
      end
      item
        Expanded = False
        FieldName = #26799#20301
        Visible = True
      end
      item
        Expanded = False
        FieldName = #24635#23618#25968
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25152#22312#27004#23618
        Visible = True
      end
      item
        Expanded = False
        FieldName = #29992#36884
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25143#22411
        Visible = True
      end
      item
        Expanded = False
        FieldName = #38451#21488#31867#22411
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36291#38169#23618
        Visible = True
      end
      item
        Expanded = False
        FieldName = #38468#23646#25151#20135
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20135#26435#33539#22260
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21512#21516#32422#23450#24314#31569#38754#31215
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21512#21516#32422#23450#22871#20869#38754#31215
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21512#21516#32422#23450#20998#25674#38754#31215
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20135#26435#30331#35760#24314#31569#38754#31215
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20135#26435#30331#35760#22871#20869#38754#31215
        Visible = True
      end
      item
        Expanded = False
        FieldName = #20135#26435#30331#35760#20998#25674#38754#31215
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25151#23627#26159#21542#25269#25276
        Visible = True
      end>
  end
  object ADOQuery1: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#19994#21153#21592#20449#24687#34920)
    Left = 544
    Top = 288
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 504
    Top = 288
  end
  object ADOQuery2: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#21333#20803#20449#24687#34920)
    Left = 336
    Top = 414
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 304
    Top = 414
  end
end