object DataModuleImpresiones: TDataModuleImpresiones OldCreateOrder = True OnCreate = DAClientDataModuleCreate RemoteService = RORemoteService Adapter = DABinAdapter SchemaCall.MethodName = 'GetSchemaAsXML' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtString end> Height = 414 Width = 518 object RORemoteService: TRORemoteService ServiceName = 'srvImpresiones' Message = ROBinMessage1 Channel = ROWinInetHTTPChannel1 Left = 48 Top = 24 end object DABinAdapter: TDABINAdapter Left = 48 Top = 80 end object DADesigntimeCall1: TDADesigntimeCall RemoteRequest.MethodName = 'Login' RemoteRequest.Params = < item Name = 'Result' ParamType = fResult DataType = rtBoolean end item Name = 'User' ParamType = fIn DataType = rtString Value = 'Administrador' end item Name = 'Password' ParamType = fIn DataType = rtString Value = '1' end item Name = 'LoginInfo' ParamType = fOut DataType = rtUserDefined UserClassName = 'TRdxLoginInfo' end> RemoteService = LoginRemoteService Left = 48 Top = 160 end object LoginRemoteService: TRORemoteService ServiceName = 'srvLogin' Message = ROBinMessage1 Channel = ROWinInetHTTPChannel1 Left = 48 Top = 216 end object ROWinInetHTTPChannel1: TROWinInetHTTPChannel ServerLocators = <> DispatchOptions = [] ProbeServers = False ProbeFrequency = 60000 UserAgent = 'RemObjects SDK' TargetURL = 'http://localhost:8099/bin' Left = 48 Top = 272 end object ROBinMessage1: TROBinMessage Left = 48 Top = 324 end end