object wwRichEditForm: TwwRichEditForm Left = 181 Top = 154 Width = 610 Height = 455 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = 'Edit Rich Text' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Menu = MainMenu1 OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnKeyPress = FormKeyPress OnKeyUp = FormKeyUp OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object ToolBarBevel: TBevel Left = 0 Top = 0 Width = 602 Height = 2 Align = alTop Shape = bsTopLine end object FormatBarBevel: TBevel Left = 0 Top = 26 Width = 602 Height = 2 Align = alTop Shape = bsTopLine end object RulerBevel: TBevel Left = 0 Top = 54 Width = 602 Height = 2 Align = alTop Shape = bsTopLine end object StatusBar: TStatusBar Left = 0 Top = 390 Width = 602 Height = 19 Align = alNone Panels = < item Bevel = pbNone Width = 300 end item Width = 32 end item Width = 32 end item Bevel = pbNone Width = 18 end> SimplePanel = False end object FormatBar: TPanel Left = 0 Top = 28 Width = 602 Height = 26 Align = alTop BevelOuter = bvNone TabOrder = 1 object BoldButton: TSpeedButton Left = 313 Top = 2 Width = 23 Height = 22 AllowAllUp = True GroupIndex = 1 Flat = True Glyph.Data = { CE000000424DCE0000000000000076000000280000000B0000000B0000000100 0400000000005800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888880 0000800000000880000088000880008000008800088000800000880008800080 0000880000000880000088000880008000008800088000800000880008800080 000080000000088000008888888888800000} Margin = 4 ParentShowHint = False ShowHint = False OnClick = BoldButtonClick OnMouseDown = BoldButtonMouseDown end object UnderlineButton: TSpeedButton Left = 359 Top = 2 Width = 23 Height = 22 AllowAllUp = True GroupIndex = 2 Flat = True Glyph.Data = { EE000000424DEE0000000000000076000000280000000B0000000F0000000100 0400000000007800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888880 0000800000000080000088888888888000008880000088800000880088800880 0000880088800880000088008880088000008800888008800000880088800880 0000880088800880000088008880088000008000080000800000888888888880 000088888888888000008888888888800000} Margin = 4 ParentShowHint = False ShowHint = False OnClick = UnderlineButtonClick OnMouseDown = BoldButtonMouseDown end object ItalicButton: TSpeedButton Left = 336 Top = 2 Width = 23 Height = 22 AllowAllUp = True GroupIndex = 3 Flat = True Glyph.Data = { CE000000424DCE0000000000000076000000280000000F0000000B0000000100 0400000000005800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8880800000088888888088800088888888808888000888888880888880008888 8880888888000888888088888880008888808888888800088880888888888000 888088888888000000808888888888888880} Margin = 2 ParentShowHint = False ShowHint = False OnClick = ItalicButtonClick OnMouseDown = BoldButtonMouseDown end object LeftButton: TSpeedButton Left = 413 Top = 2 Width = 23 Height = 22 GroupIndex = 4 Flat = True Glyph.Data = { F6000000424DF60000000000000076000000280000000C000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 0000888888888888000088888888888800000000000000080000888888888888 0000000000008888000088888888888800000000000000080000888888888888 0000000000008888000088888888888800000000000000080000888888888888 0000000000008888000088888888888800008888888888880000} Margin = 4 ParentShowHint = False ShowHint = False OnClick = LeftButtonClick end object CenterButton: TSpeedButton Left = 436 Top = 2 Width = 23 Height = 22 GroupIndex = 4 Flat = True Glyph.Data = { F6000000424DF60000000000000076000000280000000D000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8000888888888888800088888888888880008000000000008000888888888888 8000888800000888800088888888888880008000000000008000888888888888 8000888000000088800088888888888880008000000000008000888888888888 8000888800000888800088888888888880008888888888888000} Margin = 4 ParentShowHint = False ShowHint = False OnClick = CenterButtonClick end object RightButton: TSpeedButton Left = 459 Top = 2 Width = 23 Height = 22 GroupIndex = 4 Flat = True Glyph.Data = { F6000000424DF60000000000000076000000280000000D000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8000888888888888800088888888888880008000000000008000888888888888 8000888800000000800088888888888880008000000000008000888888888888 8000888800000000800088888888888880008000000000008000888888888888 8000888800000000800088888888888880008888888888888000} Margin = 4 ParentShowHint = False ShowHint = False OnClick = RightButtonClick end object BulletButton: TSpeedButton Left = 490 Top = 2 Width = 23 Height = 22 AllowAllUp = True GroupIndex = 5 Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888888888888888888444888888888888844488000000008884448888888 8888888888888888888888888888888888888844488888888888884448800000 0008884448888888888888888888888888888888888888888888884448888888 8888884448800000000888444888888888888888888888888888} Margin = 1 ParentShowHint = False ShowHint = False OnClick = BulletButtonClick OnMouseDown = BoldButtonMouseDown end object Bevel3: TBevel Left = 408 Top = 1 Width = 2 Height = 24 end object Bevel4: TBevel Left = 485 Top = 1 Width = 2 Height = 24 end object SpeedButton1: TSpeedButton Left = 382 Top = 2 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888880000008000800088888888880000008808880888888888880000008800 0008000008888800000088808080BFBFB0088800000088800080808BFBF08800 0000888808880E0808B08800000088880880808090FB0800000088888000BFB8 08BF0800000088880BFBFBFB808B0800000088880F808FBF080F080000008888 0B050808808B0800000088880F8080D0BFB088000000888880FBF808FB088800 000088888800BFBF008888000000888888880000888888000000888888888888 888888000000888888888888888888000000} Margin = 1 ParentShowHint = False ShowHint = False OnClick = SpeedButton1Click end object FontNameCombo: TwwDBComboBox Left = 6 Top = 3 Width = 241 Height = 21 ShowButton = True Style = csDropDown MapList = False AllowClearKey = False DropDownCount = 20 ItemHeight = 0 ParentShowHint = False ShowHint = False Sorted = True TabOrder = 0 UnboundDataType = wwDefault OnDropDown = FontNameComboDropDown OnCloseUp = FontNameComboCloseUp end object FontSizeCombo: TwwDBComboBox Left = 255 Top = 3 Width = 50 Height = 21 ShowButton = True Style = csDropDown MapList = False AllowClearKey = False DropDownCount = 8 ItemHeight = 0 Items.Strings = ( '8' '9' '10' '11' '12' '14' '16' '18' '20' '22' '24' '26' '28' '36' '48' '72') ParentShowHint = False ShowHint = False Sorted = False TabOrder = 1 UnboundDataType = wwDefault OnCloseUp = FontSizeComboCloseUp end end object Toolbar: TPanel Left = 0 Top = 2 Width = 602 Height = 24 Align = alTop BevelOuter = bvNone TabOrder = 0 object NewButton: TSpeedButton Left = 7 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { EE000000424DEE0000000000000076000000280000000D0000000F0000000100 0400000000007800000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8000800000000000800080FFFFFFFFF0800080FFFFFFFFF0800080FFFFFFFFF0 800080FFFFFFFFF0800080FFFFFFFFF0800080FFFFFFFFF0800080FFFFFFFFF0 800080FFFFFFFFF0800080FFFFFF0000800080FFFFFF0F08800080FFFFFF0088 800080000000088880008888888888888000} Margin = 3 ParentShowHint = False ShowHint = False OnClick = NewButtonClick end object LoadButton1: TSpeedButton Left = 415 Top = 3 Width = 22 Height = 22 AllowAllUp = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888888888888888000000000008888800333333333088880B0333333333 08880FB03333333330880BFB0333333333080FBFB000000000000BFBFBFBFB08 88880FBFBFBFBF0888880BFB0000000888888000888888880008888888888888 8008888888880888080888888888800088888888888888888888} Margin = 1 ParentShowHint = False ShowHint = False Visible = False OnClick = LoadButton1Click end object SaveAsButton: TSpeedButton Left = 437 Top = 3 Width = 22 Height = 22 AllowAllUp = True Glyph.Data = { F6000000424DF60000000000000076000000280000000F000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8880880000000000000080330000008803008033000000880300803300000088 0300803300000000030080333333333333008033000000003300803088888888 0300803088888888030080308888888803008030888888880300803088888888 0000803088888888080080000000000000008888888888888880} Margin = 1 ParentShowHint = False ShowHint = False Visible = False OnClick = SaveAsButtonClick end object PrintButton: TSpeedButton Left = 31 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888800000000000888808888888880808800000000000008080888888BBB88 0008088888877788080800000000000008800888888888808080800000000008 0800880FFFFFFFF080808880F00000F000088880FFFFFFFF088888880F00000F 088888880FFFFFFFF08888888000000000888888888888888888} Margin = 2 ParentShowHint = False ShowHint = False OnClick = PrintButtonClick end object FindButton: TSpeedButton Left = 63 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { F6000000424DF60000000000000076000000280000000F000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8880000008888800000008000888880800000800088888080000000000080000 0000808000000800000000800080080000000080008008000000800000000000 0080880800080800088088000008000008808880008880008880888080888080 8880888000888000888088888888888888808888888888888880} Margin = 2 ParentShowHint = False ShowHint = False OnClick = FindButtonClick end object CutButton: TSpeedButton Left = 94 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { F6000000424DF60000000000000076000000280000000D000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8000888008888888800088088088008880008808808088088000880880808808 8000888000808808800088888080008880008888800088888000888888088888 8000888880008888800088888080888880008888008008888000888808880888 8000888808880888800088880888088880008888888888888000} Margin = 3 ParentShowHint = False ShowHint = False OnClick = CutButtonClick end object CopyButton: TSpeedButton Left = 117 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333333333300000000033333330FFFFFFF033333330F000 00F030000000FFFFFFF030FFFFF0F00000F030F00000FFFFFFF030FFFFF0F00F 000030F00000FFFF0F0330FFFFF0FFFF003330F00F000000033330FFFF0F0333 333330FFFF003333333330000003333333333333333333333333} Margin = 1 ParentShowHint = False ShowHint = False OnClick = CopyButtonClick end object UndoButton: TSpeedButton Left = 171 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { F6000000424DF60000000000000076000000280000000E000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8800888888888888880088888888888888008888888888888800888888888888 8800888888888880880080000088888088008000088888880800800088888888 0800800808888888080080888008888088008888888000088800888888888888 8800888888888888880088888888888888008888888888888800} Margin = 3 ParentShowHint = False ShowHint = False OnClick = UndoButtonClick end object PasteButton: TSpeedButton Left = 140 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888888800000000008000000FFFFFFFF00737370F000000F00373730FFFFF FFF00737370F000F00000373730FFFFF0F080737370FFFFF0088037373000000 0088073737373737308803F0000000077088077088888807308803730B00B073 7088800000BB0000088888888000088888888888888888888888} Margin = 2 ParentShowHint = False ShowHint = False OnClick = PasteButtonClick end object RedoButton: TSpeedButton Left = 194 Top = 1 Width = 23 Height = 22 AllowAllUp = True Flat = True Glyph.Data = { AE000000424DAE0000000000000076000000280000000C000000070000000100 0400000000003800000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00708777777777 0000807777700000000007777777000000000777777770000000077777770700 000080777700777000007800007777770000} Margin = 3 ParentShowHint = False ShowHint = False OnClick = RedoButtonClick end object ToolbarBevel1: TBevel Left = 89 Top = 1 Width = 2 Height = 22 end object Bevel1: TBevel Left = 57 Top = 1 Width = 2 Height = 22 end object Bevel2: TBevel Left = 166 Top = 1 Width = 2 Height = 22 end object UserButtonBevel: TBevel Left = 220 Top = 1 Width = 2 Height = 22 Visible = False end end object MainMenu1: TMainMenu Left = 16 Top = 237 object File1: TMenuItem Caption = '&File' object Load1: TMenuItem Caption = '&Load' OnClick = Load1Click end object SaveAs1: TMenuItem Caption = 'Save &As' OnClick = SaveAs1Click end object SaveExit1: TMenuItem Caption = '&Save and Exit' ShortCut = 16467 OnClick = SaveExit1Click end object FileSep1: TMenuItem Caption = '-' end object Print1: TMenuItem Caption = '&Print' ShortCut = 16464 OnClick = Print1Click end object PageSetup1: TMenuItem Caption = 'Page Set&up' OnClick = PageSetup1Click end object FileSep2: TMenuItem Caption = '-' end object Exit1: TMenuItem Caption = 'E&xit' OnClick = Exit1Click end end object Edit1: TMenuItem Caption = '&Edit' ShortCut = 16474 OnClick = Edit1Click object Undo1: TMenuItem Caption = '&Undo' ShortCut = 16474 OnClick = Undo1Click end object Redo1: TMenuItem Caption = '&Redo' ShortCut = 16473 OnClick = Redo1Click end object EditSep1: TMenuItem Caption = '-' end object Cut1: TMenuItem Caption = 'Cu&t' ShortCut = 16472 OnClick = Cut1Click end object Copy1: TMenuItem Caption = '&Copy' ShortCut = 16451 OnClick = Copy1Click end object Paste1: TMenuItem Caption = '&Paste' ShortCut = 16470 OnClick = Paste1Click end object Clear1: TMenuItem Caption = 'Cle&ar' OnClick = Clear1Click end object SelectAll1: TMenuItem Caption = 'Select A&ll' ShortCut = 16449 OnClick = SelectAll1Click end object EditSep2: TMenuItem Caption = '-' end object Find1: TMenuItem Caption = '&Find' ShortCut = 16454 OnClick = Find1Click end object FindNext1: TMenuItem Caption = 'Find &Next' ShortCut = 114 OnClick = FindNext1Click end object Replace1: TMenuItem Caption = 'R&eplace' ShortCut = 16456 OnClick = Replace1Click end end object View1: TMenuItem Caption = '&View' object Toolbar1: TMenuItem Caption = '&Toolbar' Checked = True OnClick = Toolbar1Click end object FormatBar1: TMenuItem Caption = '&Format Bar' Checked = True OnClick = FormatBar1Click end object StatusBar1: TMenuItem Caption = '&Status Bar' Checked = True OnClick = StatusBar1Click end object Ruler1: TMenuItem Caption = '&Ruler' Checked = True OnClick = Ruler1Click end object OptionsSep: TMenuItem Caption = '-' Visible = False end object Options1: TMenuItem Caption = '&Options' Visible = False end end object Insert1: TMenuItem Caption = '&Insert' object DateandTime1: TMenuItem Caption = 'Date and Time' Visible = False end object InsertObject1: TMenuItem Caption = '&Object...' OnClick = InsertObject1Click end end object Format1: TMenuItem Caption = 'F&ormat' object Font1: TMenuItem Caption = '&Font' OnClick = Font1Click end object BulletStyle1: TMenuItem Caption = '&Bullet Style' OnClick = BulletStyle1Click end object Paragraph1: TMenuItem Caption = '&Paragraph' OnClick = Paragraph1Click end object Tabs1: TMenuItem Caption = '&Tabs' OnClick = Tabs1Click end end object Help1: TMenuItem Caption = 'Help' Visible = False end end object PrintDialog1: TPrintDialog Left = 48 Top = 237 end object OpenDialog1: TOpenDialog Filter = 'Rich Text Files (*.RTF)|*.RTF|Text Files (*.TXT)|*.TXT' Left = 127 Top = 237 end object SaveDialog1: TSaveDialog DefaultExt = 'rtf' Filter = 'Rich Text Files (*.RTF)|*.RTF|Text Files (*.TXT)|*.TXT' Left = 85 Top = 237 end object PopupMenu1: TPopupMenu Left = 172 Top = 232 object Black1: TMenuItem Caption = 'Black' end object Green1: TMenuItem Tag = 128 Caption = 'Maroon' end object Red1: TMenuItem Tag = 32768 Caption = 'Green' end object Blue1: TMenuItem Tag = 32896 Caption = 'Olive' end object Yellow1: TMenuItem Tag = 8388608 Caption = 'Navy' end object Purple1: TMenuItem Tag = 8388736 Caption = 'Purple' end object Teal1: TMenuItem Tag = 8421376 Caption = 'Teal' end object Gray1: TMenuItem Tag = 8421504 Caption = 'Gray' end object Silver1: TMenuItem Tag = 12632256 Caption = 'Silver' end object Red2: TMenuItem Tag = 255 Caption = 'Red' end object Lime1: TMenuItem Tag = 65280 Caption = 'Lime' end object Yellow2: TMenuItem Tag = 65535 Caption = 'Yellow' end object Blue2: TMenuItem Tag = 16711680 Caption = 'Blue' end object Fuchsia1: TMenuItem Tag = 16711935 Caption = 'Fuchsia' end object Aqua1: TMenuItem Tag = 16776960 Caption = 'Aqua' end object White1: TMenuItem Tag = 16777215 Caption = 'White' end object Automatic1: TMenuItem Caption = 'Automatic' end end end