rdatamod.dfm

来自「source for card readers」· DFM 代码 · 共 77 行

object RemoteDataModuleDB2: TRemoteDataModuleDB2
  OldCreateOrder = False
  Left = 518
  Top = 195
  Height = 150
  Width = 533
  object SQLConnection1: TSQLConnection
    ConnectionName = 'DB2Connection'
    DriverName = 'DB2'
    GetDriverFunc = 'getSQLDriverDB2'
    LibraryName = 'DBEXPDB2.DLL'
    LoginPrompt = False
    Params.Strings = (
      'BlobSize=-1'
      'Database=SAMPLE'
      'DriverName=DB2'
      'ErrorResourceFile='
      'LocaleCode=0000'
      'Password=ds9sisko'
      'DB2 TransIsolation=ReadCommited'
      'User_Name=administrator')
    VendorLib = 'db2cli.dll'
    Connected = True
    Left = 32
    Top = 16
  end
  object SQLdsEMP: TSQLDataSet
    CommandText = 'EMPLOYEE'
    CommandType = ctTable
    MaxBlobSize = -1
    Params = <>
    SQLConnection = SQLConnection1
    Left = 120
    Top = 16
  end
  object dspEMPLOYEE: TDataSetProvider
    DataSet = SQLdsEMP
    Left = 120
    Top = 64
  end
  object SQLtblEMP_ACT: TSQLTable
    IndexFieldNames = 'EMPNO'
    MasterFields = 'EMPNO'
    MasterSource = dsEMP
    MaxBlobSize = -1
    SQLConnection = SQLConnection1
    TableName = 'EMP_ACT'
    Left = 208
    Top = 16
  end
  object SQLtblEMP_PHOTO: TSQLTable
    IndexFieldNames = 'EMPNO'
    MasterFields = 'EMPNO'
    MasterSource = dsEMP
    MaxBlobSize = -1
    SQLConnection = SQLConnection1
    TableName = 'EMP_PHOTO'
    Left = 320
    Top = 16
  end
  object SQLtblEMP_RESUME: TSQLTable
    IndexFieldNames = 'EMPNO'
    MasterFields = 'EMPNO'
    MasterSource = dsEMP
    MaxBlobSize = -1
    SQLConnection = SQLConnection1
    TableName = 'EMP_RESUME'
    Left = 440
    Top = 16
  end
  object dsEMP: TDataSource
    DataSet = SQLdsEMP
    Left = 256
    Top = 72
  end
end