david
2824855ea7
- Recompilación en Delphi10 de todos los paquetes de RO para generar las DCU's en Lib\D10 - Recompilación en Delphi10 de todos los paquetes de DA para generar las DCU's en Lib\D10 git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@9 b6239004-a887-0f4b-9937-50029ccdca16
143 lines
3.0 KiB
Plaintext
143 lines
3.0 KiB
Plaintext
object FirstSampleClientMainForm: TFirstSampleClientMainForm
|
|
Left = 226
|
|
Top = 109
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsSingle
|
|
Caption = 'FirstSample Client'
|
|
ClientHeight = 517
|
|
ClientWidth = 318
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -14
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
PixelsPerInch = 120
|
|
TextHeight = 16
|
|
object GroupBox1: TGroupBox
|
|
Left = 11
|
|
Top = 10
|
|
Width = 297
|
|
Height = 277
|
|
Caption = 'Get Nickname(s) by Full Name'
|
|
TabOrder = 0
|
|
object eFullname: TEdit
|
|
Left = 10
|
|
Top = 26
|
|
Width = 160
|
|
Height = 21
|
|
TabOrder = 0
|
|
Text = 'Carla Simon'
|
|
end
|
|
object NamesBox: TListBox
|
|
Left = 10
|
|
Top = 59
|
|
Width = 160
|
|
Height = 201
|
|
ItemHeight = 16
|
|
TabOrder = 1
|
|
end
|
|
object GetButton: TButton
|
|
Left = 177
|
|
Top = 23
|
|
Width = 96
|
|
Height = 31
|
|
Caption = 'Get'
|
|
TabOrder = 2
|
|
OnClick = GetButtonClick
|
|
end
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
Left = 11
|
|
Top = 295
|
|
Width = 297
|
|
Height = 62
|
|
Caption = 'Check if Nickname exists'
|
|
TabOrder = 1
|
|
object eNickname: TEdit
|
|
Left = 10
|
|
Top = 25
|
|
Width = 160
|
|
Height = 21
|
|
TabOrder = 0
|
|
Text = 'Maria'
|
|
end
|
|
object CheckButton: TButton
|
|
Left = 183
|
|
Top = 20
|
|
Width = 93
|
|
Height = 30
|
|
Caption = 'Check'
|
|
TabOrder = 1
|
|
OnClick = CheckButtonClick
|
|
end
|
|
end
|
|
object GroupBox3: TGroupBox
|
|
Left = 11
|
|
Top = 364
|
|
Width = 297
|
|
Height = 139
|
|
Caption = 'Check that nickname and Full Name match'
|
|
TabOrder = 2
|
|
object Label1: TLabel
|
|
Left = 10
|
|
Top = 71
|
|
Width = 64
|
|
Height = 16
|
|
Caption = 'Full Name:'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 10
|
|
Top = 20
|
|
Width = 64
|
|
Height = 16
|
|
Caption = 'Nickname:'
|
|
end
|
|
object eFullname2: TEdit
|
|
Left = 10
|
|
Top = 95
|
|
Width = 160
|
|
Height = 21
|
|
TabOrder = 1
|
|
Text = 'Maria Anders'
|
|
end
|
|
object eNickname2: TEdit
|
|
Left = 10
|
|
Top = 41
|
|
Width = 160
|
|
Height = 21
|
|
TabOrder = 0
|
|
Text = 'Maria'
|
|
end
|
|
object VerifyButton: TButton
|
|
Left = 187
|
|
Top = 58
|
|
Width = 92
|
|
Height = 31
|
|
Caption = 'Verify'
|
|
TabOrder = 2
|
|
OnClick = VerifyButtonClick
|
|
end
|
|
end
|
|
object ROBinMessage: TROBinMessage
|
|
Left = 184
|
|
Top = 64
|
|
end
|
|
object ROWinInetHTTPChannel: TROWinInetHTTPChannel
|
|
ServerLocators = <>
|
|
DispatchOptions = []
|
|
UserAgent = 'RemObjects SDK'
|
|
TargetURL = 'http://localhost:8099/BIN'
|
|
Left = 184
|
|
Top = 96
|
|
end
|
|
object RORemoteService: TRORemoteService
|
|
ServiceName = 'FirstSampleService'
|
|
Message = ROBinMessage
|
|
Channel = ROWinInetHTTPChannel
|
|
Left = 184
|
|
Top = 128
|
|
end
|
|
end
|