object fmMain: TfmMain
  Left = 266
  Height = 498
  Top = 242
  Width = 953
  Caption = 'Demo'
  ClientHeight = 498
  ClientWidth = 953
  Menu = MainMenu1
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '1.5'
  object PanelMain: TPanel
    Left = 0
    Height = 498
    Top = 0
    Width = 672
    Align = alClient
    BevelOuter = bvNone
    ClientHeight = 498
    ClientWidth = 672
    TabOrder = 0
    object Status: TStatusBar
      Left = 0
      Height = 21
      Top = 477
      Width = 672
      Panels = <>
    end
    object StatusMsg: TStatusBar
      Left = 0
      Height = 21
      Top = 456
      Width = 672
      Font.Color = clBlue
      Panels = <>
      ParentFont = False
    end
    object progress: TProgressBar
      AnchorSideLeft.Control = PanelMain
      AnchorSideLeft.Side = asrBottom
      AnchorSideRight.Control = StatusMsg
      AnchorSideRight.Side = asrBottom
      AnchorSideBottom.Control = StatusMsg
      AnchorSideBottom.Side = asrCenter
      Left = 507
      Height = 14
      Top = 459
      Width = 160
      Anchors = [akRight, akBottom]
      BorderSpacing.Right = 5
      Smooth = True
      Step = 1
      TabOrder = 2
      Visible = False
    end
    object btnStop: TButton
      AnchorSideRight.Control = progress
      AnchorSideBottom.Control = StatusMsg
      AnchorSideBottom.Side = asrCenter
      Left = 412
      Height = 22
      Top = 455
      Width = 90
      Anchors = [akRight, akBottom]
      BorderSpacing.Right = 5
      Caption = 'stop'
      OnClick = btnStopClick
      TabOrder = 3
      Visible = False
    end
  end
  object PanelRt: TPanel
    Left = 672
    Height = 498
    Top = 0
    Width = 281
    Align = alRight
    BevelOuter = bvNone
    ClientHeight = 498
    ClientWidth = 281
    TabOrder = 1
    object chkGutter: TCheckBox
      Left = 8
      Height = 24
      Top = 8
      Width = 68
      Caption = 'gutter'
      OnChange = chkGutterChange
      TabOrder = 0
    end
    object chkRuler: TCheckBox
      Left = 8
      Height = 24
      Top = 28
      Width = 58
      Caption = 'ruler'
      OnChange = chkRulerChange
      TabOrder = 1
    end
    object chkMinimap: TCheckBox
      Left = 8
      Height = 24
      Top = 48
      Width = 85
      Caption = 'minimap'
      OnChange = chkMinimapChange
      TabOrder = 2
    end
    object edSpaceX: TSpinEdit
      Left = 8
      Height = 27
      Top = 240
      Width = 52
      MaxValue = 10
      MinValue = -5
      OnChange = edSpaceXChange
      TabOrder = 8
    end
    object Label1: TLabel
      Left = 67
      Height = 17
      Top = 244
      Width = 63
      Caption = 'spacing-x'
      ParentColor = False
    end
    object Label2: TLabel
      Left = 67
      Height = 17
      Top = 308
      Width = 47
      Caption = 'margin'
      ParentColor = False
    end
    object edMarRt: TSpinEdit
      Left = 8
      Height = 27
      Top = 304
      Width = 52
      MaxValue = 200
      MinValue = 20
      OnChange = edMarRtChange
      TabOrder = 10
      Value = 20
    end
    object gWrap: TGroupBox
      Left = 144
      Height = 104
      Top = 4
      Width = 128
      Caption = 'wrap'
      ClientHeight = 85
      ClientWidth = 124
      TabOrder = 11
      object chkWrapOff: TRadioButton
        Left = 8
        Height = 24
        Top = 0
        Width = 46
        Caption = 'off'
        Checked = True
        OnChange = chkWrapOffChange
        TabOrder = 0
        TabStop = True
      end
      object chkWrapOn: TRadioButton
        Left = 8
        Height = 24
        Top = 20
        Width = 76
        Caption = 'at edge'
        OnChange = chkWrapOnChange
        TabOrder = 1
      end
      object chkWrapMargin: TRadioButton
        Left = 8
        Height = 24
        Top = 40
        Width = 90
        Caption = 'at margin'
        OnChange = chkWrapMarginChange
        TabOrder = 2
      end
      object chkWrapIndent: TCheckBox
        Left = 8
        Height = 24
        Top = 60
        Width = 101
        Caption = 'with indent'
        OnChange = chkWrapIndentChange
        TabOrder = 3
      end
    end
    object edFontsize: TSpinEdit
      Left = 8
      Height = 27
      Top = 176
      Width = 52
      MaxValue = 40
      MinValue = 4
      OnChange = edFontsizeChange
      TabOrder = 6
      Value = 10
    end
    object Label4: TLabel
      Left = 67
      Height = 17
      Top = 180
      Width = 58
      Caption = 'font size'
      ParentColor = False
    end
    object gUnpri: TGroupBox
      Left = 144
      Height = 104
      Top = 108
      Width = 128
      Caption = 'unprintable'
      ClientHeight = 85
      ClientWidth = 124
      TabOrder = 12
      object chkUnprintVis: TCheckBox
        Left = 8
        Height = 24
        Top = 1
        Width = 61
        Caption = 'show'
        OnChange = chkUnprintVisChange
        TabOrder = 0
      end
      object chkUnprintSp: TCheckBox
        Left = 8
        Height = 24
        Top = 20
        Width = 72
        Caption = 'spaces'
        OnChange = chkUnprintSpChange
        TabOrder = 1
      end
      object chkUnprintEnd: TCheckBox
        Left = 8
        Height = 24
        Top = 40
        Width = 58
        Caption = 'ends'
        OnChange = chkUnprintEndChange
        TabOrder = 2
      end
      object chkUnprintEndDet: TCheckBox
        Left = 8
        Height = 24
        Top = 60
        Width = 101
        Caption = 'end-details'
        OnChange = chkUnprintEndDetChange
        TabOrder = 3
      end
    end
    object edTabsize: TSpinEdit
      Left = 8
      Height = 27
      Top = 208
      Width = 52
      MaxValue = 12
      MinValue = 1
      OnChange = edTabsizeChange
      TabOrder = 7
      Value = 8
    end
    object Label5: TLabel
      Left = 67
      Height = 17
      Top = 212
      Width = 52
      Caption = 'tab size'
      ParentColor = False
    end
    object bFont: TButton
      Left = 8
      Height = 25
      Top = 92
      Width = 81
      Caption = 'font...'
      OnClick = bFontClick
      TabOrder = 4
    end
    object chkMicromap: TCheckBox
      Left = 8
      Height = 24
      Top = 68
      Width = 95
      Caption = 'micromap'
      OnChange = chkMicromapChange
      TabOrder = 3
    end
    object edSpaceY: TSpinEdit
      Left = 8
      Height = 27
      Top = 272
      Width = 52
      MaxValue = 10
      MinValue = -5
      OnChange = edSpaceYChange
      TabOrder = 9
    end
    object Label6: TLabel
      Left = 67
      Height = 17
      Top = 276
      Width = 62
      Caption = 'spacing-y'
      ParentColor = False
    end
    object bOpt: TButton
      Left = 8
      Height = 25
      Top = 120
      Width = 81
      Caption = 'opts...'
      OnClick = bOptClick
      TabOrder = 5
    end
    object Memo1: TMemo
      Left = 14
      Height = 151
      Top = 336
      Width = 162
      ScrollBars = ssBoth
      TabOrder = 13
      Visible = False
    end
    object btnMarker: TButton
      Left = 144
      Height = 25
      Top = 224
      Width = 96
      Caption = 'marker'
      OnClick = btnMarkerClick
      TabOrder = 14
    end
  end
  object OpenDialog1: TOpenDialog
    Options = [ofFileMustExist, ofEnableSizing]
    left = 472
    top = 20
  end
  object FontDialog1: TFontDialog
    Title = 'Font'
    MinFontSize = 0
    MaxFontSize = 0
    left = 536
    top = 20
  end
  object SaveDialog1: TSaveDialog
    Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
    left = 504
    top = 20
  end
  object MainMenu1: TMainMenu
    left = 432
    top = 80
    object mnuFile: TMenuItem
      Caption = 'File'
      object mnuFileOpen: TMenuItem
        Caption = 'Open..'
        ShortCut = 16463
        OnClick = mnuFileOpenClick
      end
      object mnuFileSav: TMenuItem
        Caption = 'Save..'
        OnClick = mnuFileSaveClick
      end
      object mnuFileEnd: TMenuItem
        Caption = 'Set ends'
        object mnuEndWin: TMenuItem
          Caption = 'win'
          OnClick = mnuEndWinClick
        end
        object mnuEndUnix: TMenuItem
          Caption = 'unix'
          OnClick = mnuEndUnixClick
        end
        object mnuEndMac: TMenuItem
          Caption = 'mac'
          OnClick = mnuEndMacClick
        end
      end
      object mnuFileHtml: TMenuItem
        Caption = 'Export HTML'
        OnClick = mnuFileHtmlClick
      end
    end
    object MenuItem9: TMenuItem
      Caption = 'Search'
      object mnuFind: TMenuItem
        Caption = 'find...'
        ShortCut = 16454
        OnClick = mnuFindClick
      end
      object mnuFindNext: TMenuItem
        Caption = 'find next'
        ShortCut = 114
        OnClick = mnuFindNextClick
      end
      object mnuGoto: TMenuItem
        Caption = 'go to..'
        ShortCut = 16455
        OnClick = bGotoClick
      end
    end
    object mnuEnc: TMenuItem
      Caption = 'Encoding'
    end
    object mnuTst: TMenuItem
      Caption = 'Test'
      object mnuTCaret1: TMenuItem
        Caption = 'set 100 cr''s'
        OnClick = mnuTCaret1Click
      end
      object mnuTCaretK: TMenuItem
        Caption = 'set 2000 cr''s'
        OnClick = bAddCrtClick
      end
      object mnuTMargin: TMenuItem
        Caption = 'set margins..'
        OnClick = mnuTMarginClick
      end
      object mnuTBms: TMenuItem
        Caption = 'toggle bookm'
        OnClick = mnuTBmsClick
      end
      object MenuItem5: TMenuItem
        Caption = '-'
      end
      object mnuSyntax: TMenuItem
        Caption = 'hilite syntax'
        ShortCut = 16467
        OnClick = mnuSyntaxClick
      end
      object mnuUnderline: TMenuItem
        Caption = 'underline ''www'''
        OnClick = mnuUnderlineClick
      end
      object MenuItem1: TMenuItem
        Caption = '-'
      end
      object mnuPane: TMenuItem
        Caption = 'show pane'
        Checked = True
        OnClick = mnuPaneClick
      end
      object mnuOneLine: TMenuItem
        Caption = 'combo..'
        OnClick = mnuOneLineClick
      end
    end
    object mnuOpts: TMenuItem
      Caption = 'Options'
      object mnuOptDlg: TMenuItem
        Caption = 'options..'
        ShortCut = 120
        OnClick = bOptClick
      end
      object mnuOptSave: TMenuItem
        Caption = 'save'
        Visible = False
        OnClick = btnSaveClick
      end
      object mnuOptLoad: TMenuItem
        Caption = 'load'
        Visible = False
        OnClick = btnLoadClick
      end
    end
    object mnuHlp: TMenuItem
      Caption = 'Help'
      object mnuHelpKey: TMenuItem
        Caption = 'commands..'
        ShortCut = 112
        OnClick = bKeymapClick
      end
      object MenuItem2: TMenuItem
        Caption = '-'
      end
      object mnuHelpMous: TMenuItem
        Caption = 'mouse help..'
        OnClick = mnuHelpMousClick
      end
    end
  end
  object PopupBookmk: TPopupMenu
    left = 480
    top = 104
    object mnuBms: TMenuItem
      Caption = 'toggle all bm''s'
      OnClick = mnuBmsClick
    end
  end
  object PopupNums: TPopupMenu
    left = 523
    top = 128
    object MenuItem3: TMenuItem
      Caption = 'test nums'
      Enabled = False
    end
  end
  object PopupFold: TPopupMenu
    left = 568
    top = 152
    object MenuItem4: TMenuItem
      Caption = 'test fold'
      Enabled = False
    end
  end
  object PopupMinimap: TPopupMenu
    left = 448
    top = 192
    object MenuItem6: TMenuItem
      Caption = 'minimap'
      Enabled = False
    end
  end
  object PopupMicromap: TPopupMenu
    left = 496
    top = 216
    object MenuItem7: TMenuItem
      Caption = 'micromap'
      Enabled = False
    end
  end
  object PopupRuler: TPopupMenu
    left = 552
    top = 240
    object MenuItem8: TMenuItem
      Caption = 'ruler'
      Enabled = False
    end
  end
  object TimerHint: TTimer
    Enabled = False
    Interval = 5500
    OnTimer = TimerHintTimer
    left = 560
    top = 303
  end
  object ApplicationProperties1: TApplicationProperties
    ShowButtonGlyphs = sbgNever
    ShowMenuGlyphs = sbgNever
    left = 548
    top = 366
  end
end