printcontractfm.dfm.~6~

一款房产中介软件

    object ComboBox1: TComboBox
      Left = 44
      Top = 8
      Width = 135
      Height = 21
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = #39044#38144#21806
      OnChange = ComboBox1Change
      Items.Strings = (
        #39044#38144#21806
        #25286#36801#36824#24314)
    end
    object CheckBox1: TCheckBox
      Left = 367
      Top = -3
      Width = 57
      Height = 44
      Caption = #31354#34920
      TabOrder = 1
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 65
    Width = 1024
    Height = 631
    Align = alClient
    TabOrder = 1
    object Splitter3: TSplitter
      Left = 1
      Top = 186
      Width = 1022
      Height = 4
      Cursor = crVSplit
      Align = alTop
      Color = clSkyBlue
      ParentColor = False
    end
    object Panel4: TPanel
      Left = 1
      Top = 190
      Width = 1022
      Height = 440
      Align = alClient
      TabOrder = 0
      object AALabel2: TLabel
        Left = 1
        Top = 1
        Width = 1020
        Height = 13
        Align = alTop
        Caption = #21333#20803#39044#21806'/'#25286#36801#36824#24314#20449#24687#21015#34920
        ExplicitWidth = 163
      end
      object AALabel3: TLabel
        Left = 1
        Top = 201
        Width = 1020
        Height = 13
        Align = alTop
        Caption = #25152#21806#21333#20803#25151#23627#22522#26412#20449#24687#34920
        ExplicitWidth = 143
      end
      object DBGridEh4: TDBGridEh
        Left = 1
        Top = 14
        Width = 1020
        Height = 187
        Align = alTop
        AutoFitColWidths = True
        DataSource = DataSource4
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = ANSI_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -13
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        OnCellClick = DBGridEh4CellClick
        Columns = <
          item
            EditButtons = <>
            FieldName = #21512#21516#21495
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #24162#21495
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25151#21495
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21407#23450#25151#20135#21333#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21407#23450#25151#20135#24635#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#21333#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#24635#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25104#20132#21333#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25104#20132#24635#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#30331#35760#22791#26696#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21333#20301#31614#23383#26085#26399
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #20080#26041#31614#23383#26085#26399
            Footers = <>
          end>
      end
      object DBGridEh5: TDBGridEh
        Left = 1
        Top = 214
        Width = 1020
        Height = 225
        Align = alClient
        DataSource = DataSource5
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = ANSI_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -13
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        Columns = <
          item
            EditButtons = <>
            FieldName = #26242#23450#24231#33853#21517
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #29616#24231#33853#21517
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #24162#21495
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #20135#26435#33539#22260
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25143#22411
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #24635#23618#25968
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #25152#22312#27004#23618
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#32422#23450#24314#31569#38754#31215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#32422#23450#22871#20869#38754#31215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#32422#23450#20998#25674#38754#31215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#21333#20215
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #21512#21516#24635#20215
            Footers = <>
          end>
      end
    end
    object Panel2: TPanel
      Left = 1
      Top = 1
      Width = 1022
      Height = 185
      Align = alTop
      Caption = 'Panel2'
      TabOrder = 1
      object Splitter1: TSplitter
        Left = 161
        Top = 1
        Width = 5
        Height = 183
        Color = clSkyBlue
        ParentColor = False
      end
      object DBGridEh1: TDBGridEh
        Left = 1
        Top = 1
        Width = 160
        Height = 183
        Align = alLeft
        AutoFitColWidths = True
        DataSource = DataSource1
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = ANSI_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -13
        FooterFont.Name = #23435#20307
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
        OnCellClick = DBGridEh1CellClick
        Columns = <
          item
            EditButtons = <>
            FieldName = #20844#21496#21517#31216
            Footers = <>
          end>
      end
      object Panel5: TPanel
        Left = 166
        Top = 1
        Width = 855
        Height = 183
        Align = alClient
        Caption = 'Panel5'
        TabOrder = 1
        object AALabel1: TLabel
          Left = 1
          Top = 1
          Width = 853
          Height = 13
          Align = alTop
          Caption = #23458#25143#20449#24687#21015#34920
          ExplicitWidth = 78
        end
        object DBGridEh2: TDBGridEh
          Left = 1
          Top = 14
          Width = 853
          Height = 168
          Align = alClient
          AutoFitColWidths = True
          DataSource = DataSource2
          Flat = True
          FooterColor = clWindow
          FooterFont.Charset = ANSI_CHARSET
          FooterFont.Color = clWindowText
          FooterFont.Height = -13
          FooterFont.Name = #23435#20307
          FooterFont.Style = []
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          TabOrder = 0
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnCellClick = DBGridEh2CellClick
          Columns = <
            item
              EditButtons = <>
              FieldName = #23458#25143#32534#21495
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #23458#25143#31867#22411
              Footers = <>
            end