object fmain: Tfmain Left = 269 Height = 300 Top = 234 Width = 528 HorzScrollBar.Page = 527 VertScrollBar.Page = 299 ActiveControl = edtA Caption = '"calculator" service test' ClientHeight = 300 ClientWidth = 528 OnCreate = FormCreate object Label1: TLabel Left = 16 Height = 18 Top = 48 Width = 64 Caption = 'Param "A"' Color = clNone ParentColor = False end object Label2: TLabel Left = 17 Height = 18 Top = 80 Width = 64 Caption = 'Param "B"' Color = clNone ParentColor = False end object Label3: TLabel Left = 240 Height = 18 Top = 52 Width = 45 Caption = 'Format' Color = clNone ParentColor = False end object Label4: TLabel Left = 16 Height = 18 Top = 8 Width = 49 Caption = 'Address' Color = clNone ParentColor = False end object edtA: TEdit Left = 80 Height = 23 Top = 48 Width = 80 TabOrder = 0 Text = '5' end object edtB: TEdit Left = 80 Height = 23 Top = 80 Width = 80 TabOrder = 1 Text = '2' end object btnExec: TButton Left = 384 Height = 25 Top = 8 Width = 128 BorderSpacing.InnerBorder = 4 Caption = 'Execute' OnClick = btnExecClick TabOrder = 2 end object mmoLog: TMemo Height = 180 Top = 120 Width = 528 Align = alBottom Anchors = [akTop, akLeft, akRight, akBottom] Font.CharSet = ANSI_CHARSET Font.Color = clBlack Font.Height = -19 Font.Name = 'Courier New' Font.Pitch = fpFixed Lines.Strings = ( '' ) ScrollBars = ssBoth TabOrder = 3 end object edtFormat: TEdit Left = 288 Height = 23 Top = 50 Width = 80 TabOrder = 4 Text = 'SOAP' end object btnInit: TButton Left = 384 Height = 25 Top = 48 Width = 75 BorderSpacing.InnerBorder = 4 Caption = 'Init Obj' OnClick = btnInitClick TabOrder = 5 end object btnClearLog: TButton Left = 384 Height = 25 Top = 80 Width = 75 BorderSpacing.InnerBorder = 4 Caption = 'Clear Log' OnClick = btnClearLogClick TabOrder = 6 end object edtAddress: TEdit Left = 80 Height = 23 Top = 11 Width = 288 TabOrder = 7 Text = 'http:Address=http://127.0.0.1:8000/services/ICalculator' end end