object xMethodsMainForm: TxMethodsMainForm
  Left = 320
  Top = 165
  AutoScroll = False
  Caption = 'RemObjects SDK - XMethods Client'
  ClientHeight = 392
  ClientWidth = 797
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 797
    Height = 392
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 5
    Caption = 'Panel1'
    TabOrder = 0
    object pc_Pages: TPageControl
      Left = 5
      Top = 5
      Width = 787
      Height = 382
      ActivePage = ts_Home
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      MultiLine = True
      ParentFont = False
      TabIndex = 0
      TabOrder = 0
      object ts_Home: TTabSheet
        BorderWidth = 5
        Caption = 'Welcome'
        ImageIndex = 9
        object RoPoweredByRemObjectsButton1: TROPoweredByRemObjectsButton
          Left = 278
          Top = 285
          Width = 212
          Height = 48
          Cursor = crHandPoint
          Anchors = [akLeft, akBottom]
          ApplicationType = atClient
        end
        object ScrollBox1: TScrollBox
          Left = 0
          Top = 0
          Width = 769
          Height = 266
          Align = alTop
          Anchors = [akLeft, akTop, akRight, akBottom]
          Color = clCream
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -15
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentColor = False
          ParentFont = False
          TabOrder = 0
          DesignSize = (
            765
            262)
          object Label34: TLabel
            Left = 6
            Top = 70
            Width = 47
            Height = 18
            Caption = 'NOTE!'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label33: TLabel
            Left = 6
            Top = 27
            Width = 747
            Height = 36
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 
              'This demo application shows how to access existing SOAP Web Serv' +
              'ices using the RemObjects SDK.'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
            WordWrap = True
          end
          object Label32: TLabel
            Left = 6
            Top = 6
            Width = 299
            Height = 18
            Caption = 'Welcome to the XMethods Client Sample'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label35: TLabel
            Left = 6
            Top = 95
            Width = 747
            Height = 36
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 
              'The Web Services accessed by this demo are provided by third par' +
              'ties and not controlled or maintained by RemObjects Software.'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
            WordWrap = True
          end
          object Label36: TLabel
            Left = 6
            Top = 141
            Width = 747
            Height = 54
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 
              'Any of these services may become unavailable or unusable at any ' +
              'time. If a service is not accessible or returns unexpected resul' +
              'ts, this is not neccessarily due to a problem with RemObjects SD' +
              'K.'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
            WordWrap = True
          end
          object Label37: TLabel
            Left = 6
            Top = 222
            Width = 373
            Height = 18
            Caption = 'Please visit the XMethods website for further information:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = []
            ParentFont = False
          end
          object Label38: TLabel
            Left = 387
            Top = 222
            Width = 176
            Height = 18
            Cursor = crHandPoint
            Caption = 'http://www.xmethods.com'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlue
            Font.Height = -15
            Font.Name = 'Tahoma'
            Font.Style = [fsUnderline]
            ParentFont = False
            OnClick = Label38Click
          end
        end
      end
      object tsQueryService: TTabSheet
        BorderWidth = 5
        Caption = 'XMethods Query Service'
        object Label4: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label22: TLabel
          Left = 208
          Top = 63
          Width = 47
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Publisher:'
        end
        object Label23: TLabel
          Left = 202
          Top = 88
          Width = 53
          Height = 13
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Service ID:'
        end
        object eQueryService: TEdit
          Left = 52
          Top = 5
          Width = 699
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=m61LyCRL7p' +
            'GYtuPs9yyNKXKU(QhxieSRM)?serviceid=25703'
          OnDblClick = eBabelFishDblClick
        end
        object QueryServiceMemo: TMemo
          Left = 0
          Top = 130
          Width = 769
          Height = 214
          Align = alBottom
          Anchors = [akLeft, akTop, akRight, akBottom]
          ScrollBars = ssBoth
          TabOrder = 6
        end
        object GetAllServiceNamesButton: TButton
          Left = 7
          Top = 32
          Width = 163
          Height = 22
          Caption = 'Get list of all Services'
          TabOrder = 1
          OnClick = GetAllServiceNamesButtonClick
        end
        object GetServiceSummariesByPublisherButton: TButton
          Left = 7
          Top = 58
          Width = 163
          Height = 22
          Caption = 'Get Services by Publisher'
          TabOrder = 2
          OnClick = GetAllServiceNamesButtonClick
        end
        object ePublisher: TEdit
          Left = 261
          Top = 59
          Width = 488
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 3
          Text = 'xmethods.net'
        end
        object GetServiceDetailButton: TButton
          Left = 7
          Top = 83
          Width = 163
          Height = 22
          Caption = 'Get Service Details'
          TabOrder = 4
          OnClick = GetAllServiceNamesButtonClick
        end
        object eServiceID: TEdit
          Left = 261
          Top = 84
          Width = 488
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 5
          Text = 'uuid:A29C0D6C-5529-0D27-A91A-8E02D343532B'
        end
      end
      object tsFedexTracker: TTabSheet
        BorderWidth = 5
        Caption = 'FedEx Tracker'
        ImageIndex = 2
        object Label6: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label20: TLabel
          Left = 7
          Top = 130
          Width = 55
          Height = 13
          Caption = 'Tracking #:'
        end
        object Label21: TLabel
          Left = 7
          Top = 209
          Width = 51
          Height = 13
          Caption = 'Response:'
        end
        object Bevel3: TBevel
          Left = 165
          Top = 165
          Width = 589
          Height = 3
          Anchors = [akLeft, akTop, akRight]
          Shape = bsTopLine
        end
        object Label45: TLabel
          Left = 7
          Top = 185
          Width = 46
          Height = 16
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label46: TLabel
          Left = 7
          Top = 105
          Width = 80
          Height = 16
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label47: TLabel
          Left = 7
          Top = 34
          Width = 701
          Height = 34
          Anchors = [akLeft, akTop, akRight]
          AutoSize = False
          Caption = 
            'Checks tracking information for shipments via Federal Express (F' +
            'edEx).'
          WordWrap = True
        end
        object Label48: TLabel
          Left = 7
          Top = 75
          Width = 216
          Height = 13
          Caption = 'Visit the FedEx website for more information:'
        end
        object Label49: TLabel
          Left = 233
          Top = 75
          Width = 111
          Height = 13
          Cursor = crHandPoint
          Caption = 'http://www.fedex.com'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label38Click
        end
        object eFedex: TEdit
          Left = 52
          Top = 5
          Width = 699
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=m61LyCRL7p' +
            'GYtuPs9yyNKXKU(QhxieSRM)?serviceid=15'
          OnDblClick = eBabelFishDblClick
        end
        object FedexMemo: TMemo
          Left = 0
          Top = 236
          Width = 769
          Height = 108
          Align = alBottom
          Anchors = [akLeft, akTop, akRight, akBottom]
          Color = clBtnFace
          ReadOnly = True
          ScrollBars = ssBoth
          TabOrder = 3
        end
        object eTrackingID: TEdit
          Left = 120
          Top = 126
          Width = 100
          Height = 21
          TabOrder = 1
        end
        object GetTrackingStatusButton: TButton
          Left = 7
          Top = 155
          Width = 150
          Height = 22
          Caption = 'Get Tracking Status'
          TabOrder = 2
          OnClick = GetTrackingStatusButtonClick
        end
      end
      object tsEbay: TTabSheet
        BorderWidth = 5
        Caption = 'ebay Price Watcher'
        ImageIndex = 3
        object Label7: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label31: TLabel
          Left = 254
          Top = 75
          Width = 107
          Height = 13
          Cursor = crHandPoint
          Caption = 'http://www.ebay.com'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label38Click
        end
        object Label39: TLabel
          Left = 7
          Top = 75
          Width = 237
          Height = 13
          Caption = 'Visit the ebay website to find a current auction at'
        end
        object Label14: TLabel
          Left = 7
          Top = 105
          Width = 80
          Height = 16
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label42: TLabel
          Left = 7
          Top = 185
          Width = 46
          Height = 16
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label16: TLabel
          Left = 7
          Top = 130
          Width = 33
          Height = 13
          Caption = 'Item #'
        end
        object Label17: TLabel
          Left = 7
          Top = 210
          Width = 91
          Height = 13
          Caption = 'Auction Value, US$'
          ShowAccelChar = False
        end
        object Label13: TLabel
          Left = 7
          Top = 34
          Width = 729
          Height = 34
          Anchors = [akLeft, akTop, akRight]
          AutoSize = False
          Caption = 
            'Checks the current price of ebay auctions. Note that this WebSer' +
            'vice seems to only handle Auction IDs from ebay.com, and not fro' +
            'm the national subsites such as ebay.de etc.'
          WordWrap = True
        end
        object Bevel1: TBevel
          Left = 165
          Top = 165
          Width = 579
          Height = 3
          Anchors = [akLeft, akTop, akRight]
          Shape = bsTopLine
        end
        object eeBay: TEdit
          Left = 52
          Top = 5
          Width = 699
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=aW-BdLWQ0z' +
            'GoqAXbmBSObRDy(QhxieSRM)?serviceid=1'
          OnDblClick = eBabelFishDblClick
        end
        object GetCurrentPriceButton: TButton
          Left = 7
          Top = 155
          Width = 150
          Height = 22
          Caption = 'Get Current Price'
          TabOrder = 2
          OnClick = GetCurrentPriceButtonClick
        end
        object eAuctionValue: TEdit
          Left = 120
          Top = 206
          Width = 100
          Height = 21
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 3
        end
        object eAuctionID: TEdit
          Left = 120
          Top = 126
          Width = 100
          Height = 21
          TabOrder = 1
        end
      end
      object tsBarnsAndNoblePrice: TTabSheet
        BorderWidth = 5
        Caption = 'Barnes && Noble Price'
        ImageIndex = 7
        object Label11: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label55: TLabel
          Left = 7
          Top = 210
          Width = 49
          Height = 13
          Caption = 'Price, US$'
          ShowAccelChar = False
        end
        object Label56: TLabel
          Left = 7
          Top = 185
          Width = 46
          Height = 16
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label57: TLabel
          Left = 7
          Top = 130
          Width = 27
          Height = 13
          Caption = 'ISBN:'
        end
        object Label58: TLabel
          Left = 7
          Top = 105
          Width = 80
          Height = 16
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label59: TLabel
          Left = 7
          Top = 75
          Width = 278
          Height = 13
          Caption = 'For more information, visit the Barnes & Noble website at:'
          ShowAccelChar = False
        end
        object Label61: TLabel
          Left = 303
          Top = 75
          Width = 160
          Height = 13
          Cursor = crHandPoint
          Caption = 'http://www.barnesandnoble.com'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label38Click
        end
        object Label30: TLabel
          Left = 7
          Top = 34
          Width = 728
          Height = 34
          Anchors = [akLeft, akTop, akRight]
          AutoSize = False
          Caption = 
            'Checks for book prices via ISBN number, at Barnes & Noble online' +
            ' book store'
          ShowAccelChar = False
          WordWrap = True
        end
        object Bevel8: TBevel
          Left = 165
          Top = 165
          Width = 579
          Height = 3
          Anchors = [akLeft, akTop, akRight]
          Shape = bsTopLine
        end
        object eBarns: TEdit
          Left = 52
          Top = 5
          Width = 699
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=HMVVAFY6kZ' +
            'JLuYa1v1M-fWbv(QhxieSRM)?serviceid=7'
          OnDblClick = eBabelFishDblClick
        end
        object eISBN: TEdit
          Left = 120
          Top = 126
          Width = 100
          Height = 21
          TabOrder = 1
          Text = '0735614067'
        end
        object GetPriceButton: TButton
          Left = 7
          Top = 155
          Width = 150
          Height = 22
          Caption = 'GetPrice'
          TabOrder = 2
          OnClick = GetPriceButtonClick
        end
        object ePrice: TEdit
          Left = 120
          Top = 206
          Width = 100
          Height = 21
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 3
        end
      end
      object ts_DomainChecker: TTabSheet
        BorderWidth = 5
        Caption = 'Domain Checker'
        ImageIndex = 4
        TabVisible = False
        object Label8: TLabel
          Left = 0
          Top = 9
          Width = 67
          Height = 17
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'URL:'
        end
        object Label15: TLabel
          Left = 10
          Top = 293
          Width = 90
          Height = 13
          Caption = 'Domain availabilty:'
        end
        object Label40: TLabel
          Left = 10
          Top = 52
          Width = 163
          Height = 26
          Caption = 'Checks the availability of internet domains.'
          WordWrap = True
        end
        object Label41: TLabel
          Left = 10
          Top = 157
          Width = 66
          Height = 17
          AutoSize = False
          Caption = 'Domain:'
        end
        object Bevel2: TBevel
          Left = 126
          Top = 230
          Width = 587
          Height = 3
          Shape = bsTopLine
        end
        object Label43: TLabel
          Left = 10
          Top = 126
          Width = 93
          Height = 18
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label44: TLabel
          Left = 10
          Top = 262
          Width = 53
          Height = 18
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object eDomainChecker: TEdit
          Left = 73
          Top = 5
          Width = 644
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=4oRAKEJuXk' +
            '32Uqwgu6y7r0yk(QhxieSRM)?serviceid=6'
          OnDblClick = eBabelFishDblClick
        end
        object eDomain: TEdit
          Left = 136
          Top = 153
          Width = 218
          Height = 21
          TabOrder = 1
          Text = 'http://www.remobjects.com'
        end
        object CheckDomainButton: TButton
          Left = 10
          Top = 216
          Width = 109
          Height = 32
          Caption = 'Check Domain'
          TabOrder = 2
          OnClick = CheckDomainButtonClick
        end
        object eDomainAvailability: TEdit
          Left = 136
          Top = 289
          Width = 218
          Height = 21
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 3
        end
      end
      object tsBabelFish: TTabSheet
        BorderWidth = 5
        Caption = 'BabelFish'
        ImageIndex = 8
        object Label1: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label2: TLabel
          Left = 7
          Top = 34
          Width = 472
          Height = 13
          Anchors = [akLeft, akTop, akRight]
          Caption = 
            'Translates a piece of text between English and other European la' +
            'nguages via AltaVista'#39's BabelFish'
          WordWrap = True
        end
        object Label3: TLabel
          Left = 7
          Top = 75
          Width = 139
          Height = 13
          Caption = 'Visit the BabelFish website at'
        end
        object Label50: TLabel
          Left = 156
          Top = 75
          Width = 143
          Height = 13
          Cursor = crHandPoint
          Caption = 'http://babelfish.altavista.com'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label38Click
        end
        object Label51: TLabel
          Left = 7
          Top = 105
          Width = 80
          Height = 16
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label52: TLabel
          Left = 7
          Top = 130
          Width = 26
          Height = 13
          Caption = 'Text:'
        end
        object Label53: TLabel
          Left = 7
          Top = 185
          Width = 46
          Height = 16
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label54: TLabel
          Left = 8
          Top = 210
          Width = 57
          Height = 13
          Caption = 'Translation:'
          ShowAccelChar = False
        end
        object Bevel4: TBevel
          Left = 164
          Top = 165
          Width = 375
          Height = 3
          Anchors = [akLeft, akTop, akRight]
          Shape = bsTopLine
        end
        object TranslateButton: TButton
          Left = 7
          Top = 155
          Width = 150
          Height = 22
          Caption = 'Translate'
          TabOrder = 3
          OnClick = TranslateButtonClick
        end
        object eInput: TEdit
          Left = 95
          Top = 126
          Width = 447
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 1
          Text = 'This is a test for the BabelFish service.'
        end
        object eOutput: TEdit
          Left = 95
          Top = 206
          Width = 447
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 4
        end
        object rbBabelTransMode: TRadioGroup
          Left = 549
          Top = 96
          Width = 216
          Height = 222
          Anchors = [akTop, akRight]
          Caption = 'Translation Mode:'
          TabOrder = 2
        end
        object eBabelFish: TEdit
          Left = 52
          Top = 5
          Width = 709
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=6xN0Okme_1' +
            '8dohOFDz0Hcoi0(QhxieSRM)?serviceid=14'
          OnDblClick = eBabelFishDblClick
        end
      end
      object tsExchange: TTabSheet
        BorderWidth = 5
        Caption = 'Currency Exchange'
        ImageIndex = 5
        object Label9: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label64: TLabel
          Left = 7
          Top = 34
          Width = 757
          Height = 34
          Anchors = [akLeft, akTop, akRight]
          AutoSize = False
          Caption = 'Retrieve exchange rate to Convert between different currencies.'
          WordWrap = True
        end
        object Label65: TLabel
          Left = 7
          Top = 75
          Width = 80
          Height = 16
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label66: TLabel
          Left = 7
          Top = 100
          Width = 68
          Height = 13
          Caption = 'Convert from:'
        end
        object Label67: TLabel
          Left = 7
          Top = 160
          Width = 46
          Height = 16
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label69: TLabel
          Left = 329
          Top = 100
          Width = 14
          Height = 13
          Caption = 'to:'
        end
        object Bevel7: TBevel
          Left = 165
          Top = 140
          Width = 599
          Height = 3
          Anchors = [akLeft, akTop, akRight]
          Shape = bsTopLine
        end
        object eExchange: TEdit
          Left = 52
          Top = 5
          Width = 709
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=4oRAKEJuXk' +
            '32Uqwgu6y7r0yk(QhxieSRM)?serviceid=5'
          OnDblClick = eBabelFishDblClick
        end
        object cbFrom: TComboBox
          Left = 110
          Top = 96
          Width = 210
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 151
          TabOrder = 1
          Text = 'usa'
          Items.Strings = (
            'afghanistan'
            'albania'
            'algeria'
            'andorra'
            'andorra'
            'angola'
            'argentina'
            'aruba'
            'australia'
            'austria'
            'bahrain'
            'bangladesh'
            'barbados'
            'belgium'
            'belize'
            'bermuda'
            'bhutan'
            'bolivian'
            'botswana'
            'brazil'
            'england'
            'united kingdom'
            'uk'
            'great britain'
            'brunei'
            'burundi'
            'cambodia'
            'canada'
            'cape verde'
            'cayman islands'
            'chile'
            'china'
            'colombia'
            'comoros'
            'costa rica'
            'croatia'
            'cuba'
            'cyprus'
            'czech republic'
            'denmark'
            'dijibouti'
            'dominican republic'
            'netherlands'
            'east caribbean'
            'ecuador'
            'egypt'
            'el salvador'
            'estonia'
            'ethiopia'
            'euro'
            'falkland islands'
            'fiji'
            'finland'
            'france'
            'gambia'
            'germany'
            'ghana'
            'gibraltar'
            'greece'
            'guatemala'
            'guinea'
            'guyana'
            'haiti'
            'honduras'
            'hong kong'
            'hungary'
            'iceland'
            'india'
            'indonesia'
            'iraq'
            'ireland'
            'israel'
            'italy'
            'jamaica'
            'japan'
            'jordan'
            'kazakhstan'
            'kenya'
            'korea'
            'kuwait'
            'laos'
            'latvia'
            'lebanon'
            'lesotho'
            'liberia'
            'libya'
            'lithuania'
            'luxembourg'
            'macau'
            'macedonia'
            'malaga'
            'malawi kwacha'
            'malaysia'
            'maldives'
            'malta'
            'mauritania'
            'mauritius'
            'mexico'
            'moldova'
            'mongolia'
            'morocco'
            'mozambique'
            'myanmar'
            'namibia'
            'nepal'
            'new Zealand'
            'nicaragua'
            'nigeria'
            'north korea'
            'norway'
            'oman'
            'pakistan'
            'panama'
            'papua new guinea'
            'paraguay'
            'peru'
            'philippines'
            'poland'
            'portugal'
            'qatar'
            'romania'
            'russia'
            'samoa'
            'sao tome'
            'saudi arabia'
            'seychelles'
            'sierra leone'
            'singapore'
            'slovakia'
            'slovenia'
            'solomon islands'
            'somalia'
            'south africa'
            'spain'
            'sri lanka'
            'st helena'
            'sudan'
            'suriname'
            'swaziland'
            'sweden'
            'switzerland'
            'syria'
            'taiwan'
            'tanzania'
            'thailand'
            'tonga'
            'trinidad'
            'tunisia'
            'turkey'
            'united states'
            'us'
            'usa'
            'uae'
            'united arib emirates'
            'uganda'
            'ukraine'
            'uzbekistan'
            'vanuatu'
            'venezuela'
            'vietnam'
            'yemen'
            'yugoslavua'
            'zambia'
            'zimbabwe')
        end
        object cbTo: TComboBox
          Left = 357
          Top = 96
          Width = 210
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 49
          TabOrder = 2
          Text = 'euro'
          Items.Strings = (
            'afghanistan'
            'albania'
            'algeria'
            'andorra'
            'andorra'
            'angola'
            'argentina'
            'aruba'
            'australia'
            'austria'
            'bahrain'
            'bangladesh'
            'barbados'
            'belgium'
            'belize'
            'bermuda'
            'bhutan'
            'bolivian'
            'botswana'
            'brazil'
            'england'
            'united kingdom'
            'uk'
            'great britain'
            'brunei'
            'burundi'
            'cambodia'
            'canada'
            'cape verde'
            'cayman islands'
            'chile'
            'china'
            'colombia'
            'comoros'
            'costa rica'
            'croatia'
            'cuba'
            'cyprus'
            'czech republic'
            'denmark'
            'dijibouti'
            'dominican republic'
            'netherlands'
            'east caribbean'
            'ecuador'
            'egypt'
            'el salvador'
            'estonia'
            'ethiopia'
            'euro'
            'falkland islands'
            'fiji'
            'finland'
            'france'
            'gambia'
            'germany'
            'ghana'
            'gibraltar'
            'greece'
            'guatemala'
            'guinea'
            'guyana'
            'haiti'
            'honduras'
            'hong kong'
            'hungary'
            'iceland'
            'india'
            'indonesia'
            'iraq'
            'ireland'
            'israel'
            'italy'
            'jamaica'
            'japan'
            'jordan'
            'kazakhstan'
            'kenya'
            'korea'
            'kuwait'
            'laos'
            'latvia'
            'lebanon'
            'lesotho'
            'liberia'
            'libya'
            'lithuania'
            'luxembourg'
            'macau'
            'macedonia'
            'malaga'
            'malawi kwacha'
            'malaysia'
            'maldives'
            'malta'
            'mauritania'
            'mauritius'
            'mexico'
            'moldova'
            'mongolia'
            'morocco'
            'mozambique'
            'myanmar'
            'namibia'
            'nepal'
            'new Zealand'
            'nicaragua'
            'nigeria'
            'north korea'
            'norway'
            'oman'
            'pakistan'
            'panama'
            'papua new guinea'
            'paraguay'
            'peru'
            'philippines'
            'poland'
            'portugal'
            'qatar'
            'romania'
            'russia'
            'samoa'
            'sao tome'
            'saudi arabia'
            'seychelles'
            'sierra leone'
            'singapore'
            'slovakia'
            'slovenia'
            'solomon islands'
            'somalia'
            'south africa'
            'spain'
            'sri lanka'
            'st helena'
            'sudan'
            'suriname'
            'swaziland'
            'sweden'
            'switzerland'
            'syria'
            'taiwan'
            'tanzania'
            'thailand'
            'tonga'
            'trinidad'
            'tunisia'
            'turkey'
            'united states'
            'us'
            'usa'
            'uae'
            'united arib emirates'
            'uganda'
            'ukraine'
            'uzbekistan'
            'vanuatu'
            'venezuela'
            'vietnam'
            'yemen'
            'yugoslavua'
            'zambia'
            'zimbabwe')
        end
        object GetRateButton: TButton
          Left = 7
          Top = 130
          Width = 150
          Height = 22
          Caption = 'Get Rate'
          TabOrder = 3
          OnClick = GetRateButtonClick
        end
        object eRate: TMemo
          Left = 0
          Top = 185
          Width = 769
          Height = 159
          Align = alBottom
          Anchors = [akLeft, akTop, akRight, akBottom]
          ParentColor = True
          ReadOnly = True
          ScrollBars = ssVertical
          TabOrder = 4
        end
      end
      object tsTraffic: TTabSheet
        BorderWidth = 5
        Caption = 'California Highway Traffic'
        ImageIndex = 6
        object Label10: TLabel
          Left = 7
          Top = 10
          Width = 23
          Height = 13
          Caption = 'URL:'
        end
        object Label18: TLabel
          Left = 7
          Top = 34
          Width = 732
          Height = 34
          Anchors = [akLeft, akTop, akRight]
          AutoSize = False
          Caption = 'Checks Traffic on California Highways.'
          WordWrap = True
        end
        object Label19: TLabel
          Left = 7
          Top = 75
          Width = 80
          Height = 16
          Caption = 'Run Sample:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label60: TLabel
          Left = 7
          Top = 100
          Width = 45
          Height = 13
          Caption = 'Highway:'
        end
        object Label62: TLabel
          Left = 7
          Top = 160
          Width = 46
          Height = 16
          Caption = 'Result:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Bevel6: TBevel
          Left = 165
          Top = 140
          Width = 579
          Height = 3
          Anchors = [akLeft, akTop, akRight]
          Shape = bsTopLine
        end
        object eTraffic: TEdit
          Left = 52
          Top = 5
          Width = 699
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          Color = clInactiveBorder
          ReadOnly = True
          TabOrder = 0
          Text = 
            'http://www.xmethods.com/ve2/ViewListing.po;jsessionid=4oRAKEJuXk' +
            '32Uqwgu6y7r0yk(QhxieSRM)?serviceid=4'
          OnDblClick = eBabelFishDblClick
        end
        object TrafficMemo: TMemo
          Left = 0
          Top = 195
          Width = 769
          Height = 149
          Align = alBottom
          Anchors = [akLeft, akTop, akRight, akBottom]
          Color = clBtnFace
          ReadOnly = True
          ScrollBars = ssBoth
          TabOrder = 3
        end
        object eHighway: TEdit
          Left = 110
          Top = 96
          Width = 204
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 1
          Text = '101'
        end
        object GetTrafficButton: TButton
          Left = 7
          Top = 130
          Width = 150
          Height = 22
          Caption = 'Get Traffic'
          TabOrder = 2
          OnClick = GetTrafficButtonClick
        end
      end
    end
  end
  object SOAPMessage: TROSOAPMessage
    SerializationOptions = [xsoWriteMultiRefArray, xsoWriteMultiRefObject]
    Left = 220
    Top = 307
  end
  object HttpChannel: TROWinInetHTTPChannel
    ServerLocators = <>
    DispatchOptions = []
    UserAgent = 'RemObjects SDK'
    Left = 248
    Top = 307
  end
end