data.dfm

蛮好的系统大家一起使用看看!~呵呵!关于图书仓库管理系统的!

object dm: Tdm
  OldCreateOrder = False
  Left = 173
  Top = 131
  Height = 331
  Width = 627
  object bookQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      ''
      '')
    Left = 16
    Top = 8
  end
  object inQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 72
    Top = 8
  end
  object outQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 128
    Top = 8
  end
  object empQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 176
    Top = 8
  end
  object shopQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 288
    Top = 8
  end
  object mainQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      ''
      '')
    Left = 352
    Top = 8
  end
  object keyQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 408
    Top = 8
  end
  object bookSource: TDataSource
    DataSet = bookQuery
    Left = 16
    Top = 64
  end
  object inSource: TDataSource
    DataSet = inQuery
    Left = 72
    Top = 64
  end
  object outSource: TDataSource
    DataSet = outQuery
    Left = 120
    Top = 64
  end
  object empSource: TDataSource
    DataSet = empQuery
    Left = 176
    Top = 64
  end
  object shopSource: TDataSource
    DataSet = shopQuery
    Left = 288
    Top = 64
  end
  object mainSource: TDataSource
    DataSet = mainQuery
    Left = 352
    Top = 64
  end
  object keyTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'key.DBF'
    Left = 16
    Top = 184
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=MSDASQL.1;Persist Security Info=False;Data Source=dBASE' +
      ' Files;Mode=ReadWrite;Initial Catalog=D:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    LoginPrompt = False
    Mode = cmReadWrite
    Left = 448
    Top = 64
  end
  object keySource: TDataSource
    DataSet = keyTable
    Left = 16
    Top = 240
  end
  object emptable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'employee.DBF'
    Left = 88
    Top = 184
  end
  object shopTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'shopkeeper.DBF'
    Left = 160
    Top = 184
  end
  object guestQuery: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 224
    Top = 8
  end
  object guestTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'guest.dbf'
    Left = 232
    Top = 184
  end
  object inTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'inrecord.DBF'
    Left = 304
    Top = 184
  end
  object outTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'outrecord.dbf'
    Left = 376
    Top = 184
  end
  object bookTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'bookrecord.DBF'
    Left = 456
    Top = 184
  end
  object guestSource: TDataSource
    DataSet = guestQuery
    Left = 232
    Top = 64
  end
  object bookSource1: TDataSource
    DataSet = bookTable
    Left = 456
    Top = 240
  end
  object helpDataSource: TDataSource
    AutoEdit = False
    DataSet = helpTable
    Left = 536
    Top = 240
  end
  object helpTable: TTable
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    TableName = 'help.DBF'
    Left = 528
    Top = 184
  end
  object guestSource1: TDataSource
    DataSet = guestTable
    Left = 232
    Top = 240
  end
  object shopSource1: TDataSource
    DataSet = shopTable
    Left = 152
    Top = 240
  end
  object empSource1: TDataSource
    DataSet = emptable
    Left = 80
    Top = 240
  end
  object inSource1: TDataSource
    DataSet = inTable
    Left = 304
    Top = 240
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 376
    Top = 240
  end
  object Query1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 464
    Top = 8
  end
  object Query2: TQuery
    Active = True
    DatabaseName = 'd:\'#22270#20070#20179#24211#31649#29702#31995#32479'\date'
    SQL.Strings = (
      'select sum(number1) from bookrecord')
    Left = 512
    Top = 8
  end
end