datamodule.dfm

来自「这是一个用Delphi制作的简单的人事管理系统」· DFM 代码 · 共 45 行

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 192
  Top = 107
  Height = 267
  Width = 344
  object Database: TDatabase
    AliasName = 'MIS'
    Connected = True
    DatabaseName = 'MISData'
    LoginPrompt = False
    Params.Strings = (
      'SERVER NAME=red:MISDB'
      'USER NAME=MISDBA'
      'OPEN MODE=READ/WRITE'
      'SCHEMA CACHE SIZE=8'
      'LANGDRIVER='
      'SQLQRYMODE='
      'SQLPASSTHRU MODE=SHARED AUTOCOMMIT'
      'SCHEMA CACHE TIME=-1'
      'MAX ROWS=-1'
      'BATCH COUNT=200'
      'ENABLE SCHEMA CACHE=FALSE'
      'SCHEMA CACHE DIR='
      'ENABLE BCD=FALSE'
      'BLOBS TO CACHE=64'
      'BLOB SIZE=32'
      'PASSWORD=PASSWORD')
    SessionName = 'Default'
    Left = 24
    Top = 8
  end
  object T_user: TTable
    DatabaseName = 'MISData'
    TableName = 'PERSON'
    Left = 24
    Top = 56
  end
  object DS_user: TDataSource
    DataSet = T_user
    Left = 104
    Top = 56
  end
end