midasservimpl.~dfm

来自「多层数据库」· ~DFM 代码 · 共 48 行

object midasserv: Tmidasserv
  OldCreateOrder = False
  OnDestroy = CRemoteDataModuleDestroy
  Left = 196
  Top = 111
  Height = 321
  Width = 215
  object Database1: TDatabase
    AliasName = 'midas'
    Connected = True
    DatabaseName = 'db'
    SessionName = 'Default'
    Left = 40
    Top = 24
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = Table1
    Constraints = True
    BeforeGetRecords = DataSetProvider1BeforeGetRecords
    Left = 40
    Top = 80
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 112
    Top = 80
  end
  object Table2: TTable
    DatabaseName = 'BCDEMOS'
    TableName = 'country.db'
    Left = 32
    Top = 152
  end
  object DataSetProvider2: TDataSetProvider
    DataSet = Table2
    Constraints = True
    OnGetData = DataSetProvider2GetData
    Left = 112
    Top = 152
  end
  object Table1: TTable
    DatabaseName = 'db'
    TableName = 'serv.DB'
    Left = 104
    Top = 24
  end
end