object Form1: TForm1
  Left = 243
  Top = 116
  Width = 640
  Height = 480
  Caption = 'Extended NC for HTTP'
  Color = clBtnFace
  Constraints.MinHeight = 480
  Constraints.MinWidth = 640
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 16
  object StatusBar1: TStatusBar
    Left = 0
    Top = 434
    Width = 632
    Height = 19
    Panels = <>
    SimplePanel = False
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 80
    Width = 632
    Height = 354
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 1
    TabPosition = tpBottom
    object TabSheet1: TTabSheet
      Caption = 'General'
      object SpeedButton2: TSpeedButton
        Left = 456
        Top = 88
        Width = 23
        Height = 22
        Glyph.Data = {
          66010000424D6601000000000000760000002800000014000000140000000100
          040000000000F0000000800C0000800C00001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          8888888800008888888888888888888800008888888888888888888800008888
          8877888888888888000088880077788887778888000088870B07778887777788
          000088700BB07778000777780000800BBBBB07770BB0077700000BBBBBBBB077
          0BBBB07700000BBBBBBBB0780BBBB07700000BBBBBBB00000BBBB07700000BB0
          0BB03333000BB077000000030B03333333300078000003330033333333333088
          0000800333333333333008880000888000000000000888880000888888888888
          8888888800008888888888888888888800008888888888888888888800008888
          88888888888888880000}
      end
      object ToSend: TStringGrid
        Left = 0
        Top = 0
        Width = 624
        Height = 105
        Align = alClient
        ColCount = 2
        FixedCols = 0
        RowCount = 15
        FixedRows = 0
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
        TabOrder = 0
      end
      object Panel2: TPanel
        Left = 0
        Top = 105
        Width = 624
        Height = 218
        Align = alBottom
        BorderStyle = bsSingle
        TabOrder = 1
        object Label2: TLabel
          Left = 2
          Top = 16
          Width = 180
          Height = 18
          Caption = 'Cabecera a enviar:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = 'Courier New'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Memo3: TMemo
          Left = 1
          Top = 35
          Width = 618
          Height = 178
          Align = alBottom
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          ScrollBars = ssVertical
          TabOrder = 0
          WordWrap = False
        end
        object GenerarCabecera: TBitBtn
          Left = 432
          Top = 8
          Width = 113
          Height = 25
          Caption = 'Cabecera'
          TabOrder = 1
          OnClick = GenerarCabeceraClick
          Glyph.Data = {
            16010000424D1601000000000000760000002800000010000000140000000100
            040000000000A0000000800C0000800C00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
            8888888888888888888888888888888888888888888777778888888888000007
            77888888880AAAA007788888880AAAAA20778888880AAAA2A27788888800000A
            2207888887888870020788880788888770078880077777700207880A0000000A
            220780AAAAAAAAA2A2780AAAAAAAAAAA208880AAAAAAAAA00888880A00000008
            8888888007888888888888880888888888888888888888888888}
        end
        object BitBtn3: TBitBtn
          Left = 552
          Top = 8
          Width = 65
          Height = 25
          Caption = 'Send'
          TabOrder = 2
          OnClick = BitBtn3Click
          Glyph.Data = {
            16010000424D1601000000000000760000002800000010000000140000000100
            040000000000A0000000800C0000800C00001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
            8888888888888888888888888888888888888888888777778888888888000007
            77888888880AAAA007788888880AAAAA20778888880AAAA2A27788888800000A
            2207888887888870020788880788888770078880077777700207880A0000000A
            220780AAAAAAAAA2A2780AAAAAAAAAAA208880AAAAAAAAA00888880A00000008
            8888888007888888888888880888888888888888888888888888}
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'HTML'
      ImageIndex = 1
      object Splitter1: TSplitter
        Left = 0
        Top = 113
        Width = 624
        Height = 3
        Cursor = crVSplit
        Align = alTop
      end
      object Memo2: TMemo
        Left = 0
        Top = 116
        Width = 624
        Height = 207
        Align = alClient
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
      end
      object Memo1: TMemo
        Left = 0
        Top = 0
        Width = 624
        Height = 113
        Align = alTop
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ScrollBars = ssVertical
        TabOrder = 1
        WordWrap = False
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'Preview'
      ImageIndex = 2
      object CppWebBrowser1: TCppWebBrowser
        Left = 0
        Top = 0
        Width = 624
        Height = 323
        TabStop = True
        Align = alClient
        TabOrder = 0
        ControlData = {
          4C0000007E400000622100000000000000000000000000000000000000000000
          000000004C000000000000000000000001000000E0D057007335CF11AE690800
          2B2E12620A000000000000004C0000000114020000000000C000000000000046
          0000000000000000000000000000000000000000000000000000000000000000
          00000000000000000100000000000000000000000000000000000000}
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 632
    Height = 80
    Align = alTop
    BorderStyle = bsSingle
    TabOrder = 2
    object Label1: TLabel
      Left = 8
      Top = 56
      Width = 100
      Height = 18
      Caption = 'Post Data:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'Courier New'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BitBtn1: TBitBtn
      Left = 584
      Top = 8
      Width = 41
      Height = 25
      Caption = 'Ir'
      TabOrder = 0
      OnClick = BitBtn1Click
      Glyph.Data = {
        16010000424D1601000000000000760000002800000010000000140000000100
        040000000000A0000000800C0000800C00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888888888888888888888888888888888888888777778888888888000007
        77888888880AAAA007788888880AAAAA20778888880AAAA2A27788888800000A
        2207888887888870020788880788888770078880077777700207880A0000000A
        220780AAAAAAAAA2A2780AAAAAAAAAAA208880AAAAAAAAA00888880A00000008
        8888888007888888888888880888888888888888888888888888}
    end
    object ComboBox3: TComboBox
      Left = 2
      Top = 8
      Width = 105
      Height = 24
      ItemHeight = 16
      TabOrder = 1
      Text = 'HTTP Get'
      OnChange = ComboBox3Change
      Items.Strings = (
        'HTTP Get'
        'HTTP Head'
        'HTTP Options'
        'HTTP Trace'
        'HTTP Put'
        'HTTP Post'
        'HTTP Delete')
    end
    object Url: TEdit
      Left = 106
      Top = 8
      Width = 412
      Height = 24
      TabOrder = 2
      Text = 'http://jd.infdj.com'
    end
    object ProtocolVersion: TEdit
      Left = 518
      Top = 8
      Width = 65
      Height = 24
      TabOrder = 3
      Text = 'HTTP/1.1'
    end
    object Post: TEdit
      Left = 106
      Top = 48
      Width = 412
      Height = 24
      TabOrder = 4
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 410
    Top = 130
  end
end