david
0cbd2a5477
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@49 b6239004-a887-0f4b-9937-50029ccdca16
118 lines
3.0 KiB
Plaintext
118 lines
3.0 KiB
Plaintext
object ReducedDeltaClientDataModule: TReducedDeltaClientDataModule
|
|
OldCreateOrder = True
|
|
Left = 439
|
|
Top = 220
|
|
Height = 300
|
|
Width = 300
|
|
object Channel: TROWinInetHTTPChannel
|
|
UserAgent = 'RemObjects SDK'
|
|
TargetURL = 'http://localhost:8099/BIN'
|
|
ServerLocators = <>
|
|
DispatchOptions = []
|
|
Left = 40
|
|
Top = 8
|
|
end
|
|
object Message: TROBinMessage
|
|
Left = 40
|
|
Top = 52
|
|
end
|
|
object RemoteService: TRORemoteService
|
|
Message = Message
|
|
Channel = Channel
|
|
ServiceName = 'ReducedDeltaService'
|
|
Left = 40
|
|
Top = 96
|
|
end
|
|
object DataStreamer: TDABin2DataStreamer
|
|
Left = 40
|
|
Top = 140
|
|
end
|
|
object RemoteDataAdapter: TDARemoteDataAdapter
|
|
GetSchemaCall.RemoteService = RemoteService
|
|
GetDataCall.RemoteService = RemoteService
|
|
UpdateDataCall.RemoteService = RemoteService
|
|
GetScriptsCall.RemoteService = RemoteService
|
|
RemoteService = RemoteService
|
|
DataStreamer = DataStreamer
|
|
Left = 40
|
|
Top = 184
|
|
end
|
|
object tbl_Customers: TDAMemDataTable
|
|
RemoteUpdatesOptions = []
|
|
Fields = <
|
|
item
|
|
Name = 'CustomerID'
|
|
DataType = datWideString
|
|
Size = 5
|
|
Required = True
|
|
InPrimaryKey = True
|
|
end
|
|
item
|
|
Name = 'CompanyName'
|
|
DataType = datWideString
|
|
Size = 40
|
|
Required = True
|
|
end
|
|
item
|
|
Name = 'ContactName'
|
|
DataType = datWideString
|
|
Size = 30
|
|
end
|
|
item
|
|
Name = 'ContactTitle'
|
|
DataType = datWideString
|
|
Size = 30
|
|
end
|
|
item
|
|
Name = 'Address'
|
|
DataType = datWideString
|
|
Size = 60
|
|
end
|
|
item
|
|
Name = 'City'
|
|
DataType = datWideString
|
|
Size = 15
|
|
end
|
|
item
|
|
Name = 'Region'
|
|
DataType = datWideString
|
|
Size = 15
|
|
end
|
|
item
|
|
Name = 'PostalCode'
|
|
DataType = datWideString
|
|
Size = 10
|
|
end
|
|
item
|
|
Name = 'Country'
|
|
DataType = datWideString
|
|
Size = 15
|
|
end
|
|
item
|
|
Name = 'Phone'
|
|
DataType = datWideString
|
|
Size = 24
|
|
end
|
|
item
|
|
Name = 'Fax'
|
|
DataType = datWideString
|
|
Size = 24
|
|
end>
|
|
Params = <>
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
|
RemoteDataAdapter = RemoteDataAdapter
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
LogicalName = 'Customers'
|
|
IndexDefs = <>
|
|
Left = 128
|
|
Top = 120
|
|
end
|
|
object ds_Customers: TDADataSource
|
|
DataSet = tbl_Customers.Dataset
|
|
DataTable = tbl_Customers
|
|
Left = 136
|
|
Top = 128
|
|
end
|
|
end
|