searchbyhistoryunit.dfm

短小而实用的房地产销售管理软件

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 AALabel1: TAALabel
    Left = 0
    Top = 0
    Width = 981
    Height = 24
    ParentEffect.ParentFont = False
    Align = alTop
    AutoSize = False
    Caption = #28857#20987#25152#22312#25151#21495#65292#20877#28857'['#21047#26032']'#65292#21363#21487#26597#30475#25151#23627#38144#21806#21464#37327#35760#24405#12290#36873#25321#38144#21806#21382#21490#35760#24405#65292#20877#28857'['#24674#22797']'#21363#21487#24674#22797#23558#24403#21069#25151#23627#38144#21806#31867#22411#12290
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    Effect.FontEffect.Shadow.Enabled = True
    Effect.FontEffect.Shadow.Color = clRed
  end
  object Splitter1: TSplitter
    Left = 157
    Top = 24
    Width = 7
    Height = 558
    Color = clSkyBlue
    ParentColor = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 24
    Width = 157
    Height = 558
    Align = alLeft
    TabOrder = 0
    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
      FixGridlinecolor = clGray
      Gridlinecolor = clGray
      FooterDisplayStyle = False
      ShowBmp = False
      UseMenu = True
      RowColorFlag = True
      RowTwoColor = clMoneyGreen
      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 = 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 = <>
          DisplayNullIfZero = False
          IsCurrency = False
        end>
    end
    object DBGridEh2: TDBGridEh
      Left = 1
      Top = 166
      Width = 155
      Height = 184
      FixGridlinecolor = clGray
      Gridlinecolor = clGray
      FooterDisplayStyle = False
      ShowBmp = False
      UseMenu = True
      RowColorFlag = True
      RowTwoColor = clMoneyGreen
      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 = 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 = <>
          DisplayNullIfZero = False
          IsCurrency = False
        end>
    end
    object DBGridEh3: TDBGridEh
      Left = 1
      Top = 358
      Width = 155
      Height = 199
      FixGridlinecolor = clGray
      Gridlinecolor = clGray
      FooterDisplayStyle = False
      ShowBmp = False
      UseMenu = True
      RowColorFlag = True
      RowTwoColor = clMoneyGreen
      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
      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
          DisplayNullIfZero = False
          IsCurrency = False
        end>
    end
  end
  object Panel2: TPanel
    Left = 164
    Top = 24
    Width = 817
    Height = 558
    Align = alClient
    Caption = ' '
    TabOrder = 1
    object Splitter5: TSplitter
      Left = 1
      Top = 225
      Width = 815
      Height = 8
      Cursor = crVSplit
      Align = alTop
      Color = clSkyBlue
      ParentColor = False
    end
    object AALabel2: TAALabel
      Left = 1
      Top = 233
      Width = 815
      Height = 17
      ParentEffect.ParentFont = False
      Align = alTop
      Caption = #21333#20803#38144#21806#21382#21490#35760#24405
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = #23435#20307
      Font.Style = []
      Effect.FontEffect.Shadow.Enabled = True
      Effect.FontEffect.Shadow.Color = clBlue
    end
    object DBGridEh4: TDBGridEh
      Left = 97
      Top = 250
      Width = 719
      Height = 307
      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