📄 searchbyhistoryfm.dfm.~1~

📁 一款房产中介软件
💻 ~1~
字号:
object SearchByHistoryForm: TSearchByHistoryForm
  Left = 32
  Top = 77
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = #38144#21806#24773#20917#21382#21490#35760#24405#26597#35810
  ClientHeight = 582
  ClientWidth = 981
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 157
    Top = 0
    Width = 7
    Height = 582
    Color = clSkyBlue
    ParentColor = False
    ExplicitTop = 24
    ExplicitHeight = 558
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 157
    Height = 582
    Align = alLeft
    TabOrder = 0
    ExplicitTop = 24
    ExplicitHeight = 558
    object Splitter3: TSplitter
      Left = 1
      Top = 557
      Width = 155
      Height = 0
      Cursor = crVSplit
      Align = alBottom
      Color = clSkyBlue
      ParentColor = False
    end
    object Splitter2: TSplitter
      Left = 1
      Top = 158
      Width = 155
      Height = 8
      Cursor = crVSplit
      Align = alTop
      Color = clSkyBlue
      ParentColor = False
    end
    object Splitter4: TSplitter
      Left = 1
      Top = 350
      Width = 155
      Height = 8
      Cursor = crVSplit
      Align = alTop
      Color = clSkyBlue
      ParentColor = False
    end
    object DBGridEh1: TDBGridEh
      Left = 1
      Top = 1
      Width = 155
      Height = 157
      Align = alTop
      AutoFitColWidths = True
      DataSource = DataSource1
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = ANSI_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
      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 = []
      VertScrollBar.Tracking = True
      OnCellClick = DBGridEh1CellClick
      Columns = <
        item
          EditButtons = <>
          FieldName = #20844#21496#21517#31216
          Footers = <>
        end>
    end
    object DBGridEh2: TDBGridEh
      Left = 1
      Top = 166
      Width = 155
      Height = 184
      Align = alTop
      AutoFitColWidths = True
      DataSource = DataSource2
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = ANSI_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
      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 = []
      OnCellClick = DBGridEh2CellClick
      Columns = <
        item
          EditButtons = <>
          FieldName = #39033#30446#21517#31216
          Footers = <>
        end>
    end
    object DBGridEh3: TDBGridEh
      Left = 1
      Top = 358
      Width = 155
      Height = 199
      Align = alClient
      AutoFitColWidths = True
      DataSource = DataSource3
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = ANSI_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
      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 = DBGridEh3CellClick
      Columns = <
        item
          EditButtons = <>
          FieldName = #24162#21495
          Footers = <>
          Width = 63
        end>
    end
  end
  object Panel2: TPanel
    Left = 164
    Top = 0
    Width = 817
    Height = 582
    Align = alClient
    Caption = ' '
    TabOrder = 1
    ExplicitTop = 24
    ExplicitHeight = 558
    object Splitter5: TSplitter
      Left = 1
      Top = 225
      Width = 815
      Height = 8
      Cursor = crVSplit
      Align = alTop
      Color = clSkyBlue
      ParentColor = False
    end
    object DBGridEh4: TDBGridEh
      Left = 97
      Top = 250
      Width = 719
      Height = 307
      Align = alClient
      DataSource = DataSource5
      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 = []
      ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      RowSizingAllowed = True
      SumList.Active = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
    object Panel3: TPanel
      Left = 1
      Top = 250
      Width = 96
      Height = 307
      Align = alLeft
      TabOrder = 1
    end
    object DBGridEh5: TDBGridEh
      Left = 1
      Top = 1
      Width = 815
      Height = 224
      Align = alTop
      DataSource = DataSource4
      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 = []
      ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      RowSizingAllowed = True
      SumList.Active = True
      TabOrder = 2
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnCellClick = DBGridEh4CellClick
      Columns = <
        item
          EditButtons = <>
          FieldName = #25151#21495
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #38144#21806#31867#22411
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #26799#20301
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #24635#23618#25968
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #25152#22312#27004#23618
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #29992#36884
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #25143#22411
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #38451#21488#31867#22411
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #25151#23627#26159#21542#25269#25276
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #36291#38169#23618
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #38468#23646#25151#20135
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #20135#26435#33539#22260
          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 = #20135#26435#30331#35760#24314#31569#38754#31215
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #20135#26435#30331#35760#22871#20869#38754#31215
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #20135#26435#30331#35760#20998#25674#38754#31215
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #21487#38144#21806#25151#23627#29366#24577
          Footers = <>
        end
        item
          EditButtons = <>
          FieldName = #19981#21487#38144#21806#25151#23627#29366#24577
          Footers = <>
        end>
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 94
    Top = 105
  end
  object ADOQuery1: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT '#20844#21496#21517#31216','#20844#21496#32534#21495' from '#20844#21496#20449#24687#34920)
    Left = 133
    Top = 109
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 90
    Top = 227
  end
  object ADOQuery2: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT '#39033#30446#32534#21495','#39033#30446#21517#31216' from '#39033#30446#20449#24687#34920)
    Left = 128
    Top = 230
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 90
    Top = 403
  end
  object ADOQuery3: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * from '#21333#20307#20449#24687#34920)
    Left = 128
    Top = 406
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 395
    Top = 201
  end
  object ADOQuery4: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * from '#21333#20803#20449#24687#34920)
    Left = 344
    Top = 192
  end
  object ADOQuery5: TADOQuery
    Connection = DataModule2.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * from '#38144#21806#21382#21490#20020#26102#34920)
    Left = 320
    Top = 392
  end
  object DataSource5: TDataSource
    DataSet = ADOQuery5
    Left = 355
    Top = 393
  end
end
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -