object WPCForm: TWPCForm Left = 231 Top = 109 Width = 569 Height = 453 Caption = 'Web Page Creator' Color = clSilver Font.Color = clWindowText Font.Height = -18 Font.Name = 'System' Font.Style = [] FormStyle = fsMDIForm Icon.Data = {} Menu = MainMenu1 Position = poDefault WindowState = wsMaximized WindowMenu = Window1 OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnResize = FormResize OnShow = FormShow PixelsPerInch = 120 TextHeight = 20 object ScrollBox1: TScrollBox Left = 0 Top = 0 Width = 561 Height = 178 HorzScrollBar.Visible = False VertScrollBar.Visible = False Align = alTop TabOrder = 0 object Panel2: TPanel Left = 0 Top = 85 Width = 557 Height = 35 Align = alTop Color = clSilver TabOrder = 0 Visible = False object SpeedButton42: TSpeedButton Left = 8 Top = 5 Width = 190 Height = 25 Hint = 'Required For Forms' Caption = 'Form Body' Font.Color = clBlue Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton42Click end object SpeedButton43: TSpeedButton Left = 205 Top = 5 Width = 188 Height = 25 Hint = 'Where To Mail The Completed Form' Caption = 'Mail To' Font.Color = clBlue Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton43Click end object SpeedButton44: TSpeedButton Left = 403 Top = 5 Width = 190 Height = 25 Hint = 'Subject Of The Form' Caption = 'Mail Subject' Font.Color = clBlue Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton44Click end object SpeedButton45: TSpeedButton Left = 601 Top = 5 Width = 190 Height = 25 Hint = 'Define Input Areas' Caption = 'Input' Font.Color = clBlue Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton45Click end end object Panel1: TPanel Left = 0 Top = 0 Width = 557 Height = 85 Align = alTop BevelOuter = bvNone TabOrder = 1 end object Panel3: TPanel Left = 0 Top = 120 Width = 557 Height = 35 Align = alTop TabOrder = 2 Visible = False object SpeedButton47: TSpeedButton Left = 10 Top = 4 Width = 38 Height = 27 Caption = '1' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton47Click end object SpeedButton48: TSpeedButton Left = 49 Top = 4 Width = 37 Height = 27 Caption = '2' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton48Click end object SpeedButton49: TSpeedButton Left = 88 Top = 4 Width = 37 Height = 27 Caption = '3' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton49Click end object SpeedButton50: TSpeedButton Left = 128 Top = 4 Width = 36 Height = 27 Caption = '4' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton50Click end object SpeedButton51: TSpeedButton Left = 166 Top = 4 Width = 37 Height = 27 Caption = '5' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton51Click end object SpeedButton52: TSpeedButton Left = 205 Top = 4 Width = 38 Height = 27 Caption = '6' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton52Click end object SpeedButton53: TSpeedButton Left = 244 Top = 4 Width = 37 Height = 27 Caption = '7' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton53Click end object SpeedButton54: TSpeedButton Left = 283 Top = 4 Width = 37 Height = 27 Caption = '8' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton54Click end object SpeedButton55: TSpeedButton Left = 323 Top = 4 Width = 36 Height = 27 Caption = '9' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton55Click end object SpeedButton56: TSpeedButton Left = 361 Top = 4 Width = 37 Height = 27 Caption = '10' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton56Click end object SpeedButton57: TSpeedButton Left = 400 Top = 4 Width = 38 Height = 27 Caption = '11' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton57Click end object SpeedButton58: TSpeedButton Left = 439 Top = 4 Width = 37 Height = 27 Caption = '12' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton58Click end object SpeedButton59: TSpeedButton Left = 478 Top = 4 Width = 37 Height = 27 Caption = '13' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton59Click end object SpeedButton60: TSpeedButton Left = 518 Top = 4 Width = 36 Height = 27 Caption = '14' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton60Click end object SpeedButton61: TSpeedButton Left = 556 Top = 4 Width = 37 Height = 27 Caption = '15' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton61Click end object SpeedButton62: TSpeedButton Left = 595 Top = 4 Width = 38 Height = 27 Caption = '16' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton62Click end object SpeedButton63: TSpeedButton Left = 634 Top = 4 Width = 37 Height = 27 Caption = '17' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton63Click end object SpeedButton64: TSpeedButton Left = 673 Top = 4 Width = 37 Height = 27 Caption = '18' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton64Click end object SpeedButton65: TSpeedButton Left = 713 Top = 4 Width = 36 Height = 27 Caption = '19' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton65Click end object SpeedButton66: TSpeedButton Left = 751 Top = 4 Width = 37 Height = 27 Caption = '20' Font.Color = clFuchsia Font.Height = -18 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Visible = False OnClick = SpeedButton66Click end end object GroupBox6: TGroupBox Left = 5 Top = 1 Width = 89 Height = 78 Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False TabOrder = 3 object SpeedButton10: TSpeedButton Left = 5 Top = 19 Width = 25 Height = 25 Hint = 'New File' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = New1Click end object SpeedButton11: TSpeedButton Left = 33 Top = 19 Width = 25 Height = 25 Hint = 'Open File' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 555555555555555555555555555555555555555FFFFFFFFFF555550000000000 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8 B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555 55555575FFF75555555555700007555555555557777555555555555555555555 55555555555555555555555555555555555555555555555555550000} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = Open1Click end object SpeedButton13: TSpeedButton Left = 5 Top = 46 Width = 25 Height = 25 Hint = 'Save File' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 55555555FFFFFFFFFF5555500000000005555557777777777F55550BFBFBFBFB 0555557F555555557F55550FBFBFBFBF0555557F555555557F55550BFBFBFBFB 0555557F555555557F55550FBFBFBFBF0555557F555555557F55550BFBFBFBFB 0555557F555555557F55550FBFBFBFBF0555557FFFFFFFFF7555550000000000 555555777777777755555550FBFB0555555555575FFF75555555555700007555 5555555577775555555555555555555555555555555555555555555555555555 55555555555555555555555555555555555555555555555555550000} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton13Click end object SpeedButton15: TSpeedButton Left = 33 Top = 46 Width = 25 Height = 25 Hint = 'Save File As' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton15Click end object SpeedButton16: TSpeedButton Left = 59 Top = 46 Width = 25 Height = 25 Hint = 'Close File' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33F333337F3333373B33333BB33333B337FF33377F33337F3BB3333BB333 3BB3377FF3377F33377333BB777BB777BB333377FFF77FFF7733330000000000 B3333377777777777333330FFFFFFFF03333337F3FF3FFF7F333330F00F000F0 33333F7F77377737FFFFBB0FFF8FFFF0BBB3777F3F33FFF7777F3B0F08700000 000B377F73F7777777773308880FFFFFF033337F377333333733330807FFFFF8 033333737FFFFFFF7F33333000000000B3333337777777777FF333BB333BB333 BB33337733377F3377FF3BB3333BB3333BB3377333377F33377F3B33333BB333 33B33733333773333373B333333B3333333B7333333733333337} NumGlyphs = 2 ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton16Click end object SpeedButton12: TSpeedButton Left = 59 Top = 19 Width = 25 Height = 25 Hint = 'Print File' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888 8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F 8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F 8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = SpeedButton12Click end end object GroupBox2: TGroupBox Left = 98 Top = 1 Width = 196 Height = 78 Caption = 'Text Attributes' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False TabOrder = 4 object SpeedButton7: TSpeedButton Left = 5 Top = 19 Width = 25 Height = 25 Hint = 'Bold Text' Caption = 'Bd' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Bold1Click end object SpeedButton8: TSpeedButton Left = 33 Top = 19 Width = 25 Height = 25 Hint = 'Italic Text' Caption = 'It' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Italic1Click end object SpeedButton9: TSpeedButton Left = 86 Top = 46 Width = 25 Height = 25 Hint = 'Comment' Caption = 'Cm' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Comment1Click end object SpeedButton14: TSpeedButton Left = 86 Top = 19 Width = 25 Height = 25 Hint = 'Blinking Text' Caption = 'Bl' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Blinking1Click end object SpeedButton33: TSpeedButton Left = 5 Top = 46 Width = 25 Height = 25 Hint = 'Strong Emphasis' Caption = 'St' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Strong1Click end object SpeedButton34: TSpeedButton Left = 59 Top = 19 Width = 25 Height = 25 Hint = 'Citation' Caption = 'Ci' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Citation1Click end object SpeedButton35: TSpeedButton Left = 33 Top = 46 Width = 25 Height = 25 Hint = 'Typographic Emphasis' Caption = 'Em' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Emphasis1Click end object SpeedButton41: TSpeedButton Left = 59 Top = 46 Width = 25 Height = 25 Hint = 'Coded Text' Caption = 'Co' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Code1Click end object SpeedButton67: TSpeedButton Left = 113 Top = 46 Width = 25 Height = 25 Hint = 'Fonts' Caption = 'Fo' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Font1Click end object SpeedButton3: TSpeedButton Left = 113 Top = 19 Width = 25 Height = 25 Hint = 'Underline' Caption = 'Ul' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Underline1Click end object SpeedButton4: TSpeedButton Left = 140 Top = 19 Width = 25 Height = 25 Hint = 'Sample Text' Caption = 'Sa' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Sample1Click end object SpeedButton5: TSpeedButton Left = 168 Top = 19 Width = 25 Height = 25 Hint = 'Keyboard Text' Caption = 'Kb' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Keyboard1Click end object SpeedButton6: TSpeedButton Left = 140 Top = 46 Width = 25 Height = 25 Hint = 'Variable Text' Caption = 'Va' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Variable1Click end object SpeedButton17: TSpeedButton Left = 168 Top = 46 Width = 25 Height = 25 Hint = 'Definition Text' Caption = 'De' Font.Color = clMaroon Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Definition1Click end end object GroupBox3: TGroupBox Left = 298 Top = 1 Width = 142 Height = 78 Caption = 'Format' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False TabOrder = 5 object SpeedButton18: TSpeedButton Left = 5 Top = 46 Width = 25 Height = 25 Hint = 'Paragraph Break' Caption = 'Pa' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Paragraph1Click end object SpeedButton19: TSpeedButton Left = 33 Top = 46 Width = 25 Height = 25 Hint = 'Horizontal Rule' Caption = 'Hr' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = HorizontalRule1Click end object SpeedButton20: TSpeedButton Left = 33 Top = 19 Width = 25 Height = 25 Hint = 'Center Line' Caption = 'Ce' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = CenterLine1Click end object SpeedButton21: TSpeedButton Left = 59 Top = 19 Width = 25 Height = 25 Hint = 'Preformatted Text' Caption = 'Pf' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Preformatted1Click end object SpeedButton36: TSpeedButton Left = 5 Top = 19 Width = 25 Height = 25 Hint = 'Forced Line Break' Caption = 'Br' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = ForcedLineBreak1Click end object SpeedButton37: TSpeedButton Left = 59 Top = 46 Width = 25 Height = 25 Hint = 'Address Block' Caption = 'Ab' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = AddressBlock1Click end object SpeedButton39: TSpeedButton Left = 86 Top = 19 Width = 25 Height = 25 Hint = 'Block Quote' Caption = 'Bq' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = BlockQuote1Click end object SpeedButton46: TSpeedButton Left = 86 Top = 46 Width = 25 Height = 25 Hint = 'Last Modified' Caption = 'Lm' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = LastModified1Click end object SpeedButton1: TSpeedButton Left = 113 Top = 46 Width = 25 Height = 25 Hint = 'Header 1-6' Caption = 'He' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Header1Click end object SpeedButton2: TSpeedButton Left = 113 Top = 19 Width = 25 Height = 25 Hint = 'Horizontal Tab' Caption = 'Ht' Font.Color = clGreen Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = HorizontalTab1Click end end object GroupBox4: TGroupBox Left = 443 Top = 1 Width = 90 Height = 78 Caption = 'Lists' Font.Color = clBlue Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False TabOrder = 6 object SpeedButton22: TSpeedButton Left = 5 Top = 19 Width = 25 Height = 25 Hint = 'Numbered List' Caption = 'Nl' Font.Color = clNavy Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = NumberedList1Click end object SpeedButton23: TSpeedButton Left = 5 Top = 46 Width = 25 Height = 25 Hint = 'Unnumbered List' Caption = 'Ul' Font.Color = clNavy Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = UnnumberedList1Click end object SpeedButton24: TSpeedButton Left = 33 Top = 19 Width = 25 Height = 25 Hint = 'Definition List' Caption = 'Dl' Font.Color = clNavy Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = DefinitionList1Click end object SpeedButton40: TSpeedButton Left = 61 Top = 46 Width = 25 Height = 25 Hint = 'Menu' Caption = 'Me' Font.Color = clNavy Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Menu1Click end object SpeedButton38: TSpeedButton Left = 33 Top = 46 Width = 25 Height = 25 Hint = 'Directory List' Caption = 'Di' Font.Color = clNavy Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Directory1Click end end object GroupBox5: TGroupBox Left = 536 Top = 1 Width = 260 Height = 78 TabOrder = 7 object SpeedButton25: TSpeedButton Left = 5 Top = 46 Width = 53 Height = 25 Hint = 'Graphics File' Caption = 'Image' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Image1Click end object SpeedButton26: TSpeedButton Left = 60 Top = 19 Width = 58 Height = 25 Hint = 'Hyperlinks' Caption = 'Link' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = URL1Click end object SpeedButton27: TSpeedButton Left = 5 Top = 19 Width = 53 Height = 25 Hint = 'Background Appearance' Caption = 'Back' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Background1Click end object SpeedButton29: TSpeedButton Left = 120 Top = 19 Width = 55 Height = 25 Hint = 'Tables' Caption = 'Table' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Tables1Click end object SpeedButton30: TSpeedButton Left = 60 Top = 46 Width = 58 Height = 25 Hint = 'Link Anchors' Caption = 'Anchor' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Targets1Click end object SpeedButton31: TSpeedButton Left = 178 Top = 19 Width = 75 Height = 25 Hint = 'Special Symbols' Caption = 'Symbol' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = Symbols1Click end object SpeedButton32: TSpeedButton Left = 120 Top = 46 Width = 55 Height = 25 Hint = 'Toggle Form Create Bar' Caption = 'Forms' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton32Click end object SpeedButton28: TSpeedButton Left = 178 Top = 46 Width = 76 Height = 25 Hint = 'View a GIF Image' Caption = 'View GIF' Font.Color = clPurple Font.Height = -17 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton28Click end end end object Panel4: TPanel Left = 0 Top = 382 Width = 561 Height = 25 Align = alBottom Alignment = taLeftJustify BorderWidth = 2 Font.Color = clBlack Font.Height = -10 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 Visible = False object Panel5: TPanel Left = 3 Top = 3 Width = 110 Height = 19 Align = alLeft BevelInner = bvLowered BevelOuter = bvNone TabOrder = 0 end object Panel6: TPanel Left = 113 Top = 3 Width = 80 Height = 19 Align = alLeft BevelInner = bvLowered BevelOuter = bvNone TabOrder = 1 end object Panel7: TPanel Left = 193 Top = 3 Width = 112 Height = 19 Align = alLeft BevelInner = bvLowered BevelOuter = bvNone TabOrder = 2 end object Panel9: TPanel Left = 305 Top = 3 Width = 120 Height = 19 Align = alLeft BevelInner = bvLowered BevelOuter = bvNone TabOrder = 3 end object Panel10: TPanel Left = 425 Top = 3 Width = 80 Height = 19 Align = alLeft BevelInner = bvLowered BevelOuter = bvNone TabOrder = 4 end object Panel8: TPanel Left = 505 Top = 3 Width = 293 Height = 20 Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 5 end end object MainMenu1: TMainMenu Left = 8 Top = 184 object File1: TMenuItem Caption = '&File' GroupIndex = 1 ShortCut = 0 OnClick = File1Click object NewProject1: TMenuItem Caption = 'New &Project' Enabled = False ShortCut = 0 OnClick = NewProject1Click end object OpenProject1: TMenuItem Caption = 'Open P&roject' Enabled = False ShortCut = 0 OnClick = OpenProject1Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object New1: TMenuItem Caption = '&New File' ShortCut = 0 OnClick = New1Click end object Open1: TMenuItem Caption = '&Open File' ShortCut = 0 OnClick = Open1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = 'E&xit' ShortCut = 0 OnClick = Exit1Click end end object Edit1: TMenuItem Caption = '&Edit' GroupIndex = 2 ShortCut = 0 OnClick = Edit1Click object Cut1: TMenuItem Caption = '&Cut' ShortCut = 0 OnClick = Cut1Click end object Copy1: TMenuItem Caption = 'C&opy' ShortCut = 0 OnClick = Copy1Click end object Paste1: TMenuItem Caption = '&Paste' ShortCut = 0 OnClick = Paste1Click end object Delete1: TMenuItem Caption = '&Delete' ShortCut = 0 OnClick = Delete1Click end object Search1: TMenuItem Caption = '&Search' ShortCut = 113 OnClick = Search1Click end object SearchNext1: TMenuItem Caption = 'Search &Next' ShortCut = 114 OnClick = SearchNext1Click end object Replace1: TMenuItem Caption = '&Replace' ShortCut = 115 OnClick = Replace1Click end object test1: TMenuItem Caption = '-' ShortCut = 0 end object Undo1: TMenuItem Caption = '&Undo' Enabled = False ShortCut = 0 OnClick = Undo1Click end object Redo1: TMenuItem Caption = 'R&edo' Enabled = False ShortCut = 0 OnClick = Redo1Click end end object HTML1: TMenuItem Caption = '&HTML' GroupIndex = 3 ShortCut = 0 object Background1: TMenuItem Caption = '&Background' ShortCut = 0 OnClick = Background1Click end object Image1: TMenuItem Caption = '&Image' ShortCut = 0 OnClick = Image1Click end object URL1: TMenuItem Caption = '&URL' ShortCut = 0 OnClick = URL1Click end object Targets1: TMenuItem Caption = '&Anchors' ShortCut = 0 OnClick = Targets1Click end object Header1: TMenuItem Caption = '&Header' ShortCut = 0 OnClick = Header1Click end object Lists1: TMenuItem Caption = '&Lists' ShortCut = 0 object NumberedList1: TMenuItem Caption = '&Numbered List' ShortCut = 0 OnClick = NumberedList1Click end object UnnumberedList1: TMenuItem Caption = '&Unnumbered List' ShortCut = 0 OnClick = UnnumberedList1Click end object DefinitionList1: TMenuItem Caption = '&Definition List' ShortCut = 0 OnClick = DefinitionList1Click end object Menu1: TMenuItem Caption = '&Menu' ShortCut = 0 OnClick = Menu1Click end object Directory1: TMenuItem Caption = 'D&irectory' ShortCut = 0 OnClick = Directory1Click end end object Format1: TMenuItem Caption = '&Format' ShortCut = 0 object ForcedLineBreak1: TMenuItem Caption = '&Forced Line Break' ShortCut = 0 OnClick = ForcedLineBreak1Click end object Paragraph1: TMenuItem Caption = '&Paragraph' ShortCut = 0 OnClick = Paragraph1Click end object HorizontalTab1: TMenuItem Caption = '&Horizontal Tab' ShortCut = 0 OnClick = HorizontalTab1Click end object CenterLine1: TMenuItem Caption = '&Center Line' ShortCut = 0 OnClick = CenterLine1Click end object HorizontalRule1: TMenuItem Caption = 'Hori&zontal Rule' ShortCut = 0 OnClick = HorizontalRule1Click end object Preformatted1: TMenuItem Caption = 'P&reformatted Text' ShortCut = 0 OnClick = Preformatted1Click end object AddressBlock1: TMenuItem Caption = '&Address Block' ShortCut = 0 OnClick = AddressBlock1Click end object BlockQuote1: TMenuItem Caption = 'Block &Quote' ShortCut = 0 OnClick = BlockQuote1Click end object LastModified1: TMenuItem Caption = '&Last Modified' ShortCut = 0 OnClick = LastModified1Click end end object Tables1: TMenuItem Caption = 'Tabl&es' ShortCut = 0 OnClick = Tables1Click end object TextFormat1: TMenuItem Caption = 'Te&xt Format' ShortCut = 0 object Bold1: TMenuItem Caption = '&Bold' ShortCut = 0 OnClick = Bold1Click end object Italic1: TMenuItem Caption = '&Italic' ShortCut = 0 OnClick = Italic1Click end object Strong1: TMenuItem Caption = '&Strong' ShortCut = 0 OnClick = Strong1Click end object Emphasis1: TMenuItem Caption = 'E&mphasis' ShortCut = 0 OnClick = Emphasis1Click end object Citation1: TMenuItem Caption = '&Citation' ShortCut = 0 OnClick = Citation1Click end object Code1: TMenuItem Caption = 'C&ode' ShortCut = 0 OnClick = Code1Click end object Blinking1: TMenuItem Caption = 'B&linking' ShortCut = 0 OnClick = Blinking1Click end object Underline1: TMenuItem Caption = '&Underline' ShortCut = 0 OnClick = Underline1Click end object Comment1: TMenuItem Caption = 'Co&mment' ShortCut = 0 OnClick = Comment1Click end object Sample1: TMenuItem Caption = 'S&le' ShortCut = 0 OnClick = Sample1Click end object Keyboard1: TMenuItem Caption = '&Keyboard' ShortCut = 0 OnClick = Keyboard1Click end object Variable1: TMenuItem Caption = '&Variable' ShortCut = 0 OnClick = Variable1Click end object Definition1: TMenuItem Caption = '&Definition' ShortCut = 0 OnClick = Definition1Click end end object Symbols1: TMenuItem Caption = 'S&ymbols' ShortCut = 0 OnClick = Symbols1Click end object Form1: TMenuItem Caption = 'For&ms' ShortCut = 0 object FormBody1: TMenuItem Caption = 'Form &Body' ShortCut = 0 OnClick = FormBody1Click end object MailTo1: TMenuItem Caption = 'Mail &To' ShortCut = 0 OnClick = MailTo1Click end object MailSubject1: TMenuItem Caption = 'Mail &Subject' ShortCut = 0 OnClick = MailSubject1Click end object Input1: TMenuItem Caption = '&Input' ShortCut = 0 OnClick = Input1Click end end object Font1: TMenuItem Caption = 'Fo&nt' ShortCut = 0 OnClick = Font1Click end object Base1: TMenuItem Caption = 'Ba&se' ShortCut = 0 OnClick = Base1Click end end object Frame1: TMenuItem Caption = 'F&rame' GroupIndex = 3 ShortCut = 0 object NewFramePage1: TMenuItem Caption = '&New Frame Page' ShortCut = 0 OnClick = NewFramePage1Click end object FrameSet1: TMenuItem Caption = 'Frame&Set' ShortCut = 0 OnClick = FrameSet1Click end object Frame2: TMenuItem Caption = '&Frame' ShortCut = 0 OnClick = Frame2Click end object NoFrames1: TMenuItem Caption = 'N&o Frames' ShortCut = 0 OnClick = NoFrames1Click end end object Browser1: TMenuItem Caption = '&Browser' GroupIndex = 4 ShortCut = 0 OnClick = Browser1Click end object View1: TMenuItem Caption = '&View' GroupIndex = 4 ShortCut = 0 object FormToolbar1: TMenuItem Caption = 'Form Toolbar' ShortCut = 0 OnClick = FormToolbar1Click end object UserToolbar1: TMenuItem Caption = 'User Toolbar' ShortCut = 0 OnClick = UserToolbar1Click end end object Window1: TMenuItem Caption = '&Window' GroupIndex = 5 ShortCut = 0 object Cascade1: TMenuItem Caption = '&Cascade' ShortCut = 0 OnClick = Cascade1Click end object Tile1: TMenuItem Caption = '&Tile' ShortCut = 0 OnClick = Tile1Click end end object Options1: TMenuItem Caption = '&Options' GroupIndex = 6 ShortCut = 0 OnClick = Options1Click object DefineToolbar1: TMenuItem Caption = '&Define Toolbar' ShortCut = 0 object Edit2: TMenuItem Caption = '&Edit' ShortCut = 0 OnClick = Edit2Click end object Load1: TMenuItem Caption = '&Load' ShortCut = 0 OnClick = Load1Click end end object Browser2: TMenuItem Caption = '&Browser' ShortCut = 0 OnClick = Browser2Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object ExampleText1: TMenuItem Caption = 'E&xample Text' Checked = True Enabled = False ShortCut = 0 OnClick = ExampleText1Click end object CreateBackupFile1: TMenuItem Caption = 'Cr&eate Backup File' Checked = True Enabled = False ShortCut = 0 OnClick = CreateBackupFile1Click end object Wordwrap1: TMenuItem Caption = '&Wordwrap' Checked = True Enabled = False ShortCut = 0 OnClick = Wordwrap1Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object DocumentFont1: TMenuItem Caption = '&Font' Enabled = False ShortCut = 0 OnClick = DocumentFont1Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Register1: TMenuItem Caption = '&Register' ShortCut = 0 OnClick = Register1Click end end object About1: TMenuItem Caption = '&About' GroupIndex = 6 ShortCut = 0 OnClick = About1Click end object Help1: TMenuItem Caption = '&Help' GroupIndex = 7 ShortCut = 0 OnClick = Help1Click end end object SaveDialog1: TSaveDialog FileEditStyle = fsEdit Filter = 'Web Pages (*.HTML)|*.html|Web Pages (*.htm)|*.htm|Project Files ' + '(*.pro)|*.pro|All Files (*.*)|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist] Left = 8 Top = 216 end object OpenDialog1: TOpenDialog FileEditStyle = fsEdit Filter = 'Web Pages (*.html)|*.html|Web Pages (*.htm)|*.htm|All Files (*.*' + ')|*.*' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Left = 40 Top = 216 end object PrinterSetupDialog1: TPrinterSetupDialog Left = 40 Top = 312 end object ReplaceDialog1: TReplaceDialog Options = [frDown, frReplace] OnFind = FindDialog1Find OnReplace = ReplaceDialog1Replace Left = 40 Top = 248 end object FindDialog1: TFindDialog OnFind = FindDialog1Find Left = 8 Top = 248 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -17 Font.Name = 'System' Font.Style = [] MinFontSize = 0 MaxFontSize = 0 Options = [fdEffects, fdForceFontExist] Left = 8 Top = 280 end object DdeClientConv1: TDdeClientConv ConnectMode = ddeManual Left = 8 Top = 312 end end