datam.~dfm

帮朋友编写的幼儿教育的管理平台

object DM: TDM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 218
  Top = 113
  Height = 574
  Width = 700
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=.\dat' +
      'abase\ProCRM.mdb;Mode=Share Deny None;Extended Properties="";Per' +
      'sist Security Info=False;Jet OLEDB:System database="";Jet OLEDB:' +
      'Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine' +
      ' Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Parti' +
      'al Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New' +
      ' Database Password="";Jet OLEDB:Create System Database=False;Jet' +
      ' OLEDB:Encrypt Database=False;Jet OLEDB:Don'#39't Copy Locale on Com' +
      'pact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OL' +
      'EDB:SFP=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 40
  end
  object Custom_Query: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tblCustom')
    Left = 40
    Top = 56
  end
  object Custom_DS: TDataSource
    AutoEdit = False
    DataSet = Custom_Query
    Left = 144
    Top = 56
  end
  object Guest_Query: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tblGuest')
    Left = 40
    Top = 112
  end
  object Guest_DS: TDataSource
    AutoEdit = False
    DataSet = Guest_Query
    Left = 144
    Top = 112
  end
  object CustomADQuery: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tblCustomActionDetail')
    Left = 232
    Top = 56
  end
  object CustomAD_DS: TDataSource
    AutoEdit = False
    DataSet = CustomADQuery
    Left = 336
    Top = 56
  end
  object GuestADQuery: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from tblGuestActionDetail')
    Left = 232
    Top = 112
  end
  object GuestAD_DS: TDataSource
    AutoEdit = False
    DataSet = GuestADQuery
    Left = 336
    Top = 112
  end
end