Componentes.Terceros.RemObj.../internal/5.0.23.613/1/RemObjects SDK for Delphi/Samples/DataSnap/DataSnapClientMain.dfm
david 472097efe5 - Eliminadas las librerías para Delphi 6 (Dcu\D6) en RO y DA.
- Recompilación de todos los paquetes de RO para poner RemObjects_Core_D10 como paquete de runtime/designtime.

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@5 b6239004-a887-0f4b-9937-50029ccdca16
2007-09-10 11:08:08 +00:00

267 lines
11 KiB
Plaintext

object DataSnapClientMainForm: TDataSnapClientMainForm
Left = 320
Top = 215
Caption = 'RemObjects DataSnap Client'
ClientHeight = 325
ClientWidth = 502
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object ConnectButton: TBitBtn
Left = 8
Top = 8
Width = 113
Height = 25
Caption = 'Connect'
TabOrder = 0
OnClick = ConnectButtonClick
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FF811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00
811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00811E00811E00FF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FF811E0095440F811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00A7632F811E0081
1E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FF811E00BF8B62CCA17E811E00811E00FF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00D8
B69CE6D1BFE7D3C4811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FF811E00F0E2D9FCF7F2FAF0E6811E00811E
00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF81
1E00D8AF96F4E2CFF0D7BDD8A784811E00811E00FF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FF811E00F3DECAEFD4B8EBC9A7DAA67D811E00FF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF81
1E00E7BB92E3B081E0A672D5925A811E00FF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00DA995ED78F50D38441CF7B
35811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FF811E00811E00811E00811E00811E00811E00FF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
end
object DisconnectButton: TBitBtn
Left = 8
Top = 8
Width = 113
Height = 25
Caption = 'Disconnect'
TabOrder = 1
Visible = False
OnClick = DisconnectButtonClick
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FF00006E00006EFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00006E0000
6EFF00FFFF00FFFF00FFFF00FFFF00FF00006E001DE80010DC00006EFF00FFFF
00FFFF00FFFF00FF00006E0004E20008E700006EFF00FFFF00FFFF00FFFF00FF
00006E001AE2001FEB0010D900006EFF00FFFF00FF00006E0005DF0009EB0003
DB00006EFF00FFFF00FFFF00FFFF00FFFF00FF00006E001ADF0020EB0013DC00
006E00006E0005E2000BEB0004DA00006EFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FF00006E001BDF0022EB0012E60008EA0009EB0004DF00006EFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00006E001BE300
16EB0011EB000ADF00006EFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FF00006E0021E7001EEB001AEB0017DF00006EFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00006E062DE30430EB00
20E2001EE20027EB0019DF00006EFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FF00006E0C35E40E3CEB052BDC00006E00006E001FDC002AEB001CDF0000
6EFF00FFFF00FFFF00FFFF00FFFF00FF00006E1442E41645EB092ED900006EFF
00FFFF00FF00006E0020D9012CEB001FE200006EFF00FFFF00FFFF00FFFF00FF
00006E1C4BE71037DB00006EFF00FFFF00FFFF00FFFF00FF00006E0022DC0027
E400006EFF00FFFF00FFFF00FFFF00FFFF00FF00006E00006EFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FF00006E00006EFF00FFFF00FFFF00FFFF00FFFF00FF
FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
end
object ApplyUpdatesButton: TBitBtn
Left = 8
Top = 40
Width = 113
Height = 25
Caption = 'Apply Updates'
Enabled = False
TabOrder = 2
OnClick = ApplyUpdatesButtonClick
Glyph.Data = {
36060000424D3606000000000000360400002800000020000000100000000100
08000000000000020000130B0000130B0000000100000000000000000000FFFF
FF00F4F3F700E3E2E50095939600A09EA100B8B2BA00908B9100B5ADB600B4AD
B500FF00FF00726C7200D3CBD300D3CCD300BDB7BD00B5AFB500D9D3D900CFC9
CF0088848800CBC6CB00D8D3D800C1BDC1008482840082808200DCDADC007675
76008F8E8F00C5BDC400E1DAE000F4EFF300807777007A7979008E5D59008050
4B0095645B00A0675B009362530091756C00D1926D00C7916F00D1987000C699
7700DCA37600E2873100E6974300FFE7CC00FFD9AC00FFDEB700FFE2C000FFE5
C500FFEAD100FFEBD400FFF4E700FFD99E00FFDDA600FFDEA900FFE5B600FFE7
BA00FFEAC200FFDE9900FFF2D000FBFAF700FFFCEE00FFFEE700FFFFE000DDE0
D900416560004C4F4F00575959009FA1A1008E9090007E808000FCFEFE00C5C7
C700787979006D6E6E00393B3C00484A4B0047494A004E5051005C5E5F005456
57006A6C6D0063656600606263002187E300248BEA00A9B7C4001676D9001770
CA001F8AF300134E87003477BC00393A3B001581F6001684FC001166C4001260
B600165FB0001C4B80002F6BAC005481B200566A7F004F5A6600C4D4E6000A6E
EA000B5EC4000A52A9001069CF00165EB6002B5E9A0021456E002A4A6F003050
7500D9E3EF000A6EEB0009428C000C4186000E4B99000C4184000F4488000F43
87001D4A83001D4373000555C5000548A60041567600494A4C004D4E5000F3F4
F600797A7D0082838600939396007070720068686A009F9FA0008B8B8B008484
8400787878006A6A6A00B8020000000000000000000000000000107212008C72
1200240000008333F4002192E400B8020000347212003C721200080000000E00
0000A4741200000000000001000008000000FC71120000010000248512008333
F4002192E400B80200008333F4002192E400B802000078721200807212000800
00000E000000A474120000FFFF0001000000B802000000010000000000000000
000000000000000100000000000000000000000000000000000000010000B7C8
0300B802000000FFFF000000000001000000653B0100B802000000FFFF000100
0000FFE1FF00A474120000FFFF000100000064CA1200988D290030851200F048
BD00010000003B00000000000000424D68000000000000006600000028000000
100000001000000001000800000000000000000012000000120000008C000000
8C00000000000000FF00FF00F400F700E300E50095009600A000A100B8000400
00009100B500B600B40000000000FF0072007200D300B838FA00D300BD002000
0000B50000000000C700547112008800CB0024851200345AF4007095F800FFFF
FF00F373F40026BBBB000000C700000000001400000064CA1200140000002FCA
030058991600A0C701005899160064CA1200988D2900C86DD1000A0A0A0A0A0A
0A0A20202020202020200A0A0A0A0A0A0A0A88888888888888880A0A0A7F8043
0A0A20403A3837353B210A0A0A4686860A0A88180D11491515470A0A4D51860B
4E5D223E32312F2E36210A0A1A0416128A864603140D114949470A4D166F7E42
5B60586C64492D3039210A1A06881917191A0446040D1D0D11474D071B757D6B
5A56625C6D7657333C211A0E18888A4745451287881F491414474D0C0F78695E
5563254872656E343F211A030D8804454553040314091A1C1C474D110979735F
597027010101683D41211A1C0D8804450453091D1D1D130311474D0D08777C6A
61741E010101012323241A030D8816121250041D1D1D1D0404884D10067B7A71
66672901010101232C2B1A0314881F4789190F1D1D1D1D0445044D1C0E51834B
898B2A2626262623280A1A031404871287890E0F0F0F0F040F0A4D1D13518285
881F8A4C0A0A0A0A0A0A1A811C0409090E0F151A0A0A0A0A0A0A4D1804514544
50191A4E0A0A0A0A0A0A1A03150449878709151A0A0A0A0A0A0A4D8718844A47
4653544D0A0A0A0A0A0A1A490315090F1545871A0A0A0A0A0A0A4D0181031505
1217174F0A0A0A0A0A0A1A48021D1849060F0F040A0A0A0A0A0A524D01010214
054D4D0A0A0A0A0A0A0A451A48480203491A1A0A0A0A0A0A0A0A0A0A4D4D4D4D
4D0A0A0A0A0A0A0A0A0A0A0A1A1A1A1A1A0A0A0A0A0A0A0A0A0A}
NumGlyphs = 2
end
object Panel1: TPanel
Left = 127
Top = 0
Width = 375
Height = 325
Align = alRight
Anchors = [akLeft, akTop, akRight, akBottom]
BevelOuter = bvNone
TabOrder = 3
object Splitter1: TSplitter
Left = 0
Top = 140
Width = 375
Height = 8
Cursor = crVSplit
Align = alTop
Beveled = True
end
object gProducts: TDBGrid
Left = 0
Top = 148
Width = 375
Height = 177
Align = alClient
DataSource = dsProducts
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
object gCustomers: TDBGrid
Left = 0
Top = 0
Width = 375
Height = 140
Align = alTop
DataSource = dsCustomers
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Tahoma'
TitleFont.Style = []
end
end
object RODataSnapConnection: TRODataSnapConnection
Message = ROBinMessage
Channel = HTTPChannel
ServerName = 'IAppServer'
Left = 8
Top = 128
end
object HTTPChannel: TROWinInetHTTPChannel
UserAgent = 'RemObjects SDK'
TargetURL = 'http://localhost:81/bin'
ServerLocators = <>
DispatchOptions = []
Left = 8
Top = 160
end
object ROBinMessage: TROBinMessage
UseCompression = False
Left = 8
Top = 224
end
object cdsCustomers: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'Customers'
RemoteServer = RODataSnapConnection
AfterEdit = OnEnableApplyUpdates
AfterPost = OnEnableApplyUpdates
AfterCancel = OnEnableApplyUpdates
AfterDelete = OnEnableApplyUpdates
BeforeApplyUpdates = cdsCustomersBeforeApplyUpdates
BeforeGetRecords = cdsCustomersBeforeGetRecords
BeforeRowRequest = cdsCustomersBeforeRowRequest
BeforeGetParams = cdsCustomersBeforeGetParams
Left = 48
Top = 128
end
object dsCustomers: TDataSource
DataSet = cdsCustomers
Left = 48
Top = 160
end
object cdsProducts: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'Products'
RemoteServer = RODataSnapConnection
AfterEdit = OnEnableApplyUpdates
AfterPost = OnEnableApplyUpdates
AfterCancel = OnEnableApplyUpdates
AfterDelete = OnEnableApplyUpdates
BeforeApplyUpdates = cdsCustomersBeforeApplyUpdates
BeforeGetRecords = cdsCustomersBeforeGetRecords
BeforeRowRequest = cdsCustomersBeforeRowRequest
BeforeGetParams = cdsCustomersBeforeGetParams
Left = 88
Top = 129
end
object dsProducts: TDataSource
DataSet = cdsProducts
Left = 88
Top = 160
end
object ROSOAPMessage: TROSOAPMessage
SerializationOptions = [xsoWriteMultiRefArray, xsoWriteMultiRefObject]
Left = 40
Top = 224
end
end