object frmForm: TfrmForm Left = 239 Top = 357 HelpContext = 74 ActiveControl = cmbURL BorderStyle = bsDialog Caption = 'Form' ClientHeight = 118 ClientWidth = 504 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter ShowHint = True OnCreate = FormCreate OnDeactivate = FormDeactivate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 8 Width = 489 Height = 73 Shape = bsFrame IsControl = True end object lblHRef: TLabel Left = 36 Top = 24 Width = 30 Height = 13 Alignment = taRightJustify Caption = '&Action' FocusControl = cmbURL Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblMethod: TLabel Left = 30 Top = 52 Width = 36 Height = 13 Alignment = taRightJustify Caption = '&Method' FocusControl = cmbMethod Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object lblEnctype: TLabel Left = 208 Top = 52 Width = 57 Height = 13 Alignment = taRightJustify Caption = '&Enctype' FocusControl = cmbEncType Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False WordWrap = True end object OKBtn: TBitBtn Left = 252 Top = 88 Width = 77 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 4 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 336 Top = 88 Width = 77 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 NumGlyphs = 2 Spacing = -1 IsControl = True end object HelpBtn: TBitBtn Left = 420 Top = 88 Width = 77 Height = 25 Caption = '&Help' TabOrder = 6 OnClick = HelpBtnClick NumGlyphs = 2 Spacing = -1 IsControl = True end object cmbURL: TComboBox Left = 72 Top = 20 Width = 333 Height = 21 Hint = 'URL of the CGI script which will process the form'#39's contents' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False Sorted = True TabOrder = 0 end object bbtnURL: TBitBtn Left = 412 Top = 16 Width = 77 Height = 27 Hint = 'Open the URL builder' Caption = '&URL' TabOrder = 1 OnClick = bbtnURLClick Glyph.Data = { 42010000424D4201000000000000760000002800000012000000110000000100 040000000000CC00000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777070000007777777777777770000000000000000000007700070000000FFF FFFFFFF07000770000000FFFFFFF00008007770000000FFFFFF0877808777700 00000FFFFF0877E88077770000000FFFFF0777787077770000000FFFFF07E778 7077770000000FFFFF08EE788077770000000FFFFFF087780777770000000FFF FFFF00007777770000000FFFFFFFFFF07777770000000FFFFFFF000077777700 00000FFFFFFF07077777770000000FFFFFFF0077777777000000000000000777 777777000000} end object cmbMethod: TComboBox Left = 72 Top = 48 Width = 133 Height = 21 Hint = '"Get" submits query; "Post" sends a datablock. Whenever possible' + ', use Post' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Get' 'Post') ParentFont = False TabOrder = 2 end object cmbEncType: TComboBox Left = 272 Top = 48 Width = 133 Height = 21 Hint = 'Presently unnecessary' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'application/x-www-form-urlencoded' 'multipart/form-data') ParentFont = False TabOrder = 3 end end