unit_zhhgl.dfm

基本信息：房屋基本信息、客户基本信息、职工基本信息 房屋交易：客户订购、退房、购买 信息查询：销售、订购、结款、交易记录查询 报表查询：日报表、月报表

      B9E6713FDEE7F32BF39CBE797D4F6F1F084D0FB27A848B8F8D231596E1E0AB12
      12363FF267C977AF29C33E471FE083CD7A39FF00D247FEA39A5E7311798741FF
      D9}
  end
  object DBGrid1: TDBGrid
    Left = 400
    Top = 160
    Width = 273
    Height = 201
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
  end
  object GroupBox1: TGroupBox
    Left = 24
    Top = 152
    Width = 305
    Height = 209
    Caption = #22686#21152#26032#29992#25143
    TabOrder = 1
    object LabeledEdit1: TLabeledEdit
      Left = 152
      Top = 24
      Width = 121
      Height = 21
      EditLabel.Width = 56
      EditLabel.Height = 16
      EditLabel.Caption = 'userno'#65306' '
      EditLabel.Font.Charset = DEFAULT_CHARSET
      EditLabel.Font.Color = clWindowText
      EditLabel.Font.Height = -13
      EditLabel.Font.Name = 'MS Sans Serif'
      EditLabel.Font.Style = []
      EditLabel.ParentFont = False
      TabOrder = 0
    end
    object ComboBox1: TComboBox
      Left = 16
      Top = 24
      Width = 121
      Height = 21
      ItemHeight = 13
      TabOrder = 1
      OnClick = ComboBox1Click
      Items.Strings = (
        #21592#24037
        #23458#25143
        #32463#29702)
    end
    object LabeledEdit2: TLabeledEdit
      Left = 152
      Top = 72
      Width = 121
      Height = 21
      EditLabel.Width = 39
      EditLabel.Height = 13
      EditLabel.Caption = ' '#22995#21517#65306
      TabOrder = 2
    end
    object LabeledEdit3: TLabeledEdit
      Left = 16
      Top = 72
      Width = 121
      Height = 21
      EditLabel.Width = 39
      EditLabel.Height = 13
      EditLabel.Caption = #23494#30721' '#65306
      TabOrder = 3
    end
    object LabeledEdit4: TLabeledEdit
      Left = 16
      Top = 120
      Width = 121
      Height = 21
      EditLabel.Width = 60
      EditLabel.Height = 13
      EditLabel.Caption = #23494#30721#30830#35748#65306
      TabOrder = 4
    end
    object Button1: TButton
      Left = 176
      Top = 120
      Width = 75
      Height = 25
      Caption = #22686#21152
      TabOrder = 5
      OnClick = Button1Click
    end
    object Button3: TButton
      Left = 176
      Top = 168
      Width = 75
      Height = 25
      Caption = #21024#38500
      TabOrder = 6
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 24
      Top = 168
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 7
      OnClick = Button4Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 16
    Top = 376
    Width = 633
    Height = 57
    TabOrder = 2
    object LabeledEdit5: TLabeledEdit
      Left = 8
      Top = 24
      Width = 121
      Height = 21
      EditLabel.Width = 90
      EditLabel.Height = 13
      EditLabel.Caption = #29992#25143#26435#38480#31867#22411'      '
      ReadOnly = True
      TabOrder = 0
    end
    object LabeledEdit6: TLabeledEdit
      Left = 136
      Top = 24
      Width = 121
      Height = 21
      EditLabel.Width = 69
      EditLabel.Height = 13
      EditLabel.Caption = #29992#25143#31867#22411'       '
      ReadOnly = True
      TabOrder = 1
    end
    object LabeledEdit7: TLabeledEdit
      Left = 264
      Top = 24
      Width = 121
      Height = 21
      EditLabel.Width = 60
      EditLabel.Height = 13
      EditLabel.Caption = #29992#25143#21517'        '
      ReadOnly = True
      TabOrder = 2
    end
    object LabeledEdit8: TLabeledEdit
      Left = 392
      Top = 24
      Width = 121
      Height = 21
      EditLabel.Width = 54
      EditLabel.Height = 13
      EditLabel.Caption = #23494#30721'          '
      ReadOnly = True
      TabOrder = 3
    end
    object Button2: TButton
      Left = 544
      Top = 16
      Width = 75
      Height = 25
      Caption = #21024#38500
      TabOrder = 4
      OnClick = Button2Click
    end
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=fwxs'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 488
    Top = 152
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 544
    Top = 152
  end
  object ADOQuery1: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from yonghu')
    Left = 520
    Top = 152
  end
end