Index: cprs/branches/tmg-cprs/CPRS-Chart/fNotes.dfm
===================================================================
--- cprs/branches/tmg-cprs/CPRS-Chart/fNotes.dfm	(revision 453)
+++ cprs/branches/tmg-cprs/CPRS-Chart/fNotes.dfm	(revision 541)
@@ -177,26 +177,4 @@
       Visible = False
       OnResize = pnlWriteResize
-      object memNewNote: TRichEdit
-        Left = 0
-        Top = 67
-        Width = 611
-        Height = 234
-        Align = alClient
-        Font.Charset = DEFAULT_CHARSET
-        Font.Color = clWindowText
-        Font.Height = -11
-        Font.Name = 'Courier New'
-        Font.Style = []
-        ParentFont = False
-        PlainText = True
-        PopupMenu = popNoteMemo
-        ScrollBars = ssBoth
-        TabOrder = 1
-        WantTabs = True
-        OnChange = memNewNoteChange
-        OnKeyDown = memNewNoteKeyDown
-        OnKeyPress = memNewNoteKeyPress
-        OnKeyUp = memNewNoteKeyUp
-      end
       object pnlFields: TPanel
         Left = 0
@@ -320,4 +298,496 @@
           Text = 'txtSubject'
           Caption = 'Subject'
+        end
+      end
+      object pnlTextWrite: TPanel
+        Left = 0
+        Top = 67
+        Width = 611
+        Height = 234
+        Align = alClient
+        BevelOuter = bvNone
+        Caption = 'pnlTextWrite'
+        TabOrder = 1
+        object memNewNote: TRichEdit
+          Left = 0
+          Top = 0
+          Width = 611
+          Height = 234
+          Align = alClient
+          Font.Charset = DEFAULT_CHARSET
+          Font.Color = clWindowText
+          Font.Height = -11
+          Font.Name = 'Courier New'
+          Font.Style = []
+          ParentFont = False
+          PlainText = True
+          PopupMenu = popNoteMemo
+          ScrollBars = ssBoth
+          TabOrder = 0
+          WantTabs = True
+          OnChange = memNewNoteChange
+          OnKeyDown = memNewNoteKeyDown
+          OnKeyPress = memNewNoteKeyPress
+          OnKeyUp = memNewNoteKeyUp
+        end
+      end
+      object pnlHTMLWrite: TPanel
+        Left = 0
+        Top = 67
+        Width = 611
+        Height = 234
+        Align = alClient
+        BevelOuter = bvNone
+        Color = clInactiveBorder
+        TabOrder = 2
+        Visible = False
+        object pnlHTMLEdit: TPanel
+          Left = 0
+          Top = 25
+          Width = 611
+          Height = 209
+          Align = alClient
+          BevelOuter = bvNone
+          TabOrder = 0
+        end
+        object ToolBar: TToolBar
+          Left = 0
+          Top = 0
+          Width = 611
+          Height = 25
+          AutoSize = True
+          ButtonHeight = 21
+          Caption = 'ToolBar'
+          TabOrder = 1
+          TabStop = True
+          object cbFontNames: TComboBox
+            Left = 0
+            Top = 2
+            Width = 145
+            Height = 21
+            ItemHeight = 13
+            ParentShowHint = False
+            ShowHint = True
+            TabOrder = 0
+            Text = '<Pick A Font>'
+            OnClick = cbFontNamesChange
+          end
+          object cbFontSize: TComboBox
+            Left = 145
+            Top = 2
+            Width = 75
+            Height = 21
+            ItemHeight = 13
+            ItemIndex = 2
+            TabOrder = 1
+            Text = '3 (12 pt)'
+            OnClick = cbFontSizeChange
+            Items.Strings = (
+              '1 (8   pt)'
+              '2 (10 pt)'
+              '3 (12 pt)'
+              '4 (14 pt)'
+              '5 (18 pt)'
+              '6 (24 pt)'
+              '7 (36 pt)')
+          end
+          object btnFonts: TSpeedButton
+            Left = 220
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Text Font'
+            Glyph.Data = {
+              82020000424D8202000000000000420000002800000012000000100000000100
+              10000300000040020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF100010005AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF100010005AEF7BEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF100010005AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF53AD008053AD5AEF5AEF5AEF5AEF1000100010005AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF00805AEF5AEF5AEF5AEF5AEF10001000
+              5AEF5AEF7BEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF00805AEF53AD5AEF5AEF5AEF
+              100010005AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF0080008000805AEF
+              5AEF5AEF10001000100010005AEF5AEF108010805AEF5AEF5AEF5AEF00805AEF
+              53AD5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF53AD10805AEF5AEF5AEF
+              00805AEF5AEF53AD5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF10805AEF
+              5AEF53AD00800080008000805AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              10805AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF1080108010805AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF10805AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF108053AD5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF108010805AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnFontsClick
+          end
+          object btnItalic: TSpeedButton
+            Left = 243
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Italics'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000001084FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF108400000000FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000001084FFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF108400000000FFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000001084FFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF108400000000FFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000001084FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000000000000000FFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnItalicClick
+          end
+          object btnBold: TSpeedButton
+            Left = 266
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Bold'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B00000000000000000000007C0000E003
+              00001F000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7F00000000000000000000000000000000FF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7F000000000000FF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7F000000000000FF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7F000000000000FF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F0000000000000000000000000000FF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7F000000000000FF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7F000000000000FF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7F000000000000FF7F
+              FF7FFF7FFF7FFF7FFF7FFF7F00000000000000000000000000000000FF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
+              FF7FFF7FFF7F}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnBoldClick
+          end
+          object btnUnderline: TSpeedButton
+            Left = 289
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Underline'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000000000FFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000000000000000FFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000001084FFFF108400000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFFFF00000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFFFF00000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFFFF00000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFFFF00000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFFFF00000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF00000000FFFFFFFFFFFF00000000FFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000FFFF0000000000000000FFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnUnderlineClick
+          end
+          object btnBullets: TSpeedButton
+            Left = 312
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Bullets'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFF00000000000000000000000000000000
+              0000FFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFF00000000000000000000000000000000
+              0000FFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFF00000000000000000000000000000000
+              0000FFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnBulletsClick
+          end
+          object btnNumbers: TSpeedButton
+            Left = 335
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Numbering'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF10001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF1000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFF1000FFFFFFFFFFFF00000000000000000000000000000000
+              0000FFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFF1000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF1000FFFFFFFF00000000000000000000000000000000
+              0000FFFFFFFF10001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFF1000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF10001000FFFFFFFFFFFF00000000000000000000000000000000
+              0000FFFFFFFFFFFF1000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnNumbersClick
+          end
+          object btnLeftAlign: TSpeedButton
+            Left = 358
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Align Left'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000FFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000FFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000FFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnLeftAlignClick
+          end
+          object btnCenterAlign: TSpeedButton
+            Left = 381
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Align Center'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000000000000000000000000000FFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000000000000000000000000000FFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000000000000000000000000000FFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnCenterAlignClick
+          end
+          object btnRightAlign: TSpeedButton
+            Left = 404
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Align Right'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF0000000000000000000000000000000000000000000000000000
+              0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnRightAlignClick
+          end
+          object btnMoreIndent: TSpeedButton
+            Left = 427
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Indent'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000FFFF00000000FFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000FFFF000000000000000000000000
+              000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF1000FFFFFFFFFFFFFFFF000000000000000000000000
+              FFFFFFFFFFFFFFFFFFFF10001000FFFFFFFFFFFF000000000000000000000000
+              FFFFFFFFFFFF10001000100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF10001000FFFFFFFFFFFF000000000000000000000000
+              000000000000FFFFFFFF1000FFFFFFFFFFFFFFFF000000000000000000000000
+              000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000FFFF000000000000000000000000
+              000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnMoreIndentClick
+          end
+          object btnLessIndent: TSpeedButton
+            Left = 450
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Outdent'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000FFFF00000000FFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000FFFF000000000000000000000000
+              000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF1000FFFFFFFFFFFFFFFF000000000000000000000000
+              FFFFFFFFFFFFFFFF10001000FFFFFFFFFFFFFFFF000000000000000000000000
+              FFFFFFFFFFFF10001000100010001000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFF10001000FFFFFFFFFFFFFFFF000000000000000000000000
+              000000000000FFFFFFFF1000FFFFFFFFFFFFFFFF000000000000000000000000
+              000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFF0000000000000000FFFF000000000000000000000000
+              000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnLessIndentClick
+          end
+          object btnTextColor: TSpeedButton
+            Left = 473
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Text Color'
+            Glyph.Data = {
+              42020000424D4202000000000000420000002800000010000000100000000100
+              10000300000000020000130B0000130B0000000000000000000000F80000E007
+              00001F000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+              FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000FFFFFFFF
+              FFFFFFFFFFFF10001000FFFF0000000010841084108410841084108400000000
+              FFFFFFFFFFFF10001000100010841084E0FFF7BDE0FF1F001F00F7BD10841084
+              0000FFFFFFFFF7BD1000FFFFF7BDE0FFF7BDE0FF1F001F001F001F00F7BDE0FF
+              10840000FFFFF7BD1084FFFFE0FF00F800F8F7BDE0FF1F001F00F7BDE0FFF7BD
+              10840000FFFF1084FFFFE0FF00F800F800F800F8F7BDE0FFFFFFFFFFF7BDE0FF
+              10840000FFFF1084FFFFF7BDE0FF00F800F8F7BDE0FF108410001000FFFFF7BD
+              10840000FFFF1084FFFFE0FFF7BDE0FFF7BDE0FF10841000FF07100010001084
+              00000000FFFF1084FFFFF7BD00040004E0FFF7BDE0FF10841000FF0710001000
+              0000FFFFFFFF1084FFFF0004000400040004E0FFF7BDE0FF10841000E0FF0084
+              0084FFFFFFFF1084FFFFF7BD00040004E0FF1FF81FF8F7BDE0FF10840084E0FF
+              00840000FFFF1084FFFFE0FFF7BDE0FF1FF81FF81FF8E0FFFFFF1084FFFF0084
+              000000000000FFFF1084FFFFE0FFF7BD1FF81FF81FF8FFFF1084FFFFFFFFFFFF
+              0000F7BD0000FFFFFFFF1084FFFFFFFFFFFFFFFFFFFF10841084FFFFFFFFFFFF
+              FFFF00000000FFFFFFFFFFFF10841084108410841084FFFFFFFFFFFFFFFFFFFF
+              FFFFFFFF0000}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnTextColorClick
+          end
+          object btnBackColor: TSpeedButton
+            Left = 496
+            Top = 2
+            Width = 23
+            Height = 21
+            Hint = 'Background Color'
+            Glyph.Data = {
+              12030000424D1203000000000000420000002800000014000000120000000100
+              100003000000D0020000130B0000130B0000000000000000000000F80000E007
+              00001F0000005AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF0000
+              0000000000000000000000000000000000000000000000005AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF0000E007E007E0070000FF07FF07FF0700001FF81FF81FF80000
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF0000E007E007E0070000FF07FF07FF070000
+              1FF81FF81FF800005AEF5AEF5AEF5AEF5AEF5AEF5AEF0000E007E007E0070000
+              FF07FF07FF0700001FF81FF81FF800005AEF5AEF5AEF5AEF5AEF5AEF5AEF0000
+              0000000000000000000000000000000000000000000000005AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF000053AD53AD53AD0000FFFFFFFFFFFF00000000000000000000
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF000053AD53AD53AD0000FFFFFFFFFFFF0000
+              00000000000000005AEF5AEF5AEF5AEF5AEF5AEF5AEF000053AD53AD53AD0000
+              FFFFFFFFFFFF000000000000000000005AEF5AEF5AEF5AEF5AEF5AEF5AEF0000
+              0000000000000000000000000000000000000000000000005AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF000000F800F800F80000E0FFE0FFE0FF00001F001F001F000000
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF000000F800F800F80000E0FFE0FFE0FF0000
+              1F001F001F0000005AEF5AEF5AEF5AEF5AEF5AEF5AEF000000F800F800F80000
+              E0FFE0FFE0FF00001F001F001F0000005AEF5AEF5AEF5AEF5AEF5AEF5AEF0000
+              0000000000000000000000000000000000000000000000005AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF
+              5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF5AEF}
+            ParentShowHint = False
+            ShowHint = True
+            OnClick = btnBackColorClick
+          end
         end
       end
@@ -360,6 +830,4 @@
         Align = alClient
         TabOrder = 2
-        OnCommandStateChange = WebBrowser1CommandStateChange
-        OnDocumentComplete = WebBrowser1DocumentComplete
         ControlData = {
           4C000000263F00001F1300000000000000000000000000000000000000000000
@@ -445,4 +913,14 @@
         Caption = 'No Progress Notes Found'
       end
+      object pnlHtmlViewer: TPanel
+        Left = 0
+        Top = 116
+        Width = 611
+        Height = 185
+        Align = alClient
+        BevelOuter = bvNone
+        Color = clBtnShadow
+        TabOrder = 3
+      end
     end
   end
@@ -771,4 +1249,8 @@
       Visible = False
       OnClick = popNoteMemoSaveContinueClick
+    end
+    object popNoteMemoHTMLFormat: TMenuItem
+      Caption = 'Change Edit M&ode to Formatted Text'
+      OnClick = popNoteMemoHTMLFormatClick
     end
     object Z11: TMenuItem
@@ -948,5 +1430,5 @@
     LangData = {
       080066726D4E6F746573010200000001000000070043617074696F6E02000000
-      080048656C7046696C65018D0000000D0073687050616765426F74746F6D0000
+      080048656C7046696C6501A20000000D0073687050616765426F74746F6D0000
       0700737074486F727A00000700706E6C4C65667400000800706E6C5269676874
       000008006C626C4E6F746573010100000003000000070043617074696F6E0009
@@ -1086,5 +1568,23 @@
       0000007B000000070043617074696F6E000B0074696D4175746F536176650000
       0B00646C6746696E645465787400000E00646C675265706C6163655465787400
-      00}
+      000D00706E6C48746D6C56696577657200000C00706E6C546578745772697465
+      01010000008D000000070043617074696F6E001500706F704E6F74654D656D6F
+      48544D4C466F726D617401010000008E000000070043617074696F6E000C0070
+      6E6C48544D4C577269746500000B00706E6C48544D4C4564697400000700546F
+      6F6C42617201010000008F000000070043617074696F6E000B006362466F6E74
+      4E616D6573010100000090000000040054657874000A006362466F6E7453697A
+      6501020000009200000005004974656D73910000000400546578740008006274
+      6E466F6E7473010100000093000000040048696E7400090062746E4974616C69
+      63010100000094000000040048696E7400070062746E426F6C64010100000095
+      000000040048696E74000C0062746E556E6465726C696E650101000000960000
+      00040048696E74000A0062746E42756C6C657473010100000097000000040048
+      696E74000A0062746E4E756D62657273010100000098000000040048696E7400
+      0C0062746E4C656674416C69676E010100000099000000040048696E74000E00
+      62746E43656E746572416C69676E01010000009A000000040048696E74000D00
+      62746E5269676874416C69676E01010000009B000000040048696E74000D0062
+      746E4D6F7265496E64656E7401010000009C000000040048696E74000D006274
+      6E4C657373496E64656E7401010000009D000000040048696E74000C0062746E
+      54657874436F6C6F7201010000009E000000040048696E74000C0062746E4261
+      636B436F6C6F7201010000009F000000040048696E7400}
   end
 end
