datamoduel.~dfm

delphi制作的图书管理系统

object DM: TDM
  OldCreateOrder = False
  Left = 177
  Top = 234
  Height = 353
  Width = 551
  object TempDSource: TDataSource
    DataSet = TempTable
    Left = 282
    Top = 8
  end
  object TempTable: TTable
    Left = 216
    Top = 8
  end
  object TempQry: TQuery
    DatabaseName = 'Bkstroe'
    Left = 344
    Top = 12
  end
  object PurchaseQry: TQuery
    DatabaseName = 'Bkstroe'
    Left = 400
    Top = 8
  end
  object AddPurhcaserDSource: TDataSource
    DataSet = AddPurhcaserTable
    Left = 16
    Top = 8
  end
  object AddPurhcaserTable: TTable
    DatabaseName = 'Bkstroe'
    TableName = 'dbo.Purchaser'
    Left = 88
    Top = 8
  end
  object SaleDSource: TDataSource
    DataSet = SaleTable
    Left = 18
    Top = 72
  end
  object SaleTable: TTable
    DatabaseName = 'Bkstroe'
    TableName = 'dbo.Saler'
    Left = 80
    Top = 72
  end
  object BookInfoTable: TTable
    DatabaseName = 'Bkstroe'
    TableName = 'dbo.BookInfo'
    Left = 114
    Top = 126
  end
  object BookInfoDSource: TDataSource
    DataSet = BookInfoTable
    Left = 38
    Top = 128
  end
  object SaleManageDSource: TDataSource
    DataSet = SaleManageTable
    Left = 232
    Top = 64
  end
  object SaleManageTable: TTable
    Left = 392
    Top = 60
  end
  object SaleManageQry: TQuery
    DatabaseName = 'bkstroe'
    Left = 304
    Top = 64
  end
  object QryDepository: TQuery
    Active = True
    DatabaseName = 'bkstroe'
    SQL.Strings = (
      
        'Select BookInfo.BookID,BookName,Author,Press,Price,Booknum from ' +
        'Bookinfo,BookNum where Bookinfo.BookID=BookNum.BookID')
    Left = 216
    Top = 128
  end
  object DSourceDepository: TDataSource
    DataSet = QryDepository
    Left = 298
    Top = 128
  end
  object PurchaseAccountDSource: TDataSource
    DataSet = PurchaseAccountQry
    Left = 208
    Top = 192
  end
  object PurchaseAccountQry: TQuery
    DatabaseName = 'bkstroe'
    Left = 326
    Top = 192
  end
  object TmpPurchaseTable: TTable
    DatabaseName = 'bkstroe'
    TableName = 'dbo.PurchaseAccount'
    Left = 448
    Top = 192
  end
end