local_data_module.dfm

图书管理系统本地数据库实现

object local_base: Tlocal_base
  OldCreateOrder = False
  Left = 192
  Top = 114
  Height = 480
  Width = 696
  object BOOK_TABLE: TTable
    Active = True
    DatabaseName = 'local_db'
    TableName = 'BOOK'
    Left = 144
    Top = 24
  end
  object USER_TABLE: TTable
    Active = True
    DatabaseName = 'local_db'
    TableName = 'CUSTOMER'
    Left = 144
    Top = 72
  end
  object local_dbase: TDatabase
    AliasName = 'lib'
    Connected = True
    DatabaseName = 'local_db'
    LoginPrompt = False
    Params.Strings = (
      'USER NAME=SYSDBA'
      'PASSWORD=masterkey')
    SessionName = 'Default'
    Left = 48
    Top = 24
  end
  object Book_Query: TQuery
    Active = True
    DatabaseName = 'local_db'
    SQL.Strings = (
      'Select * from Book'
      ' ')
    UpdateMode = upWhereChanged
    Left = 144
    Top = 192
  end
  object User_Query: TQuery
    Active = True
    DatabaseName = 'local_db'
    RequestLive = True
    SQL.Strings = (
      'Select * from CUSTOMER')
    UpdateMode = upWhereChanged
    Left = 144
    Top = 256
  end
  object Book_Source: TDataSource
    DataSet = BOOK_TABLE
    Left = 296
    Top = 40
  end
  object User_Source: TDataSource
    DataSet = User_Query
    Left = 296
    Top = 96
  end
  object BOOKCLASS_TABLE: TTable
    Active = True
    DatabaseName = 'local_db'
    TableName = 'BOOKCLASS'
    Left = 144
    Top = 128
  end
  object BOOKCLASS_SOURCE: TDataSource
    DataSet = BOOKCLASS_TABLE
    Left = 296
    Top = 160
  end
end