salecause.dfm

我觉得是很好的一个程序是关于房产中介的管理系统包跨哦出租出售求租求售的

inherited Frm_SaleCause: TFrm_SaleCause
  Left = 300
  Top = 233
  BorderStyle = bsDialog
  Caption = #39640#32423#26597#35810
  ClientHeight = 248
  ClientWidth = 387
  FormStyle = fsNormal
  OldCreateOrder = True
  Position = poDesktopCenter
  Visible = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label2: TLabel
    Left = 31
    Top = 45
    Width = 48
    Height = 12
    Caption = #25910#20214#21495#65306
  end
  object Label4: TLabel
    Left = 31
    Top = 71
    Width = 60
    Height = 12
    Caption = #25151#23627#22320#22336#65306
  end
  object Label7: TLabel
    Left = 31
    Top = 192
    Width = 54
    Height = 12
    Caption = #24320#22987#26085#26399':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 31
    Top = 217
    Width = 54
    Height = 12
    Caption = #25130#27490#26085#26399':'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 31
    Top = 95
    Width = 36
    Height = 12
    Caption = #25151#22411#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label1: TLabel
    Left = 31
    Top = 119
    Width = 36
    Height = 12
    Caption = #26397#21521#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 31
    Top = 144
    Width = 36
    Height = 12
    Caption = #21306#22495#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 31
    Top = 168
    Width = 48
    Height = 12
    Caption = #32852#31995#20154#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 31
    Top = 18
    Width = 36
    Height = 12
    Caption = #29366#24577#65306
  end
  object edtHouseAddr: TEdit
    Left = 94
    Top = 66
    Width = 146
    Height = 20
    TabOrder = 1
  end
  object edtNo: TEdit
    Left = 94
    Top = 41
    Width = 146
    Height = 20
    TabOrder = 0
  end
  object chkStartDate: TCheckBox
    Left = 95
    Top = 187
    Width = 17
    Height = 17
    TabOrder = 2
    OnClick = chkStartDateClick
  end
  object dtpEndDate: TDateTimePicker
    Left = 112
    Top = 214
    Width = 130
    Height = 20
    Date = 0.473292361100903000
    Time = 0.473292361100903000
    Enabled = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 3
  end
  object dtpStartDate: TDateTimePicker
    Left = 112
    Top = 186
    Width = 130
    Height = 20
    Date = 0.473292361100903000
    Time = 0.473292361100903000
    Enabled = False
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 4
  end
  object chkEndDate: TCheckBox
    Left = 95
    Top = 215
    Width = 17
    Height = 17
    TabOrder = 5
    OnClick = chkEndDateClick
  end
  object cbHouseType: TComboBox
    Left = 94
    Top = 91
    Width = 146
    Height = 20
    ItemHeight = 12
    TabOrder = 6
  end
  object cbHouseWay: TComboBox
    Left = 94
    Top = 115
    Width = 146
    Height = 20
    ItemHeight = 12
    TabOrder = 7
  end
  object cbHouseArea: TComboBox
    Left = 94
    Top = 140
    Width = 146
    Height = 20
    ItemHeight = 12
    TabOrder = 8
  end
  object edtLinkName: TEdit
    Left = 94
    Top = 161
    Width = 146
    Height = 20
    TabOrder = 9
  end
  object cboStatus: TComboBox
    Left = 94
    Top = 13
    Width = 146
    Height = 20
    Style = csDropDownList
    Color = clMoneyGreen
    ItemHeight = 12
    ItemIndex = 0
    TabOrder = 10
    Text = #20840#37096
    Items.Strings = (
      #20840#37096
      #26410#20986#21806
      #24050#20986#21806
      #24050#20316#24223)
  end
  object btnClose: TBitBtn
    Left = 289
    Top = 64
    Width = 76
    Height = 30
    Cancel = True
    Caption = #20851#38381#31383#21475
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 11
    OnClick = btnCloseClick
    NumGlyphs = 2
  end
  object btnFind: TBitBtn
    Left = 289
    Top = 16
    Width = 76
    Height = 30
    Caption = #24320#22987#26597#35810
    Default = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 12
    OnClick = btnFindClick
  end
end