object RichEdit98Editor: TRichEdit98Editor
  Left = 348
  Top = 244
  Width = 451
  Height = 323
  ActiveControl = Editor
  Caption = 'RichEdit98 Editor'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -10
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object ToolBar: TToolBar
    Left = 0
    Top = 0
    Width = 443
    Height = 22
    EdgeBorders = []
    Flat = True
    Images = ImageList
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object FontList: TComboBox
      Left = 0
      Top = 0
      Width = 171
      Height = 24
      TabStop = False
      Style = csOwnerDrawVariable
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 18
      ParentFont = False
      TabOrder = 0
      OnChange = FontListChange
      OnDrawItem = FontListDrawItem
    end
    object SizeList: TComboBox
      Left = 171
      Top = 0
      Width = 51
      Height = 24
      TabStop = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        '8'
        '9'
        '10'
        '11'
        '12'
        '14'
        '16'
        '18'
        '20'
        '22'
        '24'
        '28'
        '32'
        '36'
        '48'
        '72')
      ParentFont = False
      TabOrder = 1
      Text = '10'
      OnChange = SizeListChange
      OnDropDown = SizeListDropDown
      OnKeyUp = SizeListKeyUp
    end
    object ToolButton10: TToolButton
      Left = 222
      Top = 0
      Width = 8
      Caption = 'ToolButton10'
      ImageIndex = 7
      Style = tbsSeparator
    end
    object BoldBtn: TToolButton
      Left = 230
      Top = 0
      Hint = 'Bold'
      Caption = 'BoldBtn'
      ImageIndex = 0
      Style = tbsCheck
      OnClick = BoldBtnClick
    end
    object ItalicBtn: TToolButton
      Left = 253
      Top = 0
      Hint = 'Italic'
      Caption = 'ItalicBtn'
      ImageIndex = 1
      Style = tbsCheck
      OnClick = ItalicBtnClick
    end
    object UnderlineBtn: TToolButton
      Left = 276
      Top = 0
      Hint = 'Underline'
      Caption = 'UnderlineBtn'
      ImageIndex = 2
      Style = tbsCheck
      OnClick = UnderlineBtnClick
    end
    object ToolButton1: TToolButton
      Left = 299
      Top = 0
      Width = 8
      Caption = 'ToolButton1'
      ImageIndex = 7
      Style = tbsSeparator
    end
    object LeftBtn: TToolButton
      Left = 307
      Top = 0
      Hint = 'Left'
      Caption = 'LeftBtn'
      Down = True
      Grouped = True
      ImageIndex = 3
      Style = tbsCheck
      OnClick = LeftBtnClick
    end
    object CenterBtn: TToolButton
      Left = 330
      Top = 0
      Hint = 'Center'
      Caption = 'CenterBtn'
      Grouped = True
      ImageIndex = 4
      Style = tbsCheck
      OnClick = CenterBtnClick
    end
    object RightBtn: TToolButton
      Left = 353
      Top = 0
      Hint = 'Right'
      Caption = 'RightBtn'
      Grouped = True
      ImageIndex = 5
      Style = tbsCheck
      OnClick = RightBtnClick
    end
    object JustifyBtn: TToolButton
      Left = 376
      Top = 0
      Hint = 'Justify'
      Caption = 'JustifyBtn'
      Grouped = True
      ImageIndex = 6
      Style = tbsCheck
      OnClick = JustifyBtnClick
    end
    object ToolButton4: TToolButton
      Left = 399
      Top = 0
      Width = 8
      Caption = 'ToolButton4'
      ImageIndex = 9
      Style = tbsSeparator
    end
    object BulletBtn: TToolButton
      Left = 407
      Top = 0
      Hint = 'Bullet'
      Caption = 'BulletBtn'
      ImageIndex = 7
      Style = tbsCheck
      OnClick = BulletBtnClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 267
    Width = 443
    Height = 29
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object OkButton: TButton
      Left = 127
      Top = 4
      Width = 89
      Height = 23
      Caption = 'OK'
      Default = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ModalResult = 1
      ParentFont = False
      TabOrder = 0
      TabStop = False
    end
    object CancelButton: TButton
      Left = 227
      Top = 4
      Width = 89
      Height = 23
      Caption = 'Cancel'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = []
      ModalResult = 2
      ParentFont = False
      TabOrder = 1
      TabStop = False
    end
  end
  object Editor: TRichEdit98
    Left = 0
    Top = 22
    Width = 443
    Height = 245
    Align = alClient
    AutoURLDetect = adNone
    CustomURLs = <
      item
        Name = 'e-mail'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'http'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'file'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'mailto'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'ftp'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'https'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'gopher'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'nntp'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'prospero'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'telnet'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'news'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end
      item
        Name = 'wais'
        Color = clWindowText
        Cursor = crDefault
        Underline = True
      end>
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    LangOptions = [loAutoFont]
    Language = 1049
    ParentFont = False
    ShowSelectionBar = False
    TabOrder = 2
    URLColor = clBlue
    URLCursor = crHandPoint
    OnSelectionChange = EditorSelectionChange
    InputFormat = ifRTF
    OutputFormat = ofRTF
    SelectedInOut = False
    PlainRTF = False
    UndoLimit = 0
    AllowInPlace = False
  end
  object ImageList: TImageList
    ShareImages = True
    Left = 330
    Top = 200
  end
end