object AsyncClientMainForm: TAsyncClientMainForm Left = 69 Top = 77 BorderStyle = bsDialog Caption = 'Async Client' ClientHeight = 268 ClientWidth = 241 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 Label1: TLabel Left = 32 Top = 11 Width = 35 Height = 13 Caption = 'Value 1' end object Label2: TLabel Left = 32 Top = 35 Width = 35 Height = 13 Caption = 'Value 2' end object Label3: TLabel Left = 32 Top = 59 Width = 20 Height = 13 Caption = 'Sum' end object Label4: TLabel Left = 32 Top = 248 Width = 35 Height = 13 Caption = 'Status:' end object lbl_Status: TLabel Left = 72 Top = 248 Width = 3 Height = 13 end object ed_Value1: TEdit Left = 80 Top = 8 Width = 121 Height = 21 TabOrder = 0 Text = '5' end object ed_Value2: TEdit Left = 80 Top = 32 Width = 121 Height = 21 TabOrder = 1 Text = '8' end object CalcLiveButton: TButton Left = 32 Top = 88 Width = 169 Height = 25 Caption = 'Calc Live (This will take 10 secs!)' TabOrder = 2 OnClick = CalcLiveButtonClick end object CalcAsyncHttpButton: TButton Left = 32 Top = 128 Width = 169 Height = 25 Caption = 'Calc Async (HTTP)' TabOrder = 3 OnClick = CalcAsyncHttpButtonClick end object GetResultButton: TButton Left = 32 Top = 213 Width = 169 Height = 25 Caption = 'Retrieve Result' Enabled = False TabOrder = 4 OnClick = GetResultButtonClick end object ed_Result: TEdit Left = 80 Top = 56 Width = 121 Height = 21 ParentColor = True ReadOnly = True TabOrder = 5 end object CheckForAnswerBytton: TButton Left = 32 Top = 188 Width = 169 Height = 25 Caption = 'Check if Answer is Available' Enabled = False TabOrder = 6 OnClick = CheckForAnswerByttonClick end object CalcAsyncUdpButton: TButton Left = 32 Top = 153 Width = 169 Height = 25 Caption = 'Calc Async (UDP)' TabOrder = 7 OnClick = CalcAsyncUdpButtonClick end object ROBINMessage1: TROBinMessage end object ROWinInetHTTPChannel1: TROWinInetHTTPChannel ServerLocators = <> DispatchOptions = [] UserAgent = 'RemObjects SDK' TargetURL = 'http://localhost:8099/bin' Top = 32 end object ROIndyUDPChannel1: TROIndyUDPChannel ServerLocators = <> DispatchOptions = [] AsyncTimeOut = 50000 Retrys = 5 IndyClient.Port = 8098 Port = 8098 Top = 64 end end