servercppdm.dfm

来自「Direct Oracle Access 非常好的Oracle数据库直接访问组」· DFM 代码 · 共 126 行

object RemoteCPPDM: TRemoteCPPDM
  OldCreateOrder = False
  OnCreate = RemoteCPPDMCreate
  OnDestroy = RemoteCPPDMDestroy
  Left = 285
  Top = 161
  Height = 479
  Width = 741
  object OracleSession: TOracleSession
    Cursor = crHourGlass
    DesignConnection = False
    LogonUsername = 'scott'
    LogonPassword = 'tiger'
    ThreadSafe = False
    Preferences.FloatPrecision = 0
    Preferences.IntegerPrecision = 0
    Preferences.SmallIntPrecision = -1
    Preferences.UseOCI7 = False
    Preferences.ConvertCRLF = True
    Preferences.TrimStringFields = True
    Preferences.MaxStringFieldSize = 255
    Preferences.ZeroDateIsNull = True
    Connected = False
    RollbackOnDisconnect = False
    NullValue = nvUnAssigned
    SQLTrace = stUnchanged
    OptimizerGoal = ogUnchanged
    IsolationLevel = ilUnchanged
    BytesPerCharacter = bc1Byte
    Left = 56
    Top = 16
  end
  object OracleLogon: TOracleLogon
    Session = OracleSession
    Retries = 2
    Options = [ldAuto, ldDatabase, ldDatabaseList]
    AliasDropDownCount = 8
    HistorySize = 6
    HistoryWithPassword = False
    Left = 56
    Top = 76
  end
  object EmpDataSet: TOracleDataSet
    SQL.Strings = (
      'select emp.*, emp.rowid from emp'
      'where deptno = :deptno')
    ReadBuffer = 25
    Optimize = True
    Debug = False
    Variables.Data = {0300000001000000070000003A444550544E4F030000000000000000000000}
    StringFieldsOnly = False
    SequenceField.ApplyMoment = amOnPost
    OracleDictionary.EnforceConstraints = False
    OracleDictionary.UseMessageTable = False
    OracleDictionary.DefaultValues = False
    OracleDictionary.DynamicDefaults = False
    OracleDictionary.FieldKinds = True
    OracleDictionary.DisplayFormats = True
    OracleDictionary.RangeValues = True
    QBEDefinition.SaveQBEValues = True
    QBEDefinition.AllowFileWildCards = True
    Cursor = crDefault
    Master = DeptDataSet
    MasterFields = 'DEPTNO'
    DetailFields = 'DEPTNO'
    ReadOnly = False
    LockingMode = lmLockDelayed
    QueryAllRecords = False
    CountAllRecords = False
    RefreshOptions = []
    OnTranslateMessage = TranslateMessage
    AfterQuery = AfterQuery
    CommitOnPost = False
    CachedUpdates = False
    QBEMode = False
    Session = OracleSession
    DesignActivation = False
    Active = False
    BeforePost = AfterPost
    Left = 164
    Top = 76
  end
  object DeptDataSet: TOracleDataSet
    SQL.Strings = (
      'select dept.*, dept.rowid from dept')
    ReadBuffer = 25
    Optimize = True
    Debug = False
    StringFieldsOnly = False
    SequenceField.ApplyMoment = amOnPost
    OracleDictionary.EnforceConstraints = False
    OracleDictionary.UseMessageTable = False
    OracleDictionary.DefaultValues = False
    OracleDictionary.DynamicDefaults = False
    OracleDictionary.FieldKinds = True
    OracleDictionary.DisplayFormats = True
    OracleDictionary.RangeValues = True
    QBEDefinition.SaveQBEValues = True
    QBEDefinition.AllowFileWildCards = True
    Cursor = crDefault
    ReadOnly = False
    LockingMode = lmLockDelayed
    QueryAllRecords = False
    CountAllRecords = False
    RefreshOptions = []
    OnTranslateMessage = TranslateMessage
    AfterQuery = AfterQuery
    CommitOnPost = False
    CachedUpdates = False
    QBEMode = False
    Session = OracleSession
    DesignActivation = False
    Active = False
    BeforePost = AfterPost
    Left = 164
    Top = 16
  end
  object DeptProvider: TDataSetProvider
    DataSet = DeptDataSet
    Constraints = True
    Options = [poIncFieldProps]
    Left = 272
    Top = 16
  end
end