first commit (2010-01-09)
This commit is contained in:
298
ExtNC.dfm
Normal file
298
ExtNC.dfm
Normal file
@ -0,0 +1,298 @@
|
||||
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
|
Reference in New Issue
Block a user