pas_dm.~dfm

比较详细的功能

object DM: TDM
  OldCreateOrder = False
  Left = 199
  Top = 145
  Height = 510
  Width = 823
  object DS1: TDataSource
    DataSet = AQ1
    Left = 232
    Top = 8
  end
  object AC1: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password="";Persist Security Info=True;User ' +
      'ID=sa;Initial Catalog=HM;Data Source=yygz1'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 40
    Top = 8
  end
  object AQ1: TADOQuery
    Connection = AC1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'SELECT *'
      'FROM usr')
    Left = 136
    Top = 8
  end
  object loginquery: TADOQuery
    Connection = AC1
    CursorType = ctStatic
    DataSource = DS1
    Parameters = <>
    SQL.Strings = (
      'select * from usr')
    Left = 40
    Top = 64
  end
  object usrQuery: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 136
    Top = 64
  end
  object Query_landlord: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 568
    Top = 8
  end
  object Query_client: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 568
    Top = 72
  end
  object Query_deputy: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 568
    Top = 144
  end
  object Query_house: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 568
    Top = 344
  end
  object ds_noUseHouse: TDataSource
    DataSet = Query_noUseHouse
    Left = 472
    Top = 8
  end
  object Query_noUseHouse: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 360
    Top = 8
  end
  object Query_houserent: TADOQuery
    Connection = AC1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from house_histry')
    Left = 352
    Top = 72
  end
  object ds_houserent: TDataSource
    DataSet = Query_houserent
    Left = 472
    Top = 72
  end
  object ds_househistry: TDataSource
    DataSet = Query_househistry
    Left = 472
    Top = 144
  end
  object Query_househistry: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 352
    Top = 144
  end
  object Query_payhint: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 40
    Top = 208
  end
  object Query_pub: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 136
    Top = 208
  end
  object Ds_landlord: TDataSource
    DataSet = Query_landlord
    Left = 688
    Top = 8
  end
  object Ds_client: TDataSource
    DataSet = Query_client
    Left = 688
    Top = 72
  end
  object ds_deputy: TDataSource
    DataSet = Query_deputy
    Left = 688
    Top = 144
  end
  object Query_depart: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 568
    Top = 216
  end
  object DS_depart: TDataSource
    DataSet = Query_depart
    Left = 688
    Top = 216
  end
  object Query_seller: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 568
    Top = 280
  end
  object ds_seller: TDataSource
    DataSet = Query_seller
    Left = 688
    Top = 280
  end
  object Ds_house: TDataSource
    DataSet = Query_house
    Left = 688
    Top = 344
  end
  object ds_ht: TDataSource
    DataSet = query_ht
    Left = 456
    Top = 296
  end
  object query_ht: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 336
    Top = 296
  end
  object query_area: TADOQuery
    Connection = AC1
    Parameters = <>
    Left = 336
    Top = 352
  end
  object ds_area: TDataSource
    DataSet = query_area
    Left = 456
    Top = 352
  end
  object gg: TADOQuery
    Connection = AC1
    CursorType = ctStatic
    Parameters = <>
    Prepared = True
    SQL.Strings = (
      'SELECT *'
      'FROM usr')
    Left = 40
    Top = 128
  end
end