object EditorMainForm: TEditorMainForm
  Left = 324
  Top = 105
  Width = 554
  Height = 282
  ActiveControl = FontName
  Caption = 'Rich Edit 2.0 Demo'
  Color = clBtnFace
  Constraints.MinHeight = 280
  Constraints.MinWidth = 550
  DefaultMonitor = dmDesktop
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu
  OldCreateOrder = True
  Position = poDesktopCenter
  Scaled = False
  OnActivate = FormActivate
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnPaint = FormPaint
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Ruler: TPanel
    Left = 0
    Top = 62
    Width = 546
    Height = 26
    Align = alTop
    Alignment = taLeftJustify
    BevelInner = bvLowered
    BevelOuter = bvNone
    BorderWidth = 1
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnResize = RulerResize
    object FirstInd: TLabel
      Left = 3
      Top = 2
      Width = 10
      Height = 12
      Caption = #234
      DragCursor = crArrow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Wingdings'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnMouseDown = RulerItemMouseDown
      OnMouseMove = RulerItemMouseMove
      OnMouseUp = FirstIndMouseUp
    end
    object LeftInd: TLabel
      Left = 3
      Top = 12
      Width = 10
      Height = 12
      Caption = #233
      DragCursor = crArrow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Wingdings'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnMouseDown = RulerItemMouseDown
      OnMouseMove = RulerItemMouseMove
      OnMouseUp = LeftIndMouseUp
    end
    object RulerLine: TBevel
      Left = 4
      Top = 12
      Width = 482
      Height = 2
      Shape = bsTopLine
    end
    object RightInd: TLabel
      Left = 475
      Top = 13
      Width = 9
      Height = 12
      Caption = #241
      DragCursor = crArrow
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Wingdings'
      Font.Style = []
      ParentFont = False
      Transparent = True
      OnMouseDown = RulerItemMouseDown
      OnMouseMove = RulerItemMouseMove
      OnMouseUp = RightIndMouseUp
    end
  end
  object Editor: TJvRichEdit
    Left = 0
    Top = 88
    Width = 546
    Height = 129
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    HideSelection = False
    ParentFont = False
    PopupMenu = EditPopupMenu
    TabOrder = 3
    WantTabs = True
    Zoom = 100
    OnChange = RichEditChange
    OnProtectChange = EditorProtectChange
    OnSelectionChange = SelectionChange
    OnTextNotFound = EditorTextNotFound
    OnURLClick = EditorURLClick
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 217
    Width = 546
    Height = 19
    Panels = <
      item
        Width = 120
      end
      item
        Alignment = taCenter
        Width = 60
      end
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object SpeedBar: TJvSpeedBar
    Left = 0
    Top = 0
    Width = 546
    Height = 31
    ParentFont = True
    BoundLines = [blTop]
    Options = [sbFlatBtns]
    BtnOffsetHorz = 4
    BtnOffsetVert = 5
    BtnWidth = 24
    BtnHeight = 23
    Images = ToolbarImages
    BevelOuter = bvNone
    Locked = True
    TabOrder = 0
    InternalVer = 1
    object SpeedbarSection1: TJvSpeedBarSection
      Caption = 'File'
    end
    object SpeedbarSection2: TJvSpeedBarSection
      Caption = 'Edit'
    end
    object NewBtn: TJvSpeedItem
      Caption = 'New'
      Hint = 'New|'
      ImageIndex = 0
      Spacing = 1
      Left = 4
      Top = 5
      Visible = True
      OnClick = FileNew
      SectionName = 'File'
    end
    object OpenBtn: TJvSpeedItem
      Caption = 'Open'
      Hint = 'Open|'
      ImageIndex = 1
      Spacing = 1
      Left = 28
      Top = 5
      Visible = True
      OnClick = FileOpen
      SectionName = 'File'
    end
    object SaveBtn: TJvSpeedItem
      Caption = 'Save'
      Hint = 'Save|'
      ImageIndex = 2
      Spacing = 1
      Left = 52
      Top = 5
      Visible = True
      OnClick = FileSave
      SectionName = 'File'
    end
    object PrintBtn: TJvSpeedItem
      Caption = 'Print'
      Hint = 'Print|'
      ImageIndex = 3
      Spacing = 1
      Left = 76
      Top = 5
      Visible = True
      OnClick = FilePrint
      SectionName = 'File'
    end
    object CutBtn: TJvSpeedItem
      Caption = 'Cut'
      Hint = 'Cut|'
      ImageIndex = 6
      Spacing = 1
      Left = 140
      Top = 5
      Visible = True
      OnClick = EditCut
      SectionName = 'Edit'
    end
    object CopyBtn: TJvSpeedItem
      Caption = 'Copy'
      Hint = 'Copy|'
      ImageIndex = 7
      Spacing = 1
      Left = 164
      Top = 5
      Visible = True
      OnClick = EditCopy
      SectionName = 'Edit'
    end
    object PasteBtn: TJvSpeedItem
      Caption = 'Paste'
      Hint = 'Paste|'
      ImageIndex = 8
      Spacing = 1
      Left = 188
      Top = 5
      Visible = True
      OnClick = EditPaste
      SectionName = 'Edit'
    end
    object UndoBtn: TJvSpeedItem
      Caption = 'Undo'
      Hint = 'Undo|'
      ImageIndex = 9
      Spacing = 1
      Left = 220
      Top = 5
      Visible = True
      OnClick = EditUndo
      SectionName = 'Edit'
    end
    object RedoBtn: TJvSpeedItem
      Caption = 'Redo'
      Hint = 'Redo|'
      ImageIndex = 10
      Spacing = 1
      Left = 244
      Top = 5
      Visible = True
      OnClick = EditRedo
      SectionName = 'Edit'
    end
    object FindBtn: TJvSpeedItem
      Caption = 'Find'
      Hint = 'Find|'
      ImageIndex = 5
      Spacing = 1
      Left = 108
      Top = 5
      Visible = True
      OnClick = EditFindClick
      SectionName = 'Edit'
    end
  end
  object FormatBar: TJvSpeedBar
    Left = 0
    Top = 31
    Width = 546
    Height = 31
    ParentFont = True
    BoundLines = [blTop]
    Options = [sbFlatBtns]
    BtnOffsetHorz = 4
    BtnOffsetVert = 5
    BtnWidth = 24
    BtnHeight = 23
    Images = ToolbarImages
    BevelOuter = bvNone
    BevelWidth = 0
    TabOrder = 1
    InternalVer = 1
    object FontName: TJvFontComboBox
      Left = 3
      Top = 7
      Width = 175
      Height = 22
      DroppedDownWidth = 175
      FontName = 'Arial'
      Device = fdBoth
      ItemIndex = 0
      Options = [foWysiWyg]
      Sorted = True
      TabOrder = 0
      OnChange = FontNameChange
    end
    object FontSize: TJvSpinEdit
      Left = 182
      Top = 6
      Width = 42
      Height = 21
      Alignment = taRightJustify
      ButtonKind = bkStandard
      Decimal = 0
      MaxValue = 2147483647
      MinValue = 1
      Value = 8
      TabOrder = 1
      OnChange = FontSizeChange
    end
    object SpeedbarSection3: TJvSpeedBarSection
      Caption = 'Format'
    end
    object BoldBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Bold'
      GroupIndex = 5
      Hint = 'Bold'
      ImageIndex = 13
      Spacing = 1
      Left = 228
      Top = 5
      Visible = True
      OnClick = BoldButtonClick
      SectionName = 'Format'
    end
    object ItalicBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Italic'
      GroupIndex = 6
      Hint = 'Italic'
      ImageIndex = 14
      Spacing = 1
      Left = 252
      Top = 5
      Visible = True
      OnClick = ItalicButtonClick
      SectionName = 'Format'
    end
    object UnderlineBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Underline'
      GroupIndex = 7
      Hint = 'Underline'
      ImageIndex = 15
      Spacing = 1
      Left = 276
      Top = 5
      Visible = True
      OnClick = UnderlineButtonClick
      SectionName = 'Format'
    end
    object ColorBtn: TJvSpeedItem
      Caption = 'Color'
      DropDownMenu = ColorMenu
      Hint = 'Color|Formats the selection with a color'
      ImageIndex = 16
      MarkDropDown = False
      Spacing = 1
      Left = 300
      Top = 5
      Visible = True
      SectionName = 'Format'
    end
    object BackgroundBtn: TJvSpeedItem
      Caption = 'Background'
      DropDownMenu = BackgroundMenu
      Hint = 'Background|'
      ImageIndex = 24
      MarkDropDown = False
      Spacing = 1
      Left = 324
      Top = 5
      Visible = True
      SectionName = 'Format'
    end
    object LeftBtn: TJvSpeedItem
      Caption = 'Align Left'
      GroupIndex = 2
      Hint = 'Align Left'
      ImageIndex = 17
      Spacing = 1
      Left = 356
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object CenterBtn: TJvSpeedItem
      Tag = 2
      Caption = 'Center'
      GroupIndex = 2
      Hint = 'Center'
      ImageIndex = 18
      Spacing = 1
      Left = 380
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object RightBtn: TJvSpeedItem
      Tag = 1
      Caption = 'Align Right'
      GroupIndex = 2
      Hint = 'Align Right'
      ImageIndex = 19
      Spacing = 1
      Left = 404
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object JustifyBtn: TJvSpeedItem
      Tag = 3
      Caption = 'Justify'
      GroupIndex = 2
      Hint = 'Justify'
      ImageIndex = 23
      Spacing = 1
      Left = 428
      Top = 5
      Visible = True
      OnClick = AlignButtonClick
      SectionName = 'Format'
    end
    object SuperscriptBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Superscript'
      GroupIndex = 3
      Hint = 'Superscript'
      ImageIndex = 21
      Spacing = 1
      Left = 492
      Top = 5
      Visible = True
      OnClick = SubscriptClick
      SectionName = 'Format'
    end
    object SubscriptBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Subscript'
      GroupIndex = 3
      Hint = 'Subscript'
      ImageIndex = 22
      Spacing = 1
      Left = 516
      Top = 5
      Visible = True
      OnClick = SubscriptClick
      SectionName = 'Format'
    end
    object BulletsBtn: TJvSpeedItem
      AllowAllUp = True
      Caption = 'Bullets'
      GroupIndex = 4
      Hint = 'Bullets|Enter bullet mode'
      ImageIndex = 20
      Spacing = 1
      Left = 460
      Top = 5
      Visible = True
      OnClick = BulletsButtonClick
      SectionName = 'Format'
    end
  end
  object MainMenu: TJvMainMenu
    Images = ToolbarImages
    Style = msXP
    ImageMargin.Left = 0
    ImageMargin.Top = 0
    ImageMargin.Right = 0
    ImageMargin.Bottom = 0
    ImageSize.Height = 0
    ImageSize.Width = 0

    OnGetImageIndex = MainMenuGetImageIndex
    Left = 8
    Top = 128
    object FileMenu: TMenuItem
      Tag = -1
      Caption = '&File'
      object FileNewItem: TMenuItem
        Caption = '&New'
        Hint = 'Create a new file'
        ShortCut = 16462
        OnClick = FileNew
      end
      object FileOpenItem: TMenuItem
        Tag = 1
        Caption = '&Open...'
        Hint = 'Open an existing file'
        ShortCut = 16463
        OnClick = FileOpen
      end
      object FileSaveItem: TMenuItem
        Tag = 2
        Caption = '&Save'
        Hint = 'Save current file'
        ShortCut = 16467
        OnClick = FileSave
      end
      object FileSaveAsItem: TMenuItem
        Tag = -1
        Caption = 'Save &As...'
        Hint = 'Save current file under a new name'
        OnClick = FileSaveAs
      end
      object FileSaveSelItem: TMenuItem
        Tag = -1
        Caption = 'Save Selec&ted...'
        OnClick = FileSaveSelected
      end
      object N1: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object FilePrintItem: TMenuItem
        Tag = 3
        Caption = '&Print'
        Hint = 'Print current file'
        ShortCut = 16464
        OnClick = FilePrint
      end
      object N4: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object FileExitItem: TMenuItem
        Tag = -1
        Caption = 'E&xit'
        Hint = 'Exit this application'
        ShortCut = 32856
        OnClick = FileExit
      end
    end
    object EditMenu: TMenuItem
      Tag = -1
      Caption = '&Edit'
      GroupIndex = 1
      object EditUndoItem: TMenuItem
        Tag = 9
        Caption = '&Undo'
        Hint = 'Undo the last action'
        ShortCut = 16474
        OnClick = EditUndo
      end
      object EditRedoItem: TMenuItem
        Tag = 10
        Caption = '&Redo'
        Hint = 'Redo the last action'
        ShortCut = 16473
        OnClick = EditRedo
      end
      object N2: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object EditCutItem: TMenuItem
        Tag = 6
        Caption = 'Cu&t'
        Hint = 'Delete selected item'
        ShortCut = 16472
        OnClick = EditCut
      end
      object EditCopyItem: TMenuItem
        Tag = 7
        Caption = '&Copy'
        Hint = 'Copy selected item to clipboard'
        ShortCut = 16451
        OnClick = EditCopy
      end
      object EditPasteItem: TMenuItem
        Tag = 8
        Caption = '&Paste'
        Hint = 'Paste contents of clipboard'
        ShortCut = 16470
        OnClick = EditPaste
      end
      object EditPasteSpecial: TMenuItem
        Tag = -1
        Caption = 'Paste &Special...'
        Hint = 'Inserts Clipboard contents with options'
        OnClick = EditPasteSpecialClick
      end
      object EditSelectAllItem: TMenuItem
        Tag = -1
        Caption = 'Select A&ll'
        Hint = 'Selects the entire document'
        ShortCut = 16449
        OnClick = EditSelectAll
      end
      object N3: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object EditFindItem: TMenuItem
        Tag = 5
        Caption = '&Find...'
        Hint = 'Finds the specified text'
        ShortCut = 16454
        OnClick = EditFindClick
      end
      object EditFindNextItem: TMenuItem
        Tag = -1
        Caption = 'Find &Next'
        ShortCut = 114
        OnClick = EditFindNextItemClick
      end
      object EditReplaceItem: TMenuItem
        Tag = -1
        Caption = 'R&eplace...'
        Hint = 'Replaces specific text with different text'
        ShortCut = 16456
        OnClick = EditReplaceClick
      end
      object N5: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object EditObjPropsItem: TMenuItem
        Tag = -1
        Caption = '&Object Properties...'
        Hint = 'Change selected object'#39's properties'
        ShortCut = 32781
        OnClick = EditObjPropsItemClick
      end
    end
    object InsertMenu: TMenuItem
      Tag = -1
      Caption = '&Insert'
      GroupIndex = 3
      object InsertObjectItem: TMenuItem
        Tag = -1
        Caption = '&Object...'
        Hint = 'Inserts new embedded object'
        OnClick = InsertObject
      end
      object InsertImageItem: TMenuItem
        Tag = -1
        Caption = '&Picture...'
        Hint = 'Inserts picture'
        OnClick = InsertBitmap
      end
    end
    object FormatMenu: TMenuItem
      Tag = -1
      Caption = 'F&ormat'
      GroupIndex = 5
      object FormatFontItem: TMenuItem
        Tag = 12
        Caption = '&Font...'
        OnClick = SelectFont
      end
      object FormatParagraphItem: TMenuItem
        Tag = 25
        Caption = '&Paragraph...'
        OnClick = FormatParaAttributes
      end
      object FormatTabsItem: TMenuItem
        Tag = -1
        Caption = '&Tabs...'
        OnClick = FormatParaTabs
      end
      object N6: TMenuItem
        Tag = -1
        Caption = '-'
      end
      object ProtectedItem: TMenuItem
        Tag = -1
        Caption = 'Pr&otected'
        OnClick = ProtectedItemClick
      end
      object DisabledItem: TMenuItem
        Tag = -1
        Caption = '&Disabled'
        OnClick = DisabledItemClick
      end
      object HiddenItem: TMenuItem
        Tag = -1
        Caption = '&Hidden'
        OnClick = HiddenItemClick
      end
    end
    object HelpMenu: TMenuItem
      Tag = -1
      Caption = '&Help'
      GroupIndex = 7
      object HelpAboutItem: TMenuItem
        Tag = -1
        Caption = '&About...'
        Hint = 'Show program information'
        OnClick = HelpAbout
      end
    end
  end
  object OpenDialog: TOpenDialog
    Filter = 'Rich Text Files (*.RTF)|*.RTF|Text Files (*.TXT)|*.TXT'
    Left = 64
    Top = 100
  end
  object SaveDialog: TSaveDialog
    Filter = 'Rich Text Files (*.RTF)|*.RTF|Text Files (*.TXT)|*.TXT'
    Options = [ofOverwritePrompt, ofHideReadOnly]
    Left = 92
    Top = 100
  end
  object PrintDialog: TPrintDialog
    Left = 120
    Top = 100
  end
  object FontDialog: TFontDialog
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Device = fdBoth
    MinFontSize = 0
    MaxFontSize = 0
    Left = 36
    Top = 100
  end
  object ColorMenu: TJvPopupMenu
    OnPopup = ColorMenuPopup
    Style = msOwnerDraw
    ImageMargin.Left = 0
    ImageMargin.Top = 0
    ImageMargin.Right = 0
    ImageMargin.Bottom = 0
    ImageSize.Height = 16
    ImageSize.Width = 16



    Left = 92
    Top = 128
  end
  object EditPopupMenu: TJvPopupMenu
    Images = ToolbarImages
    Style = msXP
    ImageMargin.Left = 0
    ImageMargin.Top = 0
    ImageMargin.Right = 0
    ImageMargin.Bottom = 0
    ImageSize.Height = 0
    ImageSize.Width = 0

    OnGetImageIndex = EditPopupMenuGetImageIndex
    Left = 36
    Top = 128
    object CutItm: TMenuItem
      Tag = 6
      Caption = 'Cu&t'
      GroupIndex = 10
      ShortCut = 16472
      OnClick = EditCut
    end
    object CopyItm: TMenuItem
      Tag = 7
      Caption = '&Copy'
      GroupIndex = 10
      ShortCut = 16451
      OnClick = EditCopy
    end
    object PasteItm: TMenuItem
      Tag = 8
      Caption = '&Paste'
      GroupIndex = 10
      ShortCut = 16470
      OnClick = EditPaste
    end
  end
  object BackgroundMenu: TJvPopupMenu
    OnPopup = BackgroundMenuPopup
    Style = msOwnerDraw
    ImageMargin.Left = 0
    ImageMargin.Top = 0
    ImageMargin.Right = 0
    ImageMargin.Bottom = 0
    ImageSize.Height = 16
    ImageSize.Width = 16



    Left = 64
    Top = 128
  end
  object ToolbarImages: TImageList
    Left = 8
    Top = 100
    Bitmap = {
[encoded data, 75331 characters]
      000000000000}
  end
  object App: TJvAppEvents
    OnActivate = FormActivate
    OnHint = ShowHint
    Left = 120
    Top = 128
  end
end
