udmclientdemo.dfm

来自「delphi多层应用系统 delphi多层应用系统」· DFM 代码 · 共 82 行

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 140
  Top = 145
  Height = 375
  Width = 544
  object DCOMConnection1: TDCOMConnection
    Connected = True
    ServerGUID = '{108D3DE3-835F-11D3-8DB9-0080C8518D0A}'
    ServerName = 'PMDDemoServer.MDDemoServer'
    Left = 64
    Top = 16
  end
  object ClientDataSet1: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCustomerSales'
    RemoteServer = DCOMConnection1
    Left = 192
    Top = 16
    object ClientDataSet1CUST_NO: TIntegerField
      FieldName = 'CUST_NO'
    end
    object ClientDataSet1CUSTOMER: TStringField
      FieldName = 'CUSTOMER'
      Size = 25
    end
    object ClientDataSet1CONTACT_FIRST: TStringField
      FieldName = 'CONTACT_FIRST'
      Size = 15
    end
    object ClientDataSet1CONTACT_LAST: TStringField
      FieldName = 'CONTACT_LAST'
    end
    object ClientDataSet1PHONE_NO: TStringField
      FieldName = 'PHONE_NO'
    end
    object ClientDataSet1ADDRESS_LINE1: TStringField
      FieldName = 'ADDRESS_LINE1'
      Size = 30
    end
    object ClientDataSet1ADDRESS_LINE2: TStringField
      FieldName = 'ADDRESS_LINE2'
      Size = 30
    end
    object ClientDataSet1CITY: TStringField
      FieldName = 'CITY'
      Size = 25
    end
    object ClientDataSet1STATE_PROVINCE: TStringField
      FieldName = 'STATE_PROVINCE'
      Size = 15
    end
    object ClientDataSet1COUNTRY: TStringField
      FieldName = 'COUNTRY'
      Size = 15
    end
    object ClientDataSet1POSTAL_CODE: TStringField
      FieldName = 'POSTAL_CODE'
      Size = 12
    end
    object ClientDataSet1ON_HOLD: TStringField
      FieldName = 'ON_HOLD'
      FixedChar = True
      Size = 1
    end
    object ClientDataSet1qurySales: TDataSetField
      FieldName = 'qurySales'
      IncludeObjectField = False
    end
  end
  object ClientDataSet2: TClientDataSet
    Active = True
    Aggregates = <>
    DataSetField = ClientDataSet1qurySales
    Params = <>
    Left = 64
    Top = 104
  end
end