object ClientDataModule: TClientDataModule OldCreateOrder = True Left = 170 Top = 167 Height = 337 Width = 300 object Channel: TROWinInetHTTPChannel UserAgent = 'RemObjects SDK' TargetURL = 'http://localhost:8099/BIN' TrustInvalidCA = False ServerLocators = <> DispatchOptions = [] Left = 40 Top = 8 end object Message: TROBinMessage Envelopes = <> Left = 40 Top = 52 end object RemoteService: TRORemoteService Message = Message Channel = Channel ServiceName = 'DASampleService' Left = 40 Top = 96 end object DataStreamer: TDABin2DataStreamer Left = 40 Top = 140 end object RemoteDataAdapter: TDARemoteDataAdapter DataStreamer = DataStreamer GetSchemaCall.RemoteService = RemoteService GetDataCall.RemoteService = RemoteService UpdateDataCall.RemoteService = RemoteService GetScriptsCall.RemoteService = RemoteService RemoteService = RemoteService Left = 40 Top = 184 end object drLoginRequest: TRODynamicRequest RemoteService = RemoteService MethodName = 'Login' Params = < item Name = 'aPlatform' DataType = rtUserDefined Flag = fIn TypeName = 'PlatformEnum' Value = Null end item Name = 'aName' DataType = rtWidestring Flag = fIn end> Left = 40 Top = 232 end object tbl_Workers: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'WorkerID' DataType = datLargeAutoInc GeneratorName = 'SALESMEN_ID_GEN' Required = True InPrimaryKey = True end item Name = 'WorkerLastName' DataType = datWideString Size = 20 Required = True DisplayLabel = 'LastName' end item Name = 'WorkerFirstName' DataType = datWideString Size = 10 Required = True DisplayLabel = 'FirstName' end item Name = 'WorkerBirthDate' DataType = datDateTime DisplayLabel = 'BirthDate' end item Name = 'WorkerHireDate' DataType = datDateTime DisplayLabel = 'HireDate' end item Name = 'WorkerPosition' DataType = datWideString Size = 30 DisplayLabel = 'Position' end item Name = 'WorkerAddress' DataType = datWideString Size = 60 DisplayLabel = 'Address' end item Name = 'WorkerCity' DataType = datWideString Size = 15 DisplayLabel = 'City' end item Name = 'WorkerZip' DataType = datWideString Size = 10 DisplayLabel = 'Zip' end item Name = 'WorkerCountry' DataType = datWideString Size = 15 DisplayLabel = 'Country' end item Name = 'WorkerPhone' DataType = datWideString Size = 24 DisplayLabel = 'Phone' end item Name = 'WorkerPhoto' DataType = datBlob DisplayLabel = 'Photo' end item Name = 'WorkerNotes' DataType = datWideMemo DisplayLabel = 'Notes' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = RemoteDataAdapter LogicalName = 'Workers' IndexDefs = <> Left = 128 Top = 8 end object ds_Workers: TDADataSource DataSet = tbl_Workers.Dataset DataTable = tbl_Workers Left = 200 Top = 8 end object tbl_Dynamic: TDAMemDataTable RemoteUpdatesOptions = [] Fields = <> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = RemoteDataAdapter IndexDefs = <> Left = 128 Top = 56 end object ds_Dynamic: TDADataSource DataSet = tbl_Dynamic.Dataset DataTable = tbl_Dynamic Left = 200 Top = 56 end end