udmclientdemo.dfm

来自「就是这本书的随书代码。包括《实战Delphi 5.x-分布式多层应用系统篇》」· DFM 代码 · 共 26 行

object DataModule1: TDataModule1
  OldCreateOrder = False
  Height = 0
  Width = 0
  object DCOMConnection1: TDCOMConnection
    Connected = True
    ServerGUID = '{29513183-518A-11D3-8DA6-0080C8F5F5FC}'
    ServerName = 'PEasyDCOMServer.EasyDCOMServer'
    ComputerName = 'Lwdomain'
    Left = 64
    Top = 16
  end
  object ClientDataSet1: TClientDataSet
    Active = True
    Aggregates = <>
    PacketRecords = 10
    Params = <>
    ProviderName = 'DataSetProvider1'
    RemoteServer = DCOMConnection1
    AfterPost = ClientDataSet1AfterPost
    AfterApplyUpdates = ClientDataSet1AfterApplyUpdates
    Left = 64
    Top = 120
  end
end