printcontractfm.dfm.~4~

一款房产中介软件

          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
            item
              EditButtons = <>
              FieldName = #22995#21517
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #24615#21035
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #22269#31821
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #32852#31995#30005#35805
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #32852#31995#22320#22336
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #37038#25919#32534#30721
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #36523#20221#35777#21495
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #30331#35760#26085#26399
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #20849#26377#26435#20154
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #22996#25176#20195#29702#20154
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #37038#25919#32534#30721'2'
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #32852#31995#30005#35805'2'
              Footers = <>
            end
            item
              EditButtons = <>
              FieldName = #32852#31995#22320#22336'2'
              Footers = <>
            end>
        end
      end
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 106
    Top = 140
  end
  object ADOQuery1: TADOQuery
    Connection = DMMain.ADOConnection1
    CursorType = ctStatic
    AfterScroll = ADOQuery1AfterScroll
    Parameters = <>
    SQL.Strings = (
      'SELECT '#20844#21496#21517#31216','#20844#21496#32534#21495' from '#20844#21496#20449#24687#34920)
    Left = 146
    Top = 144
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 441
    Top = 151
  end
  object ADOQuery2: TADOQuery
    Connection = DMMain.ADOConnection1
    CursorType = ctStatic
    AfterScroll = ADOQuery2AfterScroll
    Parameters = <>
    SQL.Strings = (
      'select * from '#23458#25143#20449#24687#34920)
    Left = 476
    Top = 148
  end
  object ADOQuery4: TADOQuery
    Connection = DMMain.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from '#21333#20803#39044#21806#34920)
    Left = 748
    Top = 356
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 681
    Top = 367
  end
  object DataSource5: TDataSource
    DataSet = ADOQuery5
    Left = 841
    Top = 495
  end
  object ADOQuery5: TADOQuery
    Connection = DMMain.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT a.'#26242#23450#24231#33853#21517',a.'#29616#24231#33853#21517',a.'#24162#21495', a.'#20135#26435#33539#22260', a.'#25143#22411', a.'#24635#23618#25968', a.'#25152#22312#27004#23618','
      'a.'#21512#21516#32422#23450#24314#31569#38754#31215', a.'#21512#21516#32422#23450#22871#20869#38754#31215',a.'#21512#21516#32422#23450#20998#25674#38754#31215', b.'#21512#21516#21333#20215', b.'#21512#21516#24635#20215
      'FROM '#21333#20803#20449#24687#34920
      'a Right join '#21333#20803#39044#21806#34920' b on a.'#20844#21496#32534#21495'=b.'#20844#21496#32534#21495
      'where a.'#25151#21495'=b.'#25151#21495' and a.'#24162#21495'=b.'#24162#21495' and'
      'a.'#39033#30446#32534#21495'=b.'#39033#30446#32534#21495' and b.'#21512#21516#21495'='#39'HY-204'#39';')
    Left = 844
    Top = 468
  end
end