Componentes.Terceros.RemObj.../internal/5.0.23.613/1/RemObjects SDK for Delphi/Samples/Variants/VariantsClientMain.dfm
david d99a44999f - Modificación del paquete RemObjects_Core_D10 para que sea un paquete de runtime/designtime (antes era designtime sólo)
- Recompilación en Delphi10 de todos los paquetes de RO para generar las DCU's en Lib\D10

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@7 b6239004-a887-0f4b-9937-50029ccdca16
2007-09-10 13:36:58 +00:00

71 lines
1.5 KiB
Plaintext

object VariantsClientMainForm: TVariantsClientMainForm
Left = 102
Top = 118
AutoScroll = False
Caption = 'Variants Client'
ClientHeight = 220
ClientWidth = 328
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object TestButton: TButton
Left = 8
Top = 8
Width = 75
Height = 25
Caption = 'Test Variants'
TabOrder = 0
OnClick = TestButtonClick
end
object Memo: TMemo
Left = 0
Top = 81
Width = 328
Height = 139
Align = alBottom
ScrollBars = ssVertical
TabOrder = 1
end
object rgMessageType: TRadioGroup
Left = 96
Top = 0
Width = 225
Height = 73
Caption = 'Message'
TabOrder = 2
OnClick = rgMessageTypeClick
end
object BINMessage: TROBinMessage
Left = 204
Top = 96
end
object HTTPChannel: TROWinInetHTTPChannel
ServerLocators = <>
DispatchOptions = []
UserAgent = 'RemObjects SDK'
TargetURL = 'http://localhost:8099/BIN'
Left = 176
Top = 96
end
object RORemoteService: TRORemoteService
Message = BINMessage
Channel = HTTPChannel
ServiceName = 'NewService'
Left = 232
Top = 96
end
object SOAPMessage: TROSOAPMessage
SerializationOptions = [xsoWriteMultiRefArray, xsoWriteMultiRefObject]
Left = 144
Top = 96
end
end