Hot Shareware 35/hot35.iso/ficheros/WTXT/CTE32_.ZIP/_SETUP.1/Cte95.exe/0/RCDATA/TMAINFORM/TMAINFORM.txt

Text File | 1998-06-03 | 58KB | 1,883 lines

object MainForm: TMainForm
  Left = 257
  Top = 125
  Width = 746
  Height = 488
  HelpContext = 1
  ActiveControl = SLInfo
  Color = clAppWorkSpace
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu
  Position = poDefault
  WindowMenu = MenuWindows
  OnClose = FormClose
  OnCloseQuery = POnCloseQuery
  OnCreate = POnCreate
  OnDestroy = FormDestroy
  OnShow = POnShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 427
    Width = 738
    Height = 20
    Align = alBottom
    BorderWidth = 1
    TabOrder = 0
    object SLInfo: TPanel
      Left = 2
      Top = 2
      Width = 502
      Height = 16
      Align = alClient
      Alignment = taLeftJustify
      BevelOuter = bvLowered
      BorderWidth = 1
      TabOrder = 0
      object PanelGauge: TPanel
        Left = 339
        Top = 2
        Width = 161
        Height = 12
        Align = alRight
        BevelOuter = bvLowered
        Caption = 'PanelGauge'
        TabOrder = 0
        Visible = False
        object SLGauge: TGauge
          Left = 1
          Top = 1
          Width = 159
          Height = 10
          Align = alClient
          ShowText = False
          BorderStyle = bsNone
          ForeColor = clHighlight
          BackColor = clBtnFace
          Progress = 0
        end
      end
    end
    object SLCaps: TPanel
      Left = 650
      Top = 2
      Width = 43
      Height = 16
      Align = alRight
      BevelOuter = bvLowered
      Enabled = False
      TabOrder = 1
      object LCaps: TLabel
        Left = 1
        Top = 1
        Width = 41
        Height = 14
        Align = alClient
        Alignment = taCenter
        Caption = 'CAPS'
      end
    end
    object SLNum: TPanel
      Left = 693
      Top = 2
      Width = 43
      Height = 16
      Align = alRight
      BevelOuter = bvLowered
      Enabled = False
      TabOrder = 2
      object LNUM: TLabel
        Left = 1
        Top = 1
        Width = 41
        Height = 14
        Align = alClient
        Alignment = taCenter
        Caption = 'NUM'
      end
    end
    object SLClock: TPanel
      Left = 504
      Top = 2
      Width = 103
      Height = 16
      Align = alRight
      BevelOuter = bvLowered
      Enabled = False
      TabOrder = 3
    end
    object SLOverwrite: TPanel
      Left = 607
      Top = 2
      Width = 43
      Height = 16
      Align = alRight
      BevelOuter = bvLowered
      Enabled = False
      TabOrder = 4
      object LOverwrite: TLabel
        Left = 1
        Top = 1
        Width = 41
        Height = 14
        Align = alClient
        Alignment = taCenter
        Caption = 'OVER'
      end
    end
  end
  object SpeedPanel: TPanel
    Left = 0
    Top = 0
    Width = 738
    Height = 30
    HelpContext = 4
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object TBFontBold: TSpeedButton
      Left = 344
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Bold'
      AllowAllUp = True
      GroupIndex = -1
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880880000000008888088880088800088808888008888000880888800888800
        0880888800888800088088880088800008808888000000088880888800888000
        8880888800888800088088880088880008808888008888000880888800888000
        888088000000000888808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBFontItalic: TSpeedButton
      Left = 363
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Italic'
      AllowAllUp = True
      GroupIndex = -2
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888800000888888088888800888888808888888088888880888888808888
        8880888888808888888088888888088888808888888808888880888888880888
        8880888888888088888088888888808888808888888880888880888888888008
        888088888888000088808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBFontCapital: TSpeedButton
      Left = 382
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Capitals'
      AllowAllUp = True
      GroupIndex = -3
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888888888888088888888888888808888888888888880088808000888
        0080088808088080880000000808808088800888080008808880088808088080
        8880808088088080880088088800088800808888888888888880888888888888
        888088888888888888808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBFontUnderline: TSpeedButton
      Left = 401
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Underline'
      AllowAllUp = True
      GroupIndex = -4
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888888888888088880000000088808888000000008880888888888888
        8880888880000080888088880088800888808888008880088880888800888008
        8880888800888008888088880088800888808888008880088880888888888888
        888088888888888888808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBMultiKey: TSpeedButton
      Left = 313
      Top = 4
      Width = 20
      Height = 21
      Hint = 'MultiKey Font Dialog'
      AllowAllUp = True
      Glyph.Data = {
        66030000424D6603000000000000360000002800000010000000110000000100
        1800000000000000000000000000000000000000000000000000408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        8040808040808040808000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000408080000000000000
        F8F800F8F800000000F8F800000000000000000000F8F800F8F8000000000000
        00F8F800000000408080000000F8F800008080008080F8F80000000000000000
        0000000000000000F8F800000000F8F800000000000000408080000000F8F800
        008080008080F8F800000000000000000000000000000000000000F8F8000000
        00F8F800000000408080000000000000F8F800F8F800000000F8F80000000000
        0000000000000000000000F8F800000000F8F800000000408080000000000000
        000000000000000000000000000000000000000000000000F8F8000000000000
        00F8F800000000408080000000000000000000F8F80000000000000000000000
        0000000000000000000000000000000000000000000000408080000000000000
        F8F800F8F800000000000000F8F800F8F800000000F8F8000000000000000000
        00000000000000408080000000000000000000000000000000F8F800F8F80000
        8080F8F800000000000000000000000000000000000000408080000000000000
        000000000000000000000000F8F800F8F800F8F8000000000000000000000000
        0000000000000040808000000000000000000000000000000000000000000000
        0000F8F800000000000000000000000000000000000000408080000000000000
        000000000000000000000000F8F800F8F800F8F8000000000000000000000000
        0000000000000040808000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000408080000000000000
        000000000000000000000000F8F800F8F8000000000000000000000000000000
        0000000000000040808000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000408080408080408080
        4080804080804080804080804080804080804080804080804080804080804080
        80408080408080408080}
      Margin = 1
      Spacing = 0
      OnClick = MenuPassClick
    end
    object TBFontStrikeout: TSpeedButton
      Left = 420
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Strikeout'
      AllowAllUp = True
      GroupIndex = -5
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888888888888088000008800088808088808808880880808880880888
        8080880880880888808088800088088880800000000000000000808880880088
        0880880008880800888088888888088888808888888808888880888888800888
        888088888888088888808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBFontHidden: TSpeedButton
      Left = 439
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Hidden'
      AllowAllUp = True
      GroupIndex = -6
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888888888888088666688866668808886688888668880888668888866
        8880888668888866888088866888886688808886666666668880888668888866
        8880888668888866888088866888886688808886688888668880886666888666
        688088888888888888808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBAlignLeft: TSpeedButton
      Left = 492
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Left Align'
      GroupIndex = 1
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880800000000008888088888888888888808000000000000880888888888888
        8880800000000008888088888888888888808000000000000880888888888888
        8880800000000008888088888888888888808000000000000080888888888888
        888080000000000088808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBAlignRight: TSpeedButton
      Left = 511
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Right Align'
      GroupIndex = 1
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888000000000008088888888888888808800000000000080888888888888
        8880800000000000008088888888888888808880000000000080888888888888
        8880880000000000008088888888888888808888800000000080888888888888
        888088800000000000808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBAlignCenter: TSpeedButton
      Left = 530
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Centered'
      GroupIndex = 1
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880880000000000088088888888888888808880000000008880888888888888
        8880800000000000008088888888888888808800000000000880888888888888
        8880888000000000888088888888888888808888000000088880888888888888
        888088000000000008808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBAlignBlock: TSpeedButton
      Left = 549
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Block Align'
      GroupIndex = 1
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880800000000000008088888888888888808000000000000080888888888888
        8880800000000000008088888888888888808000000000000080888888888888
        8880800000000000008088888888888888808000000000000080888888888888
        888080000000000000808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBShowControlSigns: TSpeedButton
      Left = 576
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Show control signs'
      AllowAllUp = True
      GroupIndex = -7
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888808088888088888880808888808888888080888880888888808088
        8880888888808088888088888880808888808888888080888880888880008088
        8880888800008088888088880000808888808888000080888880888800008088
        888088888000000088808888888888888880}
      Margin = 1
      Spacing = 0
      OnClick = OptionsShowControlSignsClick
    end
    object TBSynchronize: TSpeedButton
      Left = 595
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Synchronize'
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00887777888877
        77808FFFF7888FFFF7808F88F7888F88F7808FFFF7888FFFF7808F88F7888F88
        F7808FFFF8888FFFF88088888E888E888880888888E8E8888880888887777788
        88808888FFFFF78888808888FFFFF78888808888F777F78888808888FFFFF788
        88808888F777F78888808888FFFFF8888880}
      Margin = 1
      Spacing = 0
      OnClick = MenuPassClick
    end
    object TBFontRTL: TSpeedButton
      Left = 458
      Top = 4
      Width = 20
      Height = 21
      Hint = 'Right to left'
      AllowAllUp = True
      GroupIndex = -7
      Glyph.Data = {
        EE000000424DEE0000000000000076000000280000000F0000000F0000000100
        0400000000007800000000000000000000000000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7770777777777777777077777777777777707777777777777770777770777777
        7770777707777777777077700000000007707700000000000770777000000000
        0770777707777777777077777077777777707777777777777770777777777777
        777077777777777777707777777777777770}
      Margin = 1
      Spacing = 0
      OnClick = PassFormatClick
    end
    object TBFontName: TComboBox
      Left = 133
      Top = 5
      Width = 107
      Height = 21
      Hint = 'Font Name'
      HelpContext = 4
      Style = csDropDownList
      Ctl3D = True
      DropDownCount = 16
      ItemHeight = 13
      ParentCtl3D = False
      Sorted = True
      TabOrder = 1
      OnClick = TBFontNameClick
      OnKeyDown = TBKeyDown
    end
    object TBFontSize: TComboBox
      Left = 245
      Top = 5
      Width = 59
      Height = 21
      Hint = 'Font Size'
      HelpContext = 4
      DropDownCount = 16
      ItemHeight = 13
      TabOrder = 2
      OnClick = TBFontSizeClick
      OnKeyDown = TBFontSizeKeyDown
    end
    object TBFormatVorlage: TComboBox
      Left = 4
      Top = 5
      Width = 124
      Height = 21
      Hint = 'Template'
      HelpContext = 4
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
      OnClick = TBFormatVorlageClick
      OnKeyDown = TBKeyDown
    end
    object TBSigla: TComboBox
      Left = 622
      Top = 3
      Width = 42
      Height = 24
      Hint = 'Sigla'
      HelpContext = 4
      TabStop = False
      Style = csOwnerDrawVariable
      DropDownCount = 16
      ItemHeight = 18
      TabOrder = 3
      OnClick = TBSiglaClick
      OnDrawItem = TBSiglaDrawItem
      OnKeyDown = TBKeyDown
      OnMeasureItem = TBSiglaMeasureItem
    end
  end
  object PrintPanel: TPanel
    Left = 716
    Top = 30
    Width = 22
    Height = 397
    HelpContext = 1
    Align = alRight
    TabOrder = 2
    Visible = False
    object BNextPage: TSpeedButton
      Left = 0
      Top = 26
      Width = 22
      Height = 25
      Hint = 'Next Page'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
        333333333337F33333333333333033333333333333373F333333333333090333
        33333333337F7F33333333333309033333333333337373F33333333330999033
        3333333337F337F33333333330999033333333333733373F3333333309999903
        333333337F33337F33333333099999033333333373333373F333333099999990
        33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F333333333333000333333333333377733333330000}
      NumGlyphs = 2
    end
    object BLastPage: TSpeedButton
      Left = 0
      Top = 0
      Width = 22
      Height = 25
      Hint = 'Previous Page'
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
        3333333333777F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
        3333333777737777F333333099999990333333373F3333373333333309999903
        333333337F33337F33333333099999033333333373F333733333333330999033
        3333333337F337F3333333333099903333333333373F37333333333333090333
        33333333337F7F33333333333309033333333333337373333333333333303333
        333333333337F3333333333333303333333333333337333333330000}
      NumGlyphs = 2
    end
    object BCancel: TSpeedButton
      Left = 0
      Top = 52
      Width = 22
      Height = 25
      Hint = 'Close'
      Glyph.Data = {
        CE070000424DCE07000000000000360000002800000024000000120000000100
        1800000000009807000000000000000000000000000000000000008080008080
        0080800080800080800080800080800080800080800080800080800080800080
        8000808000808000808000808000808000808000808000808000808000808000
        8080008080008080008080008080008080008080008080008080008080008080
        0080800080800080800080800080800080808080808080800080800080800080
        8000808000808000808000808000808000808000808000808000808000808000
        8080008080008080008080FFFFFF008080008080008080008080008080008080
        0080800080800080800080800080800080800080800080800080800000F80000
        800000808080800080800080800080800080800080800000F880808000808000
        8080008080008080008080008080008080008080808080808080FFFFFF008080
        008080008080008080008080008080FFFFFF0080800080800080800080800080
        800080800080800000F800008000008000008080808000808000808000808000
        00F8000080000080808080008080008080008080008080008080008080808080
        FFFFFF008080808080FFFFFF008080008080008080FFFFFF808080808080FFFF
        FF0080800080800080800080800080800080800000F800008000008000008000
        00808080800080800000F8000080000080000080000080808080008080008080
        008080008080008080808080FFFFFF008080008080808080FFFFFF008080FFFF
        FF808080008080008080808080FFFFFF00808000808000808000808000808000
        80800000F8000080000080000080000080808080000080000080000080000080
        000080808080008080008080008080008080008080808080FFFFFF0080800080
        80008080808080FFFFFF808080008080008080008080008080808080FFFFFF00
        80800080800080800080800080800080800000F8000080000080000080000080
        0000800000800000800000808080800080800080800080800080800080800080
        80008080808080FFFFFF00808000808000808080808000808000808000808000
        8080FFFFFF808080008080008080008080008080008080008080008080008080
        0000F80000800000800000800000800000800000808080800080800080800080
        80008080008080008080008080008080008080808080FFFFFF00808000808000
        8080008080008080008080FFFFFF808080008080008080008080008080008080
        0080800080800080800080800080800000800000800000800000800000808080
        8000808000808000808000808000808000808000808000808000808000808000
        8080808080FFFFFF008080008080008080008080008080808080008080008080
        0080800080800080800080800080800080800080800080800080800000F80000
        8000008000008000008080808000808000808000808000808000808000808000
        8080008080008080008080008080008080808080FFFFFF008080008080008080
        8080800080800080800080800080800080800080800080800080800080800080
        800080800000F800008000008000008000008000008080808000808000808000
        8080008080008080008080008080008080008080008080008080008080808080
        008080008080008080008080808080FFFFFF0080800080800080800080800080
        800080800080800080800080800000F800008000008000008080808000008000
        0080000080808080008080008080008080008080008080008080008080008080
        008080008080808080008080008080008080008080008080808080FFFFFF0080
        800080800080800080800080800080800080800080800000F800008000008000
        00808080800080800000F8000080000080000080808080008080008080008080
        008080008080008080008080008080808080008080008080008080808080FFFF
        FF008080008080808080FFFFFF00808000808000808000808000808000808000
        80800000F80000800000808080800080800080800080800000F8000080000080
        000080808080008080008080008080008080008080008080808080FFFFFF0080
        80008080808080008080808080FFFFFF008080008080808080FFFFFF00808000
        80800080800080800080800080800080800000F8000080008080008080008080
        0080800080800000F80000800000800000800080800080800080800080800080
        80008080808080FFFFFFFFFFFF808080008080008080008080808080FFFFFF00
        8080008080808080FFFFFF008080008080008080008080008080008080008080
        0080800080800080800080800080800080800080800000F80000800000F80080
        8000808000808000808000808000808000808080808080808000808000808000
        8080008080008080808080FFFFFFFFFFFFFFFFFF808080008080008080008080
        0080800080800080800080800080800080800080800080800080800080800080
        8000808000808000808000808000808000808000808000808000808000808000
        8080008080008080008080008080008080008080008080808080808080808080
        0080800080800080800080800080800080800080800080800080800080800080
        8000808000808000808000808000808000808000808000808000808000808000
        8080008080008080008080008080008080008080008080008080008080008080
        008080008080008080008080008080008080}
      NumGlyphs = 2
    end
  end
  object MainMenu: TMainMenu
    Left = 120
    Top = 204
    object Key1: TMenuItem
      Caption = 'Key'
      HelpContext = 2
      ShortCut = 0
      Visible = False
      object MenuOverwrite: TMenuItem
        Caption = 'Overwrite'
        ShortCut = 45
        OnClick = MenuOverwriteClick
      end
      object Insert0: TMenuItem
        Caption = '0'
        ShortCut = 32816
        OnClick = MenuPassClick
      end
      object Insert1: TMenuItem
        Tag = 1
        Caption = '1'
        ShortCut = 32817
        OnClick = MenuPassClick
      end
      object Insert2: TMenuItem
        Tag = 2
        Caption = '2'
        ShortCut = 32818
        OnClick = MenuPassClick
      end
      object Insert3: TMenuItem
        Tag = 3
        Caption = '3'
        ShortCut = 32819
        OnClick = MenuPassClick
      end
      object Insert4: TMenuItem
        Tag = 4
        Caption = '4'
        ShortCut = 32820
        OnClick = MenuPassClick
      end
      object Insert5: TMenuItem
        Tag = 5
        Caption = '5'
        ShortCut = 32821
        OnClick = MenuPassClick
      end
      object Insert6: TMenuItem
        Tag = 6
        Caption = '6'
        ShortCut = 32822
        OnClick = MenuPassClick
      end
      object Insert7: TMenuItem
        Tag = 7
        Caption = '7'
        ShortCut = 32823
        OnClick = MenuPassClick
      end
      object Insert8: TMenuItem
        Tag = 8
        Caption = '8'
        ShortCut = 32824
        OnClick = MenuPassClick
      end
      object Insert9: TMenuItem
        Tag = 9
        Break = mbBarBreak
        Caption = '9'
        ShortCut = 32825
        OnClick = MenuPassClick
      end
      object FontBold: TMenuItem
        Caption = 'Bold'
        ShortCut = 24642
        OnClick = PassFormatClick
      end
      object FontItalic: TMenuItem
        Caption = 'Italic'
        ShortCut = 24649
        OnClick = PassFormatClick
      end
      object FontCapitals: TMenuItem
        Caption = 'Caps'
        ShortCut = 24643
        OnClick = PassFormatClick
      end
      object FontUnderline: TMenuItem
        Caption = 'Underline'
        ShortCut = 24661
        OnClick = PassFormatClick
      end
      object FontStrikeout: TMenuItem
        Caption = 'Strikeout'
        ShortCut = 24659
        OnClick = PassFormatClick
      end
      object FontHidden: TMenuItem
        Caption = 'Hidden'
        ShortCut = 24664
        OnClick = PassFormatClick
      end
      object FontRTL: TMenuItem
        Caption = 'RTL'
        ShortCut = 24652
        OnClick = PassFormatClick
      end
      object FontName: TMenuItem
        Caption = 'FontName'
        ShortCut = 24641
        OnClick = FontNameClick
      end
      object FontSize: TMenuItem
        Caption = 'FontSize'
        ShortCut = 24656
        OnClick = FontSizeClick
      end
      object EditCut1: TMenuItem
        Caption = 'Cu&t'
        ShortCut = 8238
        OnClick = MenuPassClick
      end
      object EditUndo1: TMenuItem
        Caption = '&Undo'
        ShortCut = 32776
        OnClick = MenuPassClick
      end
      object EditCopy1: TMenuItem
        Caption = '&Copy'
        ShortCut = 16429
        OnClick = MenuPassClick
      end
      object EditPaste1: TMenuItem
        Caption = '&Paste'
        ShortCut = 8237
        OnClick = MenuPassClick
      end
      object RefWhole: TMenuItem
        Caption = 'RefWhole'
        ShortCut = 16453
        OnClick = MenuPassClick
      end
      object RefWhole1: TMenuItem
        Caption = 'RefWhole'
        ShortCut = 24645
        OnClick = MenuPassClick
      end
      object RefHide: TMenuItem
        Caption = 'RefHide'
        ShortCut = 16456
        OnClick = MenuPassClick
      end
      object RefHide1: TMenuItem
        Caption = 'RefHide'
        ShortCut = 24648
        OnClick = MenuPassClick
      end
      object RefBracket: TMenuItem
        Caption = 'RefBracket'
        ShortCut = 16465
        OnClick = MenuPassClick
      end
      object RefBracket1: TMenuItem
        Caption = 'RefBracket'
        ShortCut = 24657
        OnClick = MenuPassClick
      end
      object MultiKey: TMenuItem
        Caption = 'MultiKey'
        ShortCut = 123
        OnClick = MenuPassClick
      end
      object EditUndo2: TMenuItem
        Caption = '&Undo'
        HelpContext = 302
        Hint = 'Undo the last input'
        ShortCut = 16474
        OnClick = MenuPassClick
      end
      object EditCut2: TMenuItem
        Caption = 'Cu&t'
        HelpContext = 302
        Hint = 'Delete marked text to clipboard'
        ShortCut = 16472
        OnClick = MenuPassClick
      end
      object EditCopy2: TMenuItem
        Caption = '&Copy'
        HelpContext = 302
        Hint = 'Copy marked text to clipboard'
        ShortCut = 16451
        OnClick = MenuPassClick
      end
      object EditPaste2: TMenuItem
        Caption = '&Paste'
        HelpContext = 302
        Hint = 'Insert text from clipboard'
        ShortCut = 16470
        OnClick = MenuPassClick
      end
      object ShiftBackspace: TMenuItem
        Caption = 'ShiftBackspace'
        ShortCut = 16392
        OnClick = MenuPassClick
      end
      object DefaultFont: TMenuItem
        Caption = 'DefaultFont'
        ShortCut = 16452
        OnClick = MenuPassClick
      end
    end
    object MenuFile: TMenuItem
      Caption = '&File'
      HelpContext = 301
      Hint = 'Create, open, save and print documents'
      ShortCut = 0
      object x1: TMenuItem
        Caption = 'x'
        Enabled = False
        ShortCut = 0
        Visible = False
      end
      object FileNew: TMenuItem
        Caption = '&New'
        HelpContext = 301
        Hint = 'Create a new document'
        ShortCut = 0
        OnClick = FileNewClick
      end
      object FileOpen: TMenuItem
        Caption = '&Open...'
        HelpContext = 301
        Hint = 'Open an existing document'
        ShortCut = 16463
        OnClick = FileOpenClick
      end
      object FileImport: TMenuItem
        Caption = '&Import...'
        HelpContext = 301
        Hint = 'Import a RTF or ENPS file'
        ShortCut = 0
        OnClick = FileImportClick
      end
      object FileSave: TMenuItem
        Caption = '&Save'
        HelpContext = 301
        Hint = 'Save document'
        ShortCut = 16467
        OnClick = FileSaveClick
      end
      object FileSaveAs: TMenuItem
        Caption = 'Save &as...'
        HelpContext = 301
        Hint = 'Save document to a new file'
        ShortCut = 0
        OnClick = FileSaveAsClick
      end
      object FileClose: TMenuItem
        Caption = '&Close'
        HelpContext = 301
        Hint = 'Close document'
        ShortCut = 0
        OnClick = FileCloseClick
      end
      object N4: TMenuItem
        Caption = '-'
        HelpContext = 301
        ShortCut = 0
      end
      object FilePrint: TMenuItem
        Caption = '&Print...'
        HelpContext = 301
        Hint = 'Print document'
        ShortCut = 16464
        OnClick = FilePrintClick
      end
      object FilePrintPreview: TMenuItem
        Caption = 'Print pre&view'
        HelpContext = 301
        Hint = 'Show a print preview'
        ShortCut = 0
        OnClick = FilePrintPreviewClick
      end
      object FilePrinterSetup: TMenuItem
        Caption = 'P&rinter setup...'
        HelpContext = 301
        Hint = 'Open the printer setup dialog'
        ShortCut = 0
        OnClick = FilePrinterSetupClick
      end
      object N22: TMenuItem
        Caption = '-'
        HelpContext = 301
        ShortCut = 0
      end
      object FileIndex: TMenuItem
        Caption = 'In&dex'
        HelpContext = 301
        Hint = 'Create an index for the current document'
        ShortCut = 0
        OnClick = FileIndexClick
      end
      object N3: TMenuItem
        Caption = '-'
        HelpContext = 301
        ShortCut = 0
      end
      object FileExit: TMenuItem
        Caption = 'E&xit'
        HelpContext = 301
        Hint = 'Leave this program'
        ShortCut = 0
        OnClick = FileExitClick
      end
    end
    object MenuEdit: TMenuItem
      Caption = '&Edit'
      GroupIndex = 1
      HelpContext = 302
      Hint = 'Manipulate text'
      ShortCut = 0
      object EditUndo: TMenuItem
        Caption = '&Undo'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Undo the last input'
        ShortCut = 16474
        OnClick = MenuPassClick
      end
      object N7: TMenuItem
        Caption = '-'
        GroupIndex = 1
        HelpContext = 302
        ShortCut = 0
      end
      object EditCut: TMenuItem
        Caption = 'Cu&t'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Delete marked text to clipboard'
        ShortCut = 16472
        OnClick = MenuPassClick
      end
      object EditCopy: TMenuItem
        Caption = '&Copy'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Copy marked text to clipboard'
        ShortCut = 16451
        OnClick = MenuPassClick
      end
      object EditPaste: TMenuItem
        Caption = '&Paste'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Insert text from clipboard'
        ShortCut = 16470
        OnClick = MenuPassClick
      end
      object N6: TMenuItem
        Caption = '-'
        GroupIndex = 1
        HelpContext = 302
        ShortCut = 0
      end
      object EditFont: TMenuItem
        Caption = '&Font...'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Change the current font'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object EditParagraph: TMenuItem
        Caption = 'P&aragraph...'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Change the paragraph format'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object EditSection: TMenuItem
        Caption = '&Section...'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Change the section format'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object EditReference: TMenuItem
        Caption = '&Reference...'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Change the reference attributes'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object N5: TMenuItem
        Caption = '-'
        GroupIndex = 1
        HelpContext = 302
        ShortCut = 0
      end
      object EditDeletereference: TMenuItem
        Caption = '&Delete reference'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Delete this reference'
        ShortCut = 16430
        OnClick = MenuPassClick
      end
      object EditCleanReference: TMenuItem
        Caption = 'Cl&ean reference'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Update this reference'
        ShortCut = 120
        OnClick = MenuPassClick
      end
      object EditUpdateAllReferences: TMenuItem
        Caption = 'Update a&ll references'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Update all references in the document'
        ShortCut = 0
        OnClick = EditUpdateAllReferencesClick
      end
      object EditSigla: TMenuItem
        Caption = 'Si&gla'
        GroupIndex = 1
        HelpContext = 302
        Hint = 'Solve and build sigla'
        ShortCut = 0
        object EditSolveSiglaBlock: TMenuItem
          Caption = '&Solve next block'
          Hint =
            'Solve the sigla in the block after the caret location to mss. nu' +
            'mbers'
          ShortCut = 8306
          OnClick = MenuPassClick
        end
        object EditBuildSiglaBlock: TMenuItem
          Caption = '&Build next block'
          Hint = 'Build the mss. block after the caret location to sigla'
          ShortCut = 16498
          OnClick = MenuPassClick
        end
        object EditSolveSigla: TMenuItem
          Caption = 'S&olve all'
          HelpContext = 302
          Hint = 'Solve sigla to mss. numbers'
          ShortCut = 0
          OnClick = EditSolveSiglaClick
        end
        object EditBuildSigla: TMenuItem
          Caption = 'B&uild all'
          HelpContext = 302
          Hint = 'Build mss. numbers to sigla'
          ShortCut = 0
          OnClick = EditBuildSiglaClick
        end
      end
      object N1: TMenuItem
        Caption = '-'
        GroupIndex = 1
        ShortCut = 0
      end
      object EditCreateShortcut: TMenuItem
        Caption = 'Create Autote&xt...'
        GroupIndex = 1
        ShortCut = 16497
        OnClick = MenuPassClick
      end
    end
    object MenuInsert: TMenuItem
      Caption = '&Insert'
      GroupIndex = 2
      HelpContext = 303
      Hint = 'Insert references etc.'
      ShortCut = 0
      object InsertAppRef: TMenuItem
        Caption = '&Apparatus reference'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert a reference to this text'
        ShortCut = 116
        OnClick = MenuPassClick
      end
      object InsertNotRef: TMenuItem
        Caption = '&Note reference'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert a reference to this text'
        ShortCut = 8308
        OnClick = MenuPassClick
      end
      object InsertAppSingle: TMenuItem
        Caption = '&Line ref. into apparatus'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert a reference to this text'
        ShortCut = 118
        OnClick = MenuPassClick
      end
      object InsertNotSingle: TMenuItem
        Caption = 'L&ine ref. into notes'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert a reference to this text'
        ShortCut = 8310
        OnClick = MenuPassClick
      end
      object InsertSiglum: TMenuItem
        Caption = '&Siglum...'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert a siglum'
        ShortCut = 114
        OnClick = MenuPassClick
      end
      object N10: TMenuItem
        Caption = '-'
        GroupIndex = 3
        HelpContext = 303
        ShortCut = 0
      end
      object InsertChapter: TMenuItem
        Caption = '&Chapter'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Convert marked text to chapter number'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object InsertLeftMargin: TMenuItem
        Caption = 'Inner &margin'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert margin text'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object InsertRightMargin: TMenuItem
        Caption = '&Outer margin'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert margin text'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object InsertCommand: TMenuItem
        Caption = 'Comman&d string...'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert command string'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object InsertParagraphNumbers: TMenuItem
        Caption = '&Paragraph numbers...'
        GroupIndex = 3
        HelpContext = 303
        Hint =
          'Number paragraphs automatically, inserting chapter and margin te' +
          'xt'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object N9: TMenuItem
        Caption = '-'
        GroupIndex = 3
        HelpContext = 303
        ShortCut = 0
      end
      object InsertCharmap: TMenuItem
        Caption = 'Cha&racter map'
        GroupIndex = 3
        Hint = 'Display a map of the characters of the current font'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object InsertSpecialCharacter: TMenuItem
        Caption = 'Sp&ecial character...'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert special character'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object InsertSection: TMenuItem
        Caption = 'Sec&tion'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert section break after this paragraph'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object N8: TMenuItem
        Caption = '-'
        GroupIndex = 3
        HelpContext = 303
        ShortCut = 0
      end
      object InsertFile: TMenuItem
        Caption = '&File...'
        GroupIndex = 3
        HelpContext = 303
        Hint = 'Insert another document'
        ShortCut = 0
        OnClick = InsertFileClick
      end
      object InsertShortCut: TMenuItem
        Caption = 'Autote&xt'
        GroupIndex = 3
        Hint = 'Convert the last characters to shortcut text'
        ShortCut = 113
        OnClick = MenuPassClick
      end
      object N18: TMenuItem
        Caption = '-'
        GroupIndex = 3
        ShortCut = 0
      end
      object InsertBible: TMenuItem
        Caption = 'Bible &Works text...'
        GroupIndex = 3
        Hint =
          'Insert converted Bible Works Greek or Hebrew text at the caret p' +
          'osition'
        ShortCut = 0
        OnClick = MenuPassClick
      end
    end
    object MenuFind: TMenuItem
      Caption = 'Fi&nd'
      GroupIndex = 3
      HelpContext = 304
      Hint = 'Search and replace text, formats and mss.'
      ShortCut = 0
      object MFindFind: TMenuItem
        Caption = '&Find...'
        HelpContext = 304
        Hint = 'Fint text and formats'
        ShortCut = 16454
        OnClick = MFindFindClick
      end
      object MFindReplace: TMenuItem
        Caption = '&Replace...'
        HelpContext = 304
        Hint = 'Replace text and formats'
        ShortCut = 16466
        OnClick = MFindReplaceClick
      end
      object FindFindAgain: TMenuItem
        Caption = 'Fi&nd again'
        HelpContext = 304
        Hint = 'Repeat last search'
        ShortCut = 24646
        OnClick = MenuPassClick
      end
      object FindReplaceAgain: TMenuItem
        Caption = 'R&eplace again'
        HelpContext = 304
        Hint = 'Replace and repeat last search'
        ShortCut = 24658
        OnClick = MenuPassClick
      end
      object N13: TMenuItem
        Caption = '-'
        HelpContext = 304
        ShortCut = 0
      end
      object FindFindMss: TMenuItem
        Caption = 'Find &mss...'
        HelpContext = 304
        Hint = 'Find mss.'
        ShortCut = 16461
        OnClick = FindFindMssClick
      end
      object FindFindMssAgain: TMenuItem
        Caption = 'Find m&ss. again'
        HelpContext = 304
        Hint = 'Repeat last mss. search'
        ShortCut = 24653
        OnClick = MenuPassClick
      end
      object FindFindSigla: TMenuItem
        Caption = 'Find si&gla'
        ShortCut = 16455
        OnClick = MenuPassClick
      end
      object FindFindSiglaAgain: TMenuItem
        Caption = 'Find sig&la again'
        ShortCut = 24647
        OnClick = MenuPassClick
      end
      object N12: TMenuItem
        Caption = '-'
        HelpContext = 304
        ShortCut = 0
      end
      object FindDirtyReference: TMenuItem
        Caption = 'Dirt&y reference'
        HelpContext = 304
        Hint = 'Find dirty reference'
        ShortCut = 8312
        OnClick = MenuPassClick
      end
      object EditDeleteMss: TMenuItem
        Caption = '&Delete mss...'
        HelpContext = 302
        Hint = 'Delete mss. from the document'
        ShortCut = 0
        OnClick = EditDeleteMssClick
      end
      object N11: TMenuItem
        Caption = '-'
        HelpContext = 304
        ShortCut = 0
      end
      object GotoBookmark: TMenuItem
        Caption = '&Bookmark'
        HelpContext = 304
        Hint = 'Goto bookmark'
        ShortCut = 0
        object GotoBookmark1: TMenuItem
          Caption = '&1'
          HelpContext = 304
          ShortCut = 16433
          OnClick = MenuPassClick
        end
        object GotoBookmark2: TMenuItem
          Caption = '&2'
          HelpContext = 304
          ShortCut = 16434
          OnClick = MenuPassClick
        end
        object GotoBookmark3: TMenuItem
          Caption = '&3'
          HelpContext = 304
          ShortCut = 16435
          OnClick = MenuPassClick
        end
        object GotoBookmark4: TMenuItem
          Caption = '&4'
          HelpContext = 304
          ShortCut = 16436
          OnClick = MenuPassClick
        end
      end
      object Setbookmark: TMenuItem
        Caption = 'Set b&ookmark'
        HelpContext = 304
        Hint = 'Set bookmark'
        ShortCut = 0
        object Setbookmark1: TMenuItem
          Caption = '&1'
          HelpContext = 304
          ShortCut = 24625
          OnClick = MenuPassClick
        end
        object Setbookmark2: TMenuItem
          Caption = '&2'
          HelpContext = 304
          ShortCut = 24626
          OnClick = MenuPassClick
        end
        object Setbookmark3: TMenuItem
          Caption = '&3'
          HelpContext = 304
          ShortCut = 24627
          OnClick = MenuPassClick
        end
        object Setbookmark4: TMenuItem
          Caption = '&4'
          HelpContext = 304
          ShortCut = 24628
          OnClick = MenuPassClick
        end
      end
    end
    object MenuOptions: TMenuItem
      Caption = '&Options'
      GroupIndex = 3
      HelpContext = 305
      Hint = 'Change display and document settings'
      ShortCut = 0
      object OptionsEditMode: TMenuItem
        Caption = '&Edit mode'
        GroupIndex = 1
        HelpContext = 305
        Hint = 'Show document in edit mode'
        ShortCut = 0
        OnClick = OptionsEditModeClick
      end
      object OptionsMadeUpMode: TMenuItem
        Caption = '&Made up mode'
        GroupIndex = 1
        HelpContext = 305
        Hint = 'Show document in made up mode'
        ShortCut = 0
        OnClick = OptionsMadeUpModeClick
      end
      object OptionsShowControlSigns: TMenuItem
        Caption = '&Show control signs'
        GroupIndex = 1
        HelpContext = 305
        Hint = 'Show paragraph breaks etc.'
        ShortCut = 24624
        OnClick = OptionsShowControlSignsClick
      end
      object N14: TMenuItem
        Caption = '-'
        GroupIndex = 1
        HelpContext = 305
        ShortCut = 0
      end
      object OptionsPreferences: TMenuItem
        Caption = '&Preferences...'
        GroupIndex = 1
        HelpContext = 305
        Hint = 'Edit general preferences'
        ShortCut = 0
        OnClick = OptionsPreferencesClick
      end
      object OptionsFormat: TMenuItem
        Caption = '&Format...'
        GroupIndex = 1
        HelpContext = 305
        Hint = 'Edit document format'
        ShortCut = 0
        OnClick = OptionsFormatClick
      end
      object OptionsSigla: TMenuItem
        Caption = 'Si&gla...'
        GroupIndex = 1
        HelpContext = 305
        Hint = 'Edit the document'#39's sigla'
        ShortCut = 0
        OnClick = OptionsSiglaClick
      end
      object OptionsShortcuts: TMenuItem
        Caption = 'Autote&xt...'
        GroupIndex = 1
        ShortCut = 0
        OnClick = OptionsShortcutsClick
      end
      object N2: TMenuItem
        Caption = '-'
        GroupIndex = 1
        ShortCut = 0
      end
      object OptionsImport: TMenuItem
        Caption = '&Import'
        GroupIndex = 1
        ShortCut = 0
        object OptionsImportFormat: TMenuItem
          Caption = '&Format...'
          HelpContext = 305
          Hint = 'Import another document'#39's format'
          ShortCut = 0
          OnClick = OptionsImportFormatClick
        end
        object OptionsImportSigla: TMenuItem
          Caption = '&Sigla...'
          Hint = 'Import another document'#39's sigla'
          ShortCut = 0
          OnClick = OptionsImportSiglaClick
        end
      end
    end
    object MenuWindows: TMenuItem
      Caption = '&Windows'
      GroupIndex = 3
      HelpContext = 306
      Hint = 'Manipulate child windows'
      ShortCut = 0
      object WindowsText: TMenuItem
        Caption = 'Te&xt'
        HelpContext = 306
        Hint = 'Go to text window'
        ShortCut = 16468
        OnClick = WindowsTextClick
      end
      object WindowsNotes: TMenuItem
        Caption = '&Notes'
        HelpContext = 306
        Hint = 'Go to notes window'
        ShortCut = 16462
        OnClick = WindowsNotesClick
      end
      object WindowsApparatus: TMenuItem
        Caption = '&Apparatus'
        HelpContext = 306
        Hint = 'Go to apparatus window'
        ShortCut = 16449
        OnClick = WindowsApparatusClick
      end
      object WindowsHeaderfooter: TMenuItem
        Caption = '&Header && footer'
        HelpContext = 306
        Hint = 'Go to header and footer window'
        ShortCut = 0
        OnClick = WindowsHeaderfooterClick
      end
      object N16: TMenuItem
        Caption = '-'
        HelpContext = 306
        ShortCut = 0
      end
      object WindowsTile: TMenuItem
        Caption = '&Tile'
        HelpContext = 306
        Hint = 'Tile child windows'
        ShortCut = 8309
        OnClick = WindowsTileClick
      end
      object WindowsCascade: TMenuItem
        Caption = '&Cascade'
        HelpContext = 306
        Hint = 'Cascade child windows'
        ShortCut = 0
        OnClick = WindowsCascadeClick
      end
      object WindowsArrangeIcons: TMenuItem
        Caption = 'Arrange &icons'
        HelpContext = 306
        Hint = 'Arrange child icons'
        ShortCut = 0
        OnClick = WindowsArrangeIconsClick
      end
      object WindowsSynchronize: TMenuItem
        Caption = '&Synchronize'
        HelpContext = 306
        Hint = 'Synchronize caret positions'
        ShortCut = 117
        OnClick = MenuPassClick
      end
      object WindowsRefresh: TMenuItem
        Caption = '&Refresh'
        HelpContext = 306
        Hint = 'Refresh document windows'
        ShortCut = 119
        OnClick = WindowsRefreshClick
      end
      object N15: TMenuItem
        Caption = '-'
        HelpContext = 306
        ShortCut = 0
      end
      object WindowsZoom: TMenuItem
        Caption = '&Zoom'
        HelpContext = 306
        Hint = 'Zoom current window'
        ShortCut = 0
        object Zoom50: TMenuItem
          Caption = '&50%'
          HelpContext = 306
          ShortCut = 0
          OnClick = Zoom50Click
        end
        object Zoom100: TMenuItem
          Caption = '&100%'
          HelpContext = 306
          ShortCut = 0
          OnClick = Zoom100Click
        end
        object Zoom150: TMenuItem
          Caption = '15&0%'
          HelpContext = 306
          ShortCut = 0
          OnClick = Zoom150Click
        end
        object Zoom200: TMenuItem
          Caption = '&200%'
          HelpContext = 306
          ShortCut = 0
          OnClick = Zoom200Click
        end
        object ZoomOther: TMenuItem
          Caption = '&Other...'
          HelpContext = 306
          ShortCut = 24666
          OnClick = MenuPassClick
        end
      end
    end
    object MenuObject: TMenuItem
      Caption = 'O&bject'
      Enabled = False
      GroupIndex = 5
      HelpContext = 308
      Hint = 'Insert and edit linked and embedded objects'
      ShortCut = 0
      Visible = False
      object ObjectNew: TMenuItem
        Caption = '&New...'
        HelpContext = 308
        Hint = 'Insert new object'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object ObjectCopy: TMenuItem
        Caption = '&Copy'
        HelpContext = 308
        Hint = 'Copy object to clipboard'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object ObjectPaste: TMenuItem
        Caption = '&Paste...'
        HelpContext = 308
        Hint = 'Paste object from clipboard'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object N21: TMenuItem
        Caption = '-'
        HelpContext = 308
        ShortCut = 0
      end
      object ObjectProperties: TMenuItem
        Caption = 'P&roperties...'
        HelpContext = 308
        Hint = 'Edit object properties'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object ObjectScale: TMenuItem
        Caption = '&Scale...'
        HelpContext = 308
        Hint = 'Resize object'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object N19: TMenuItem
        Caption = '-'
        HelpContext = 308
        ShortCut = 0
      end
      object ObjectDefault: TMenuItem
        Caption = '&Open...'
        HelpContext = 308
        Hint = 'Open object'
        ShortCut = 0
        OnClick = MenuPassClick
      end
      object ObjectEdit: TMenuItem
        Caption = '&Do'
        HelpContext = 308
        Hint = 'Perform object-specific actions'
        ShortCut = 0
        OnClick = MenuPassClick
        object ObjectDo1: TMenuItem
          Caption = '1'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo2: TMenuItem
          Caption = '2'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo3: TMenuItem
          Caption = '3'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo4: TMenuItem
          Caption = '4'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo5: TMenuItem
          Caption = '5'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo6: TMenuItem
          Caption = '6'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo7: TMenuItem
          Caption = '7'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo8: TMenuItem
          Caption = '8'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo9: TMenuItem
          Caption = '9'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
        object ObjectDo0: TMenuItem
          Caption = '0'
          ShortCut = 0
          Visible = False
          OnClick = MenuPassClick
        end
      end
      object N20: TMenuItem
        Caption = '-'
        HelpContext = 308
        ShortCut = 0
      end
      object ObjectUpdate: TMenuItem
        Caption = '&Update'
        HelpContext = 308
        Hint = 'Update object'
        ShortCut = 24696
        OnClick = MenuPassClick
      end
    end
    object MenuHelp: TMenuItem
      Caption = '&Help'
      GroupIndex = 5
      HelpContext = 307
      Hint = 'Display Help'
      ShortCut = 0
      object HelpContext: TMenuItem
        Caption = 'Context'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'Get general help'
        ShortCut = 112
        OnClick = HelpContextClick
      end
      object HelpIndex: TMenuItem
        Caption = '&Index'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'Search for help topic'
        ShortCut = 0
        OnClick = HelpIndexClick
      end
      object HelpKeyboard: TMenuItem
        Caption = '&Keyboard'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'Get help on keyboard shortcuts'
        ShortCut = 0
        OnClick = HelpKeyboardClick
      end
      object HelpToolbar: TMenuItem
        Caption = '&Toolbar'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'Get help on the toolbar'
        ShortCut = 0
        OnClick = HelpToolbarClick
      end
      object HelpMenu: TMenuItem
        Caption = '&Menu'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'Get help on menu commands'
        ShortCut = 0
        OnClick = HelpMenuClick
      end
      object HelpUsingHelp: TMenuItem
        Caption = '&Using help'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'Get help on help'
        ShortCut = 0
        OnClick = HelpUsingHelpClick
      end
      object N23: TMenuItem
        Caption = '-'
        GroupIndex = 5
        ShortCut = 0
      end
      object HelpHomepage: TMenuItem
        Caption = '&Homepage'
        GroupIndex = 5
        Hint =
          'Launches the internet browser to display the Classical Text Edit' +
          'or homepage'
        ShortCut = 0
        OnClick = HelpHomepageClick
      end
      object N17: TMenuItem
        Caption = '-'
        GroupIndex = 5
        HelpContext = 307
        ShortCut = 0
      end
      object HelpAbout: TMenuItem
        Caption = '&About...'
        GroupIndex = 5
        HelpContext = 307
        Hint = 'About the Classical Text Editor'
        ShortCut = 0
        OnClick = HelpAboutClick
      end
    end
  end
  object OpenDialog: TOpenDialog
    HelpContext = 201
    FileEditStyle = fsEdit
    Options = [ofReadOnly, ofHideReadOnly, ofShowHelp, ofPathMustExist, ofFileMustExist, ofNoReadOnlyReturn]
    Left = 58
    Top = 204
  end
  object PrinterSetupDialog: TPrinterSetupDialog
    Left = 150
    Top = 204
  end
  object SaveDialog: TSaveDialog
    FileEditStyle = fsEdit
    Options = [ofOverwritePrompt, ofHideReadOnly, ofShowHelp, ofPathMustExist, ofNoReadOnlyReturn]
    Title = 'Save Document As'
    Left = 86
    Top = 204
  end
  object PrintDialog: TPrintDialog
    HelpContext = 211
    Copies = 1
    FromPage = 1
    MinPage = 1
    MaxPage = 9999
    Options = [poPrintToFile, poPageNums, poSelection, poWarning, poHelp]
    ToPage = 1
    Left = 181
    Top = 204
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 213
    Top = 204
  end
end