datam.~dfm

简单的小区物业管理系统,户籍管理,出入管理,系统管理,收费管理,

object Data: TData
  OldCreateOrder = False
  Left = 375
  Top = 129
  Height = 414
  Width = 386
  object ADOConnectLogin: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=db_Sy' +
      's.mdb;Mode=Share Deny None;Extended Properties="";Persist Securi' +
      'ty Info=False;Jet OLEDB:System database="";Jet OLEDB:Registry Pa' +
      'th="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet' +
      ' OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops' +
      '=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database P' +
      'assword="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encr' +
      'ypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;' +
      'Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=Fal' +
      'se'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 48
    Top = 32
  end
  object ADOLogin: TADOQuery
    Connection = ADOConnectLogin
    Parameters = <>
    SQL.Strings = (
      #39'select * from users'#39)
    Left = 296
    Top = 88
  end
  object ADOCLogin: TADOCommand
    Connection = ADOConnectLogin
    Parameters = <>
    Left = 296
    Top = 32
  end
  object DataSouLogin: TDataSource
    DataSet = ADOLogin
    Left = 160
    Top = 104
  end
  object DatasHJGL: TDataSource
    DataSet = ADOtHJGL
    Left = 168
    Top = 32
  end
  object DatasMemeber: TDataSource
    Left = 144
    Top = 176
  end
  object ADOtHJGL: TADOQuery
    Connection = ADOConnectLogin
    Parameters = <>
    Left = 48
    Top = 96
  end
  object ADOtMember: TADOQuery
    Connection = ADOConnectLogin
    Parameters = <>
    Left = 40
    Top = 184
  end
  object ADOQInOut: TADOQuery
    Connection = ADOConnectLogin
    Parameters = <>
    SQL.Strings = (
      'Select * from InOut')
    Left = 48
    Top = 272
  end
  object DataSInOut: TDataSource
    DataSet = ADOQInOut
    Left = 136
    Top = 272
  end
  object ADOFix: TADOQuery
    Connection = ADOConnectLogin
    Parameters = <>
    SQL.Strings = (
      'select * from Fix')
    Left = 232
    Top = 184
  end
  object DataSFix: TDataSource
    DataSet = ADOFix
    Left = 296
    Top = 184
  end
  object ADOFee: TADOQuery
    Connection = ADOConnectLogin
    Parameters = <>
    SQL.Strings = (
      'select * from Fee')
    Left = 224
    Top = 288
  end
  object DataSFee: TDataSource
    DataSet = ADOFee
    Left = 312
    Top = 288
  end
end