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