home *** CD-ROM | disk | FTP | other *** search
Text File | 1996-11-25 | 58.4 KB | 2,103 lines |
- object WPCForm: TWPCForm
- Left = 236
- Top = 108
- Width = 564
- Height = 443
- Caption = 'Web Page Creator'
- Color = clSilver
- Font.Color = clWindowText
- Font.Height = -18
- Font.Name = 'System'
- Font.Style = []
- FormStyle = fsMDIForm
- Icon.Data = {<image000.ico>}
- Menu = MainMenu1
- PopupMenu = PopupMenu1
- Position = poDefault
- WindowState = wsMaximized
- WindowMenu = Window1
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnHide = FormHide
- OnResize = FormResize
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 20
- object ScrollBox1: TScrollBox
- Left = 0
- Top = 0
- Width = 556
- Height = 161
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- Align = alTop
- TabOrder = 0
- object Panel2: TPanel
- Left = 0
- Top = 85
- Width = 552
- 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 = 552
- Height = 85
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 1
- object TabbedNotebook1: TTabbedNotebook
- Left = 124
- Top = 5
- Width = 670
- Height = 76
- TabFont.Color = clBtnText
- TabFont.Height = -13
- TabFont.Name = 'MS Sans Serif'
- TabFont.Style = []
- TabOrder = 0
- object TTabPage
- Left = 4
- Top = 31
- Caption = 'Text Attributes'
- object SpeedButton7: TSpeedButton
- Left = 1
- Top = 1
- Width = 32
- Height = 35
- 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 = 298
- Top = 1
- Width = 32
- Height = 35
- 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 = 133
- Top = 1
- Width = 32
- Height = 35
- 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 = 68
- Top = 1
- Width = 31
- Height = 35
- 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 = 529
- Top = 1
- Width = 32
- Height = 35
- 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 = 100
- Top = 1
- Width = 33
- Height = 35
- 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 = 233
- Top = 1
- Width = 31
- Height = 35
- 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 = 166
- Top = 1
- Width = 32
- Height = 35
- 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 = 265
- Top = 1
- Width = 33
- Height = 35
- 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 = 595
- Top = 1
- Width = 33
- Height = 35
- 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 = 364
- Top = 1
- Width = 32
- Height = 35
- 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 = 331
- Top = 1
- Width = 32
- Height = 35
- 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 = 628
- Top = 1
- Width = 32
- Height = 35
- 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 = 199
- Top = 1
- Width = 32
- Height = 35
- 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
- object SpeedButton2: TSpeedButton
- Left = 563
- Top = 1
- Width = 31
- Height = 35
- Hint = 'Teletype or monospaced text'
- Caption = 'Tt'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Teletype1Click
- end
- object SpeedButton30: TSpeedButton
- Left = 430
- Top = 1
- Width = 33
- Height = 35
- Hint = 'Strike-through text'
- Caption = 'Sk'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = StrikeThrough1Click
- end
- object SpeedButton70: TSpeedButton
- Left = 34
- Top = 1
- Width = 32
- Height = 35
- Hint = 'Large font text'
- Caption = 'Big'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Big1Click
- end
- object SpeedButton71: TSpeedButton
- Left = 463
- Top = 1
- Width = 32
- Height = 35
- Hint = 'Small font text'
- Caption = 'Sm'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Small1Click
- end
- object SpeedButton72: TSpeedButton
- Left = 398
- Top = 1
- Width = 31
- Height = 35
- Hint = 'Subscript text'
- Caption = 'Sb'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Subscript1Click
- end
- object SpeedButton73: TSpeedButton
- Left = 496
- Top = 1
- Width = 32
- Height = 35
- Hint = 'Superscript text'
- Caption = 'Sp'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Superscript1Click
- end
- end
- object TTabPage
- Left = 4
- Top = 31
- Caption = 'Format'
- object SpeedButton18: TSpeedButton
- Left = 515
- Top = 1
- Width = 71
- Height = 35
- Hint = 'Paragraph Break'
- Caption = 'Para'
- 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 = 369
- Top = 1
- Width = 71
- Height = 35
- Hint = 'Horizontal Rule'
- Caption = 'Hor Rule'
- 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 = 223
- Top = 1
- Width = 71
- Height = 35
- Hint = 'Center Line'
- Caption = 'Center'
- 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 = 588
- Top = 1
- Width = 71
- Height = 35
- Hint = 'Preformatted Text'
- Caption = 'Preform'
- 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 = 150
- Top = 1
- Width = 71
- Height = 35
- Hint = 'Forced Line Break'
- Caption = 'Break'
- 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 = 4
- Top = 1
- Width = 71
- Height = 35
- Hint = 'Address Block'
- Caption = 'Address'
- 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 = 78
- Top = 1
- Width = 70
- Height = 35
- Hint = 'Block Quote'
- Caption = 'Bl Quote'
- 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 = 443
- Top = 1
- Width = 70
- Height = 35
- Hint = 'Last Modified'
- Caption = 'Last Mod'
- 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 = 296
- Top = 1
- Width = 72
- Height = 35
- Hint = 'Header 1-6'
- Caption = 'Header'
- Font.Color = clGreen
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Header1Click
- end
- end
- object TTabPage
- Left = 4
- Top = 31
- Caption = 'Lists'
- object SpeedButton22: TSpeedButton
- Left = 398
- Top = 1
- Width = 130
- Height = 35
- Hint = 'Numbered List'
- Caption = 'Numbered'
- 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 SpeedButton24: TSpeedButton
- Left = 3
- Top = 1
- Width = 130
- Height = 35
- Hint = 'Definition List'
- Caption = 'Definition'
- 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 SpeedButton23: TSpeedButton
- Left = 530
- Top = 1
- Width = 130
- Height = 35
- Hint = 'Unnumbered List'
- Caption = 'Unnumbered'
- 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 SpeedButton38: TSpeedButton
- Left = 134
- Top = 1
- Width = 130
- Height = 35
- Hint = 'Directory List'
- Caption = 'Directory'
- Font.Color = clNavy
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Directory1Click
- end
- object SpeedButton40: TSpeedButton
- Left = 266
- Top = 1
- Width = 130
- Height = 35
- Hint = 'Menu'
- Caption = 'Menu'
- Font.Color = clNavy
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Menu1Click
- end
- end
- object TTabPage
- Left = 4
- Top = 31
- Caption = 'Back/Links/Etc.'
- object SpeedButton27: TSpeedButton
- Left = 0
- Top = 1
- Width = 68
- Height = 35
- 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 SpeedButton26: TSpeedButton
- Left = 210
- Top = 1
- Width = 68
- Height = 35
- 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 SpeedButton29: TSpeedButton
- Left = 350
- Top = 1
- Width = 68
- Height = 35
- 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 SpeedButton31: TSpeedButton
- Left = 280
- Top = 1
- Width = 68
- Height = 35
- 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 SpeedButton25: TSpeedButton
- Left = 140
- Top = 1
- Width = 68
- Height = 35
- 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 SpeedButton32: TSpeedButton
- Left = 70
- Top = 1
- Width = 68
- Height = 35
- Hint = 'Toggle Form Create Bar'
- Caption = 'Form'
- 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 = 583
- Top = 1
- Width = 78
- Height = 35
- 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
- object SpeedButton74: TSpeedButton
- Left = 420
- Top = 1
- Width = 79
- Height = 35
- Hint = 'Scrolling Marquee'
- Caption = 'Marquee'
- Font.Color = clPurple
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Marquee1Click
- end
- object SpeedButton75: TSpeedButton
- Left = 501
- Top = 1
- Width = 79
- Height = 35
- Hint = 'Embed a sound file'
- Caption = 'Sound'
- Font.Color = clPurple
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Sound1Click
- end
- end
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 120
- Width = 552
- 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 = 115
- Height = 78
- Font.Color = clBlue
- Font.Height = -17
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- object SpeedButton10: TSpeedButton
- Left = 4
- 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 = 31
- 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 = 85
- Top = 19
- 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 = 4
- 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 = 31
- 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 = 58
- 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
- object SpeedButton68: TSpeedButton
- Left = 58
- Top = 46
- Width = 25
- Height = 25
- Hint = 'Primary Browser'
- Caption = 'PB'
- Font.Color = clBlue
- Font.Height = -15
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- NumGlyphs = 2
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Primary1Click
- end
- object SpeedButton69: TSpeedButton
- Left = 85
- Top = 46
- Width = 25
- Height = 25
- Hint = 'Secondary Browser'
- Caption = 'SB'
- Font.Color = clBlue
- Font.Height = -15
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Secondary1Click
- end
- end
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 354
- Width = 556
- Height = 25
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'System'
- Font.Style = [fsBold]
- Panels = <
- item
- Alignment = taCenter
- Width = 112
- end
- item
- Alignment = taCenter
- Width = 80
- end
- item
- Alignment = taCenter
- Width = 112
- end
- item
- Alignment = taCenter
- Width = 120
- end
- item
- Alignment = taCenter
- Width = 90
- end
- item
- Width = 50
- end>
- ParentFont = False
- SimplePanel = False
- Visible = False
- 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 Hist1: TMenuItem
- Caption = 'History'
- GroupIndex = 8
- ShortCut = 0
- object History1: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History1Click
- end
- object History2: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History2Click
- end
- object History3: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History3Click
- end
- object History4: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History4Click
- end
- object History5: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History5Click
- end
- object History6: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History6Click
- end
- object History7: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History7Click
- end
- object History8: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History8Click
- end
- object History9: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History9Click
- end
- object History10: TMenuItem
- ShortCut = 0
- Visible = False
- OnClick = History10Click
- end
- end
- object Edit1: TMenuItem
- Caption = '&Edit'
- GroupIndex = 8
- 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 N7: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object SpellCheck1: TMenuItem
- Caption = 'Spe&ll Check'
- Enabled = False
- ShortCut = 0
- OnClick = SpellCheck1Click
- 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 = 8
- 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 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 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
- object Teletype1: TMenuItem
- Caption = '&Teletype'
- ShortCut = 0
- OnClick = Teletype1Click
- end
- object StrikeThrough1: TMenuItem
- Caption = 'St&rike-Through'
- ShortCut = 0
- OnClick = StrikeThrough1Click
- end
- object Big1: TMenuItem
- Caption = 'Bi&g'
- ShortCut = 0
- OnClick = Big1Click
- end
- object Small1: TMenuItem
- Caption = 'Small'
- ShortCut = 0
- OnClick = Small1Click
- end
- object Subscript1: TMenuItem
- Caption = 'Subscript'
- ShortCut = 0
- OnClick = Subscript1Click
- end
- object Superscript1: TMenuItem
- Caption = 'Superscript'
- ShortCut = 0
- OnClick = Superscript1Click
- 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 Marquee1: TMenuItem
- Caption = 'Mar&quee'
- ShortCut = 0
- OnClick = Marquee1Click
- end
- object Sound1: TMenuItem
- Caption = 'S&ound'
- ShortCut = 0
- OnClick = Sound1Click
- end
- object Base1: TMenuItem
- Caption = 'Ba&se'
- ShortCut = 0
- OnClick = Base1Click
- end
- end
- object Frame1: TMenuItem
- Caption = 'F&rame'
- GroupIndex = 8
- 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
- object FrameBuild1: TMenuItem
- Caption = 'Frame &Builder'
- ShortCut = 0
- OnClick = FrameBuild1Click
- end
- end
- object Browser1: TMenuItem
- Caption = '&Browser'
- GroupIndex = 8
- ShortCut = 0
- object Primary1: TMenuItem
- Caption = '&Primary'
- ShortCut = 0
- OnClick = Primary1Click
- end
- object Secondary1: TMenuItem
- Caption = '&Secondary'
- ShortCut = 0
- OnClick = Secondary1Click
- end
- end
- object View1: TMenuItem
- Caption = '&View'
- GroupIndex = 8
- 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 = 8
- 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 = 8
- 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 N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object GlobalSpellChecking1: TMenuItem
- Caption = 'Global Spe&ll Checking'
- Enabled = False
- ShortCut = 0
- OnClick = GlobalSpellChecking1Click
- end
- object N6: 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 TabInEdit1: TMenuItem
- Caption = '&Tab In Edit'
- Checked = True
- Enabled = False
- ShortCut = 0
- OnClick = TabInEdit1Click
- end
- object N2: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object Setup1: TMenuItem
- Caption = '&Setup'
- ShortCut = 0
- OnClick = Setup1Click
- 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 = 8
- ShortCut = 0
- OnClick = About1Click
- end
- object Help1: TMenuItem
- Caption = '&Help'
- GroupIndex = 8
- 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 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
- object RichSpell1: TRichSpell
- DictionaryMain = 'acrop.dct'
- DictionaryUser = 'custom.dct'
- Left = 40
- Top = 280
- end
- object PopupMenu1: TPopupMenu
- OnPopup = PopupMenu1Popup
- Left = 40
- Top = 186
- object Cut2: TMenuItem
- Caption = 'Cut'
- ShortCut = 0
- OnClick = Cut2Click
- end
- object Copy2: TMenuItem
- Caption = 'Copy'
- ShortCut = 0
- OnClick = Copy2Click
- end
- object Paste2: TMenuItem
- Caption = 'Paste'
- ShortCut = 0
- OnClick = Paste2Click
- end
- object Delete2: TMenuItem
- Caption = 'Delete'
- ShortCut = 0
- OnClick = Delete2Click
- end
- object N9: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object Search2: TMenuItem
- Caption = 'Search'
- ShortCut = 0
- OnClick = Search2Click
- end
- object SearchNext2: TMenuItem
- Caption = 'Search Next'
- ShortCut = 0
- OnClick = SearchNext2Click
- end
- object Replace2: TMenuItem
- Caption = 'Replace'
- ShortCut = 0
- OnClick = Replace2Click
- end
- object N10: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object SpellCheck2: TMenuItem
- Caption = 'Spell Check'
- ShortCut = 0
- OnClick = SpellCheck2Click
- end
- end
- end
-