Componentes.Terceros.RemObjects/official/5.0.23.613/Data Abstract for Delphi/Samples/Calculated Fields/CalcFields_ClientData.dfm

object CalcFields_ClientDataForm: TCalcFields_ClientDataForm
  OldCreateOrder = True
  OnCreate = DataModuleCreate
  Height = 300
  Width = 300
  object ROChannel: TROWinInetHTTPChannel
    UserAgent = 'RemObjects SDK'
    TargetURL = 'http://localhost:8099/BIN'
    ServerLocators = <>
    DispatchOptions = []
    Left = 42
    Top = 10
  end
  object ROMessage: TROBinMessage
    Left = 41
    Top = 52
  end
  object RORemoteService: TRORemoteService
    Message = ROMessage
    Channel = ROChannel
    ServiceName = 'CalcFieldsService'
    Left = 40
    Top = 95
  end
  object DARemoteDataAdapter: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    DataStreamer = DataStreamer
    FailureBehavior = fbBoth
    Left = 128
    Top = 82
  end
  object DataStreamer: TDABin2DataStreamer
    BufferSize = 262144
    SendReducedDelta = False
    Left = 40
    Top = 144
  end
  object tbl_Customers: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'CustomerID'
        DataType = datString
        Size = 5
        BlobType = dabtUnknown
        DecimalPrecision = 0
        DecimalScale = 0
        DisplayWidth = 0
        Alignment = taLeftJustify
        InPrimaryKey = True
        Calculated = False
        ServerCalculated = False
        OnChange = tbl_CustomersCustomerIDChange
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CompanyName'
        DataType = datString
        Size = 40
        BlobType = dabtUnknown
        DecimalPrecision = 0
        DecimalScale = 0
        DisplayWidth = 0
        Alignment = taLeftJustify
        InPrimaryKey = False
        Calculated = False
        ServerCalculated = False
        OnChange = tbl_CustomersCompanyNameChange
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'ClientCalculated'
        DataType = datString
        Size = 120
        BlobType = dabtUnknown
        DecimalPrecision = 0
        DecimalScale = 0
        LogChanges = False
        DisplayWidth = 50
        Alignment = taLeftJustify
        InPrimaryKey = False
        Calculated = True
        ServerCalculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'ServerCalculated'
        DataType = datInteger
        BlobType = dabtUnknown
        DecimalPrecision = 0
        DecimalScale = 0
        LogChanges = False
        DisplayWidth = 0
        ReadOnly = True
        Alignment = taLeftJustify
        InPrimaryKey = False
        Calculated = False
        ServerCalculated = False
        Lookup = False
        LookupCache = False
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = DARemoteDataAdapter
    OnCalcFields = tbl_CustomersCalcFields
    ReadOnly = False
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Customers'
    Left = 136
    Top = 136
  end
  object ds_Customers: TDADataSource
    DataSet = tbl_Customers.Dataset
    DataTable = tbl_Customers
    Left = 144
    Top = 144
  end
end