datam.dfm

本程序是一个餐饮业的管理软件

object Data: TData
  OldCreateOrder = False
  Left = 344
  Top = 120
  Height = 612
  Width = 442
  object ADOConnectMeal: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=db.md' +
      'b;Mode=Share Deny None;Extended Properties="";Persist Security I' +
      'nfo=False;Jet OLEDB:System database="";Jet OLEDB:Registry Path="' +
      '";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLE' +
      'DB:Database Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;J' +
      'et OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Passw' +
      'ord="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt ' +
      'Database=False;Jet OLEDB:Don'#39't Copy Locale on Compact=False;Jet ' +
      'OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 32
  end
  object ADOQLogin: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Users')
    Left = 32
    Top = 64
  end
  object ADOQStream: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Stream')
    Left = 32
    Top = 120
  end
  object ADOQTBegin: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from TableBegin')
    Left = 32
    Top = 184
  end
  object ADOQTEnd: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from TableEnds')
    Left = 32
    Top = 248
  end
  object ADOQOrder: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Orders')
    Left = 32
    Top = 304
  end
  object DataSOrder: TDataSource
    DataSet = ADOQOrder
    Left = 112
    Top = 304
  end
  object ADOQEmployee: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Employee')
    Left = 32
    Top = 368
  end
  object DataSEnd: TDataSource
    DataSet = ADOQTEnd
    Left = 112
    Top = 248
  end
  object DataSBegin: TDataSource
    DataSet = ADOQTBegin
    Left = 112
    Top = 184
  end
  object ADOQObject: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Objects')
    Left = 32
    Top = 432
  end
  object DataSObject: TDataSource
    DataSet = ADOQObject
    Left = 112
    Top = 432
  end
  object ADOQMenu: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Menu')
    Left = 32
    Top = 496
  end
  object DataSMenu: TDataSource
    DataSet = ADOQMenu
    Left = 112
    Top = 496
  end
  object ADOQStaple: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Staple')
    Left = 232
    Top = 64
  end
  object DataSStaple: TDataSource
    DataSet = ADOQStaple
    Left = 320
    Top = 64
  end
  object ADOQProvider: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from MProvider')
    Left = 232
    Top = 120
  end
  object DataSProvider: TDataSource
    DataSet = ADOQProvider
    Left = 320
    Top = 120
  end
  object ADOQBuyEvent: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from BuyEvent')
    Left = 232
    Top = 192
  end
  object ADOQDepleteEvent: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from DepleteEvent')
    Left = 232
    Top = 256
  end
  object DataSEmployee: TDataSource
    DataSet = ADOQEmployee
    Left = 112
    Top = 368
  end
  object ADOQAttendence: TADOQuery
    Connection = ADOConnectMeal
    Parameters = <>
    SQL.Strings = (
      'select * from Attendences')
    Left = 232
    Top = 328
  end
  object DataSAttendence: TDataSource
    DataSet = ADOQAttendence
    Left = 320
    Top = 328
  end
  object DataSLogin: TDataSource
    DataSet = ADOQLogin
    Left = 112
    Top = 64
  end
  object DataSStream: TDataSource
    DataSet = ADOQStream
    Left = 112
    Top = 120
  end
end