object EditorFrame: TEditorFrame
  Left = 0
  Top = 0
  Width = 443
  Height = 270
  Align = alClient
  TabOrder = 0
  TabStop = True
  OnResize = FrameResize
  object Splitter2: TSplitter
    Left = 0
    Top = 0
    Width = 443
    Height = 2
    Cursor = crVSplit
    Align = alTop
    ResizeStyle = rsUpdate
  end
  object EditorSlave: TSyntaxMemo
    Left = 0
    Top = 2
    Width = 443
    Height = 0
    TextSource = TextSource
    TabList.AsString = '4'
    NonPrinted.Font.Charset = DEFAULT_CHARSET
    NonPrinted.Font.Color = clSilver
    NonPrinted.Font.Height = -11
    NonPrinted.Font.Name = 'MS Sans Serif'
    NonPrinted.Font.Style = []
    LineNumbers.UnderColor = clGray
    LineNumbers.Margin = 0
    LineNumbers.Alignment = taCenter
    LineNumbers.Font.Charset = DEFAULT_CHARSET
    LineNumbers.Font.Color = clWindowText
    LineNumbers.Font.Height = -9
    LineNumbers.Font.Name = 'Courier New'
    LineNumbers.Font.Style = []
    LineNumbers.Band = 0
    Gutter.Width = 40
    Gutter.Images = SyntEditMain.ImageList1
    Gutter.ExpandButtons.Data = {
      FA000000424DFA000000000000007600000028000000180000000B0000000100
      0400000000008400000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00600000000000
      60000000000060BBBBBBBBB060EEEFFFEEE060BBBBBBBBB060EEEF0FEEE060BB
      BBBBBBB060EEEF0FEEE060FFFFFFFFF060FFFF0FFFF060F0000000F060F00000
      00F060FFFFFFFFF060FFFF0FFFF060BBBBBBBBB060EEEF0FEEE060BBBBBBBBB0
      60EEEF0FEEE060BBBBBBBBB060EEEFFFEEE0600000000000600000000000}
    Gutter.Bands = <
      item
        Width = 25
      end
      item
        Width = 15
        Color = 15263976
      end>
    Gutter.Objects = <>
    Gutter.ExpBtnBand = 1
    Gutter.CollapsePen.Color = clGray
    Gutter.AutoSize = False
    HintProps.Font.Charset = RUSSIAN_CHARSET
    HintProps.Font.Color = clWindowText
    HintProps.Font.Height = -11
    HintProps.Font.Name = 'Courier New'
    HintProps.Font.Style = []
    HintProps.Color = clInfoBk
    HintProps.ShowHints = [shScroll, shCollapsed, shGutter, shTokens]
    HintProps.CollapsedLines = 10
    UserRanges = <>
    TabMode = tmSmartTab
    StaplePen.Color = clSilver
    StapleOffset = 4
    FlatScrollBars = True
    DefaultStyles.SelectioMark.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.SelectioMark.Font.Color = clHighlightText
    DefaultStyles.SelectioMark.Font.Height = -13
    DefaultStyles.SelectioMark.Font.Name = 'Courier New'
    DefaultStyles.SelectioMark.Font.Style = []
    DefaultStyles.SelectioMark.BgColor = clHighlight
    DefaultStyles.SelectioMark.FormatType = ftColor
    DefaultStyles.SearchMark.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.SearchMark.Font.Color = clWhite
    DefaultStyles.SearchMark.Font.Height = -13
    DefaultStyles.SearchMark.Font.Name = 'Courier New'
    DefaultStyles.SearchMark.Font.Style = []
    DefaultStyles.SearchMark.BgColor = clBlack
    DefaultStyles.SearchMark.FormatType = ftColor
    DefaultStyles.CurrentLine.Enabled = False
    DefaultStyles.CurrentLine.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.CurrentLine.Font.Color = clWindowText
    DefaultStyles.CurrentLine.Font.Height = -13
    DefaultStyles.CurrentLine.Font.Name = 'Courier New'
    DefaultStyles.CurrentLine.Font.Style = []
    DefaultStyles.CurrentLine.FormatType = ftBackGround
    DefaultStyles.CollapseMark.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.CollapseMark.Font.Color = clSilver
    DefaultStyles.CollapseMark.Font.Height = -13
    DefaultStyles.CollapseMark.Font.Name = 'Courier New'
    DefaultStyles.CollapseMark.Font.Style = []
    DefaultStyles.CollapseMark.FormatType = ftColor
    DefaultStyles.CollapseMark.BorderTypeLeft = blSolid
    DefaultStyles.CollapseMark.BorderColorLeft = clSilver
    DefaultStyles.CollapseMark.BorderTypeTop = blSolid
    DefaultStyles.CollapseMark.BorderColorTop = clSilver
    DefaultStyles.CollapseMark.BorderTypeRight = blSolid
    DefaultStyles.CollapseMark.BorderColorRight = clSilver
    DefaultStyles.CollapseMark.BorderTypeBottom = blSolid
    DefaultStyles.CollapseMark.BorderColorBottom = clSilver
    SyncEditing.SyncRangeStyle.Font.Charset = DEFAULT_CHARSET
    SyncEditing.SyncRangeStyle.Font.Color = clWindowText
    SyncEditing.SyncRangeStyle.Font.Height = -13
    SyncEditing.SyncRangeStyle.Font.Name = 'Courier New'
    SyncEditing.SyncRangeStyle.Font.Style = []
    SyncEditing.SyncRangeStyle.BgColor = 14745568
    SyncEditing.SyncRangeStyle.FormatType = ftBackGround
    SyncEditing.ActiveWordsStyle.Font.Charset = DEFAULT_CHARSET
    SyncEditing.ActiveWordsStyle.Font.Color = clWindowText
    SyncEditing.ActiveWordsStyle.Font.Height = -13
    SyncEditing.ActiveWordsStyle.Font.Name = 'Courier New'
    SyncEditing.ActiveWordsStyle.Font.Style = []
    SyncEditing.ActiveWordsStyle.FormatType = ftBackGround
    SyncEditing.ActiveWordsStyle.BorderTypeLeft = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorLeft = clBlue
    SyncEditing.ActiveWordsStyle.BorderTypeTop = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorTop = clBlue
    SyncEditing.ActiveWordsStyle.BorderTypeRight = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorRight = clBlue
    SyncEditing.ActiveWordsStyle.BorderTypeBottom = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorBottom = clBlue
    SyncEditing.InactiveWordsStyle.Font.Charset = DEFAULT_CHARSET
    SyncEditing.InactiveWordsStyle.Font.Color = clWindowText
    SyncEditing.InactiveWordsStyle.Font.Height = -13
    SyncEditing.InactiveWordsStyle.Font.Name = 'Courier New'
    SyncEditing.InactiveWordsStyle.Font.Style = []
    SyncEditing.InactiveWordsStyle.FormatType = ftBackGround
    SyncEditing.InactiveWordsStyle.BorderTypeBottom = blSolid
    SyncEditing.InactiveWordsStyle.BorderColorBottom = clBtnFace
    Options = [soOverwriteBlocks, soEnableBlockSel, soHideSelection, soHideDynamic, soAutoIndentMode, soBackUnindent, soGroupUndo, soDragText, soCallapseEmptyLines, soDrawCurLineFocus]
    BorderStyle = bsNone
    HorzRuler.Font.Charset = DEFAULT_CHARSET
    HorzRuler.Font.Color = clWindowText
    HorzRuler.Font.Height = -11
    HorzRuler.Font.Name = 'Tahoma'
    HorzRuler.Font.Style = []
    TextMargins = <
      item
        Pen.Color = clSilver
      end>
    Align = alTop
    BevelInner = bvNone
    BevelOuter = bvNone
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ParentColor = False
    ParentCtl3D = False
    ParentFont = False
    ParentShowHint = False
    PopupMenu = PopupMenu1
    ShowHint = False
    TabOrder = 0
    OnCaretPosChanged = EditorMasterCaretPosChanged
    OnChange = EditorMasterChange
    OnGetStyleEntry = EditorSlaveGetStyleEntry
    OnClick = EditorMasterEnter
  end
  object EditorMaster: TSyntaxMemo
    Left = 0
    Top = 2
    Width = 443
    Height = 268
    TextSource = TextSource
    TabList.AsString = '4'
    NonPrinted.Font.Charset = DEFAULT_CHARSET
    NonPrinted.Font.Color = clSilver
    NonPrinted.Font.Height = -11
    NonPrinted.Font.Name = 'MS Sans Serif'
    NonPrinted.Font.Style = []
    LineNumbers.UnderColor = clBlack
    LineNumbers.Margin = 0
    LineNumbers.Alignment = taCenter
    LineNumbers.Font.Charset = DEFAULT_CHARSET
    LineNumbers.Font.Color = clWindowText
    LineNumbers.Font.Height = -9
    LineNumbers.Font.Name = 'Courier New'
    LineNumbers.Font.Style = []
    LineNumbers.Band = 0
    Gutter.Width = 43
    Gutter.Images = SyntEditMain.ImageList1
    Gutter.ExpandButtons.Data = {
      FA000000424DFA000000000000007600000028000000120000000B0000000100
      0400000000008400000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
      1111110000000000000000000000000000000FFFFFFF00FFFFFFF00000000FFF
      FFFF00FFF0FFF00000000FFFFFFF00FFF0FFF00000000F00000F00F00000F000
      00000FFFFFFF00FFF0FFF00000000FFFFFFF00FFF0FFF00000000FFFFFFF00FF
      FFFFF0000000000000000000000000000000111111111111111111000000}
    Gutter.Bands = <
      item
        Width = 26
      end
      item
        Width = 3
        RightBound = clBtnHighlight
      end
      item
        Width = 14
        Color = 16119285
        LeftBound = clBtnShadow
      end>
    Gutter.Objects = <>
    Gutter.ExpBtnBand = 2
    Gutter.CollapsePen.Color = clGray
    Gutter.AutoSize = False
    HintProps.Font.Charset = RUSSIAN_CHARSET
    HintProps.Font.Color = clWindowText
    HintProps.Font.Height = -13
    HintProps.Font.Name = 'Courier New'
    HintProps.Font.Style = []
    HintProps.Color = clInfoBk
    HintProps.ShowHints = [shScroll, shCollapsed, shGutter, shTokens]
    HintProps.CollapsedLines = 10
    UserRanges = <>
    TabMode = tmSmartTab
    StaplePen.Color = clSilver
    StapleOffset = 4
    FlatScrollBars = True
    CollapseStyle = csNameWhenDefined
    DefaultStyles.SelectioMark.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.SelectioMark.Font.Color = clHighlightText
    DefaultStyles.SelectioMark.Font.Height = -13
    DefaultStyles.SelectioMark.Font.Name = 'Courier New'
    DefaultStyles.SelectioMark.Font.Style = []
    DefaultStyles.SelectioMark.BgColor = clHighlight
    DefaultStyles.SelectioMark.FormatType = ftColor
    DefaultStyles.SearchMark.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.SearchMark.Font.Color = clWhite
    DefaultStyles.SearchMark.Font.Height = -13
    DefaultStyles.SearchMark.Font.Name = 'Courier New'
    DefaultStyles.SearchMark.Font.Style = []
    DefaultStyles.SearchMark.BgColor = clBlack
    DefaultStyles.SearchMark.FormatType = ftColor
    DefaultStyles.CurrentLine.Enabled = False
    DefaultStyles.CurrentLine.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.CurrentLine.Font.Color = clWindowText
    DefaultStyles.CurrentLine.Font.Height = -13
    DefaultStyles.CurrentLine.Font.Name = 'Courier New'
    DefaultStyles.CurrentLine.Font.Style = []
    DefaultStyles.CurrentLine.FormatType = ftBackGround
    DefaultStyles.CollapseMark.Font.Charset = DEFAULT_CHARSET
    DefaultStyles.CollapseMark.Font.Color = clSilver
    DefaultStyles.CollapseMark.Font.Height = -13
    DefaultStyles.CollapseMark.Font.Name = 'Courier New'
    DefaultStyles.CollapseMark.Font.Style = []
    DefaultStyles.CollapseMark.FormatType = ftColor
    DefaultStyles.CollapseMark.BorderTypeLeft = blSolid
    DefaultStyles.CollapseMark.BorderColorLeft = clSilver
    DefaultStyles.CollapseMark.BorderTypeTop = blSolid
    DefaultStyles.CollapseMark.BorderColorTop = clSilver
    DefaultStyles.CollapseMark.BorderTypeRight = blSolid
    DefaultStyles.CollapseMark.BorderColorRight = clSilver
    DefaultStyles.CollapseMark.BorderTypeBottom = blSolid
    DefaultStyles.CollapseMark.BorderColorBottom = clSilver
    LineStateDisplay.Band = 1
    SyncEditing.SyncRangeStyle.Font.Charset = DEFAULT_CHARSET
    SyncEditing.SyncRangeStyle.Font.Color = clWindowText
    SyncEditing.SyncRangeStyle.Font.Height = -13
    SyncEditing.SyncRangeStyle.Font.Name = 'Courier New'
    SyncEditing.SyncRangeStyle.Font.Style = []
    SyncEditing.SyncRangeStyle.BgColor = 14745568
    SyncEditing.SyncRangeStyle.FormatType = ftBackGround
    SyncEditing.ActiveWordsStyle.Font.Charset = DEFAULT_CHARSET
    SyncEditing.ActiveWordsStyle.Font.Color = clWindowText
    SyncEditing.ActiveWordsStyle.Font.Height = -13
    SyncEditing.ActiveWordsStyle.Font.Name = 'Courier New'
    SyncEditing.ActiveWordsStyle.Font.Style = []
    SyncEditing.ActiveWordsStyle.FormatType = ftBackGround
    SyncEditing.ActiveWordsStyle.BorderTypeLeft = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorLeft = clBlue
    SyncEditing.ActiveWordsStyle.BorderTypeTop = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorTop = clBlue
    SyncEditing.ActiveWordsStyle.BorderTypeRight = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorRight = clBlue
    SyncEditing.ActiveWordsStyle.BorderTypeBottom = blSolid
    SyncEditing.ActiveWordsStyle.BorderColorBottom = clBlue
    SyncEditing.InactiveWordsStyle.Font.Charset = DEFAULT_CHARSET
    SyncEditing.InactiveWordsStyle.Font.Color = clWindowText
    SyncEditing.InactiveWordsStyle.Font.Height = -13
    SyncEditing.InactiveWordsStyle.Font.Name = 'Courier New'
    SyncEditing.InactiveWordsStyle.Font.Style = []
    SyncEditing.InactiveWordsStyle.FormatType = ftBackGround
    SyncEditing.InactiveWordsStyle.BorderTypeBottom = blSolid
    SyncEditing.InactiveWordsStyle.BorderColorBottom = clBtnFace
    Options = [soOverwriteBlocks, soEnableBlockSel, soHideSelection, soHideDynamic, soAutoIndentMode, soBackUnindent, soGroupUndo, soDragText, soCallapseEmptyLines, soDrawCurLineFocus]
    BorderStyle = bsNone
    HorzRuler.Font.Charset = DEFAULT_CHARSET
    HorzRuler.Font.Color = clWindowText
    HorzRuler.Font.Height = -11
    HorzRuler.Font.Name = 'Tahoma'
    HorzRuler.Font.Style = []
    TextMargins = <
      item
        Pen.Color = clSilver
      end>
    Align = alClient
    BevelInner = bvNone
    BevelOuter = bvNone
    Ctl3D = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    ImeMode = imChinese
    ParentColor = False
    ParentCtl3D = False
    ParentFont = False
    ParentShowHint = False
    PopupMenu = PopupMenu1
    ShowHint = False
    TabOrder = 1
    OnCaretPosChanged = EditorMasterCaretPosChanged
    OnGetGutterImage = EditorMasterGetGutterImage
    OnGetTokenHint = EditorMasterGetTokenHint
    OnChange = EditorMasterChange
    OnGetLineNumberStr = EditorMasterGetLineNumberStr
    OnClick = EditorMasterEnter
  end
  object TextSource: TSyntTextSource
    Left = 340
    Top = 156
  end
  object ActionList1: TActionList
    Images = SyntEditMain.ImageList1
    Left = 308
    Top = 156
    object ecCopy1: TecCopy
      Category = 'EC Editor'
      Caption = '&Copy'
      Hint = 'Copy|Copy selection to clipboard'
      ImageIndex = 0
      ShortCut = 16451
    end
    object ecCut1: TecCut
      Category = 'EC Editor'
      Caption = 'Cu&t'
      Hint = 'Cut|Cut selection to clipboard'
      ImageIndex = 1
      ShortCut = 16472
    end
    object ecPaste1: TecPaste
      Category = 'EC Editor'
      Caption = '&Paste'
      Hint = 'Paste|Paste clipboard to current position'
      ImageIndex = 3
      ShortCut = 16470
    end
    object ecClear1: TecClear
      Category = 'EC Editor'
      Caption = '&Clear'
      Hint = 'Clear|Clear current selection'
      ImageIndex = 2
      ShortCut = 16430
    end
    object ecSelectAll1: TecSelectAll
      Category = 'EC Editor'
      Caption = 'Select &All'
      Hint = 'Select All|Select entire contents of editor, cursor to end'
      ShortCut = 16449
    end
    object ecUndo1: TecUndo
      Category = 'EC Editor'
      Caption = '&Undo'
      Hint = 'Undo|Perform undo if available'
      ImageIndex = 4
      ShortCut = 16474
    end
    object ecRedo1: TecRedo
      Category = 'EC Editor'
      Caption = '&Redo'
      Hint = 'Redo|Perform redo if available'
      ImageIndex = 5
      ShortCut = 24666
    end
    object ecIndent1: TecIndent
      Category = 'EC Editor'
      Caption = '&Indent'
      Hint = 'Indent|Indent selection'
      ImageIndex = 28
      ShortCut = 16393
    end
    object ecUnindent1: TecUnindent
      Category = 'EC Editor'
      Caption = '&Unindent'
      Hint = 'Unindent|Unindent selection'
      ImageIndex = 27
      ShortCut = 8201
    end
  end
  object PopupMenu1: TPopupMenu
    Images = SyntEditMain.ImageList1
    OnPopup = PopupMenu1Popup
    Left = 276
    Top = 156
    object N4: TMenuItem
      Caption = 'Skip error'
      OnClick = N4Click
    end
    object N5: TMenuItem
      Caption = 'Add to dictoinary'
      OnClick = N5Click
    end
    object N6: TMenuItem
      Caption = '-'
    end
    object Copy2: TMenuItem
      Action = ecCopy1
    end
    object Cut2: TMenuItem
      Action = ecCut1
    end
    object Paste2: TMenuItem
      Action = ecPaste1
    end
    object Delete2: TMenuItem
      Action = ecClear1
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Undo1: TMenuItem
      Action = ecUndo1
    end
    object Redo1: TMenuItem
      Action = ecRedo1
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object Indent1: TMenuItem
      Action = ecIndent1
    end
    object Unindent1: TMenuItem
      Action = ecUnindent1
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object ogglebookmarks1: TMenuItem
      Caption = 'Toggle bookmarks'
      object Bookmark01: TMenuItem
        Caption = 'Bookmark 0'
        ImageIndex = 13
        OnClick = ToggleBookmark
      end
      object Bookmark11: TMenuItem
        Tag = 1
        Caption = 'Bookmark 1'
        ImageIndex = 14
        OnClick = ToggleBookmark
      end
      object Bookmark21: TMenuItem
        Tag = 2
        Caption = 'Bookmark 2'
        ImageIndex = 15
        OnClick = ToggleBookmark
      end
      object Bookmark31: TMenuItem
        Tag = 3
        Caption = 'Bookmark 3'
        ImageIndex = 16
        OnClick = ToggleBookmark
      end
      object Bookmark41: TMenuItem
        Tag = 4
        Caption = 'Bookmark 4'
        ImageIndex = 17
        OnClick = ToggleBookmark
      end
      object Bookmark51: TMenuItem
        Tag = 5
        Caption = 'Bookmark 5'
        ImageIndex = 18
        OnClick = ToggleBookmark
      end
      object Bookmark61: TMenuItem
        Tag = 6
        Caption = 'Bookmark 6'
        ImageIndex = 19
        OnClick = ToggleBookmark
      end
      object Bookmark71: TMenuItem
        Tag = 7
        Caption = 'Bookmark 7'
        ImageIndex = 20
        OnClick = ToggleBookmark
      end
      object Bookmark81: TMenuItem
        Tag = 8
        Caption = 'Bookmark 8'
        ImageIndex = 21
        OnClick = ToggleBookmark
      end
      object Bookmark91: TMenuItem
        Tag = 9
        Caption = 'Bookmark 9'
        ImageIndex = 22
        OnClick = ToggleBookmark
      end
    end
    object Gotobookmarks1: TMenuItem
      Caption = 'Goto bookmarks'
      object Bookmark02: TMenuItem
        Caption = 'Bookmark 0'
        ImageIndex = 13
        OnClick = GotoBookmark
      end
      object Bookmark12: TMenuItem
        Tag = 1
        Caption = 'Bookmark 1'
        ImageIndex = 14
        OnClick = GotoBookmark
      end
      object Bookmark22: TMenuItem
        Tag = 2
        Caption = 'Bookmark 2'
        ImageIndex = 15
        OnClick = GotoBookmark
      end
      object Bookmark32: TMenuItem
        Tag = 3
        Caption = 'Bookmark 3'
        ImageIndex = 16
        OnClick = GotoBookmark
      end
      object Bookmark42: TMenuItem
        Tag = 4
        Caption = 'Bookmark 4'
        ImageIndex = 17
        OnClick = GotoBookmark
      end
      object Bookmark52: TMenuItem
        Tag = 5
        Caption = 'Bookmark 5'
        ImageIndex = 18
        OnClick = GotoBookmark
      end
      object Bookmark62: TMenuItem
        Tag = 6
        Caption = 'Bookmark 6'
        ImageIndex = 19
        OnClick = GotoBookmark
      end
      object Bookmark72: TMenuItem
        Tag = 7
        Caption = 'Bookmark 7'
        ImageIndex = 20
        OnClick = GotoBookmark
      end
      object Bookmark82: TMenuItem
        Tag = 8
        Caption = 'Bookmark 8'
        ImageIndex = 21
        OnClick = GotoBookmark
      end
      object Bookmark92: TMenuItem
        Tag = 9
        Caption = 'Bookmark 9'
        ImageIndex = 22
        OnClick = GotoBookmark
      end
    end
  end
  object ecSpellChecker1: TecSpellChecker
    Style.Font.Charset = DEFAULT_CHARSET
    Style.Font.Color = clWindowText
    Style.Font.Height = -13
    Style.Font.Name = 'Courier New'
    Style.Font.Style = []
    Style.FormatType = ftBackGround
    Style.BorderTypeBottom = blWavyLine
    Style.BorderColorBottom = clRed
    Editor = EditorMaster
    Left = 244
    Top = 156
  end
  object HyperlinkHighlighter1: THyperlinkHighlighter
    Rules = <
      item
        DisplayName = 'http & ftp'
        Expression = 
          '(http|ftp)://[\w\d\-]+(\.[\w\d\-]+)+(:\d\d?\d?\d?\d?)?(((/[%+\w\' +
          'd\-\\\.]*)+)*)(\?[^\s=&"]+=[^\s=&"]+(&[^\s=&"]+=[^\s=&"]+)*)?(\#' +
          '[\w\d\-%+]+)?'
        ShellCommand = '\0'
      end
      item
        DisplayName = 'http (www)'
        Expression = 
          'www(\.[\w\d\-]+)+(:\d\d?\d?\d?\d?)?(((/[%+\w\d\-\\\.]*)+)*)(\?[^' +
          '\s=&"]+=[^\s=&"]+(&[^\s=&"]+=[^\s=&"]+)*)?(\#[\w\d\-%+]+)?'
        ShellCommand = 'http://\0'
      end
      item
        DisplayName = 'e-mail (mailto)'
        Expression = 'mailto:\s*[_a-z\d\-\.]+@[_a-z\d\-]+(\.[_a-z\d\-]+)+'
        ShellCommand = '\0'
      end
      item
        DisplayName = 'e-mail'
        Expression = '[_a-z\d\-\.]+@[_a-z\d\-]+(\.[_a-z\d\-]+)+'
        ShellCommand = 'mailto:\0'
      end>
    Style.Font.Charset = DEFAULT_CHARSET
    Style.Font.Color = clBlue
    Style.Font.Height = -13
    Style.Font.Name = 'Courier New'
    Style.Font.Style = [fsUnderline]
    Editor = EditorMaster
    Left = 212
    Top = 156
  end
end
