viewitemfm.dfm.~1~

一款房产中介软件

    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 2
    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 = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end>
  end
  object DBGridEh2: TDBGridEh
    Left = 164
    Top = 83
    Width = 839
    Height = 493
    FixGridlinecolor = clGray
    Gridlinecolor = clGray
    FooterDisplayStyle = False
    ShowBmp = False
    UseMenu = True
    RowColorFlag = True
    RowTwoColor = clSkyBlue
    CurDeciNumber = 2
    CurShowNegativeFont = True
    CurShowNegativeColor = False
    CurShowNegativeSign = False
    CurDeciSeparatColor = clRed
    CurrencySymBol = #65509
    CurrencySymBolAlained = False
    CurGridLineColor = clSilver
    CurGridLineWidth = 1
    CurKilobitColor = clGreen
    CurrencyFont.Charset = DEFAULT_CHARSET
    CurrencyFont.Color = clWindowText
    CurrencyFont.Height = -11
    CurrencyFont.Name = 'MS Sans Serif'
    CurrencyFont.Style = []
    CurNegativeFont.Charset = DEFAULT_CHARSET
    CurNegativeFont.Color = clRed
    CurNegativeFont.Height = -11
    CurNegativeFont.Name = 'MS Sans Serif'
    CurNegativeFont.Style = []
    CurNegativeColor = clRed
    CurTextLayout = tlCenter
    CurZeroEmpty = True
    Align = alClient
    DataSource = DataSource2
    Flat = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    FooterColor = clWindow
    FooterFont.Charset = ANSI_CHARSET
    FooterFont.Color = clBlue
    FooterFont.Height = -13
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    RowSizingAllowed = True
    SumList.Active = True
    TabOrder = 3
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = DBGridEh2DblClick
    Columns = <
      item
        EditButtons = <>
        FieldName = #39033#30446#21517#31216
        Footer.Value = #24635#35745
        Footer.ValueType = fvtStaticText
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #39033#30446#24231#33853
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #39033#30446#31867#21035
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #35268#21010#29992#36884
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #22320#21495
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #24635#24162#25968
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #24314#31569#21333#20301
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #22303#22320#26469#28304
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #22303#22320#38754#31215
        Footer.FieldName = #22303#22320#38754#31215
        Footer.ValueType = fvtSum
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #22303#22320#20351#29992#32456#27490#26085#26399
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #24635#24314#31569#38754#31215
        Footer.FieldName = #24635#24314#31569#38754#31215
        Footer.ValueType = fvtSum
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #24635#25237#36164
        Footer.FieldName = #24635#25237#36164
        Footer.ValueType = fvtSum
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #35745#21010#24320#24037#26085#26399
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #24320#24037#26085#26399
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #35745#21010#31459#24037#26085#26399
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end
      item
        EditButtons = <>
        FieldName = #31459#24037#26085#26399
        Footers = <>
        DisplayNullIfZero = False
        IsCurrency = False
      end>
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 59
    Top = 203
  end
  object ADOQuery1: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    AfterScroll = ADOQuery1AfterScroll
    Parameters = <>
    SQL.Strings = (
      'SELECT '#20844#21496#21517#31216','#20844#21496#32534#21495' from '#20844#21496#20449#24687#34920)
    Left = 58
    Top = 238
  end
  object ADOQuery2: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * from '#39033#30446#20449#24687#34920)
    Left = 195
    Top = 208
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 194
    Top = 240
  end
end