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