object dmUsuarios: TdmUsuarios OldCreateOrder = True OnCreate = DAClientDataModuleCreate Height = 340 Width = 423 object ROLoginService: TRORemoteService Message = dmBase.ROMessage Channel = dmBase.ROChannel ServiceName = 'srvLogin' Left = 56 Top = 40 end object tbl_Usuarios: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datString Size = 8 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = True Calculated = False ServerCalculated = False Lookup = False LookupCache = False end> Params = <> MasterMappingMode = mmDataRequest StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = DARemoteDataAdapter ReadOnly = False DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'Usuarios' IndexDefs = <> Left = 176 Top = 40 end object ds_Usuarios: TDADataSource DataSet = tbl_Usuarios.Dataset DataTable = tbl_Usuarios Left = 280 Top = 40 end object DARemoteDataAdapter: TDARemoteDataAdapter GetSchemaCall.RemoteService = ROLoginService GetSchemaCall.MethodName = 'GetSchemaAsXML' GetSchemaCall.Params = < item Name = 'Result' DataType = rtString Flag = fResult end> GetSchemaCall.Default = False GetSchemaCall.IncomingSchemaParameter = 'Result' GetSchemaCall.OutgoingFilterParameter = 'aFilter' GetDataCall.RemoteService = ROLoginService GetDataCall.MethodName = 'GetDatasetData' GetDataCall.Params = < item Name = 'DatasetName' DataType = rtString Flag = fIn end item Name = 'Params' DataType = rtString Flag = fIn end item Name = 'IncludeSchema' DataType = rtBoolean Flag = fIn end item Name = 'MaxRecords' DataType = rtInteger Flag = fIn end item Name = 'Result' DataType = rtBinary Flag = fResult end> GetDataCall.Default = False GetDataCall.OutgoingTableNamesParameter = 'DatasetName' GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray' GetDataCall.IncomingDataParameter = 'Result' GetDataCall.OutgoingParamsParameter = 'Params' GetDataCall.OutgoingIncludeSchemaParameter = 'IncludeSchema' GetDataCall.OutgoingMaxRecordsParameter = 'MaxRecords' UpdateDataCall.RemoteService = ROLoginService UpdateDataCall.MethodName = 'UpdateData' UpdateDataCall.Params = < item Name = 'Delta' DataType = rtBinary Flag = fIn end item Name = 'Result' DataType = rtBinary Flag = fResult end> UpdateDataCall.Default = False UpdateDataCall.OutgoingDeltaParameter = 'Delta' UpdateDataCall.IncomingDeltaParameter = 'Result' GetScriptsCall.RemoteService = ROLoginService GetScriptsCall.MethodName = 'GetDatasetScripts' GetScriptsCall.Params = < item Name = 'DatasetNames' DataType = rtString Flag = fIn end item Name = 'Result' DataType = rtString Flag = fResult end> GetScriptsCall.Default = False GetScriptsCall.OutgoingTableNamesParameter = 'DatasetNames' GetScriptsCall.IncomingScriptParameter = 'Result' RemoteService = ROLoginService DataStreamer = dmBase.DABINAdapter FailureBehavior = fbBoth Left = 56 Top = 104 end end