object ViewerForm: TViewerForm Left = 232 Top = 223 Width = 640 Height = 481 Caption = 'File Viewer' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu Position = poDefaultPosOnly ShowHint = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Header: TPaintBox Left = 0 Top = 26 Width = 632 Height = 22 Align = alTop OnPaint = HeaderPaint end object Bevel: TBevel Left = 0 Top = 0 Width = 632 Height = 2 Align = alTop Shape = bsTopLine end object StatusBar: TPanel Left = 0 Top = 417 Width = 632 Height = 18 Align = alBottom BevelOuter = bvNone TabOrder = 2 object ScrollBar: TScrollBar Left = 496 Top = 0 Width = 129 Height = 17 LargeChange = 8 TabOrder = 0 TabStop = False OnScroll = ScrollBarScroll end object LineNum1: TPanel Left = 0 Top = 1 Width = 65 Height = 17 Alignment = taLeftJustify BevelInner = bvLowered BevelOuter = bvNone TabOrder = 1 end object LineNum2: TPanel Left = 320 Top = 1 Width = 65 Height = 17 Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 2 end object Info1: TPanel Left = 66 Top = 1 Width = 247 Height = 17 Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 3 end object Info2: TPanel Left = 386 Top = 1 Width = 100 Height = 17 Alignment = taLeftJustify BevelOuter = bvLowered TabOrder = 4 end end object ListBox: TListBox Left = 0 Top = 48 Width = 632 Height = 369 Align = alClient Ctl3D = True Font.Color = clBlack Font.Height = -12 Font.Name = 'Courier New' Font.Style = [] ItemHeight = 16 MultiSelect = True ParentCtl3D = False ParentFont = False Style = lbOwnerDrawFixed TabOrder = 1 OnClick = ListBoxClick OnDblClick = ListBoxDblClick OnDrawItem = ListBoxDrawItem OnKeyDown = ListBoxKeyDown OnKeyPress = ListBoxKeyPress OnMouseDown = ListBoxMouseDown end object ViewerToolbar: TToolbarControl Left = 0 Top = 2 Width = 632 Height = 24 Align = alTop BevelOuter = bvNone IniFilename = 'BEYOND32.INI' PopupMenu = ToolbarPopup TabOrder = 0 object NextBtn: TSpeedButton Left = 11 Top = 2 Width = 22 Height = 22 Hint = 'Find next difference' Glyph.Data = { EE000000424DEE0000000000000076000000280000000C0000000F0000000100 0400000000007800000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777778F77777 00007777800F7777000077780000F7770000778000000F7700007800000000F7 000080000000000F000088888008888800007777800F777700007777800F7777 00007777800F777700007777800F777700007777800F777700007777800F7777 00007777800F7777000077777FFF77770000} OnClick = NextBtnClick end object PrevBtn: TSpeedButton Left = 33 Top = 2 Width = 22 Height = 22 Hint = 'Find previous difference' Glyph.Data = { EE000000424DEE0000000000000076000000280000000C0000000F0000000100 0400000000007800000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777788887777 00007777800F777700007777800F777700007777800F777700007777800F7777 00007777800F777700007777800F777700007777800F777700008FFF800FFFFF 000080000000000F00007800000000F70000778000000F77000077780000F777 00007777800F777700007777787777770000} OnClick = PrevBtnClick end object CloseBtn: TSpeedButton Tag = 12 Left = 456 Top = 2 Width = 22 Height = 22 Hint = 'Close viewer' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301111111110333337F333333337F33330111111111 0333337F333333337F333301111111110333337F333333337F33330111111111 0333337F333333337F333301111111110333337F333333337F33330111111111 0333337F3333333F7F333301111111B10333337F333333737F33330111111111 0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11 0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11 0333337F377777337F333301111111110333337F333333337F33330111111111 0333337FFFFFFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 Visible = False OnClick = CloseBtnClick end object JustChangesBtn: TSpeedButton Left = 77 Top = 2 Width = 22 Height = 22 Hint = 'Just differences' AllowAllUp = True GroupIndex = 1 Glyph.Data = { BE000000424DBE0000000000000076000000280000000F000000090000000100 0400000000004800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077777FF777FF 777077770077700FF770777007778800FF707700777778800FF0700FF7777788 00708800FF777770077078800FF7770077707788007770077770777888778877 7770} OnClick = JustChangesBtnClick end object ShiftRightBtn: TSpeedButton Left = 432 Top = 2 Width = 22 Height = 22 Hint = 'Scroll to right' Glyph.Data = { DE000000424DDE000000000000007600000028000000100000000D0000000100 04000000000068000000120B0000120B00001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555500555555555555550300555555555555033300 5555000000033333005503333333333333000000000333330055555555033300 5555555555030055555555555500555555555555555555555555555555555555 5555} Layout = blGlyphRight Visible = False OnClick = ShiftRightBtnClick end object ShiftLeftBtn: TSpeedButton Left = 408 Top = 2 Width = 22 Height = 22 Hint = 'Scroll to left' Glyph.Data = { DE000000424DDE000000000000007600000028000000100000000D0000000100 04000000000068000000120B0000120B00001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555005555555555550030555555555500333055 5555550033333000000000333333333333305500333330000000555500333055 5555555555003055555555555555005555555555555555555555555555555555 5555} Layout = blGlyphRight Visible = False OnClick = ShiftLeftBtnClick end object SetPropertiesBtn: TSpeedButton Tag = 6 Left = 384 Top = 2 Width = 22 Height = 22 Hint = 'Options' Glyph.Data = { 06010000424D060100000000000076000000280000000F000000120000000100 0400000000009000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888F000000000000000F088888888888880F088808888888880F088000888888 880F080080088888880F088888008888880F088888800888880F088808888888 880F088000888888880F080080088888880F088888008888880F088888800888 880F088888888888880F000000000000000F080333333333080F000000000000 000F888888888888888F} Visible = False OnClick = SetPropertiesBtnClick end object Bevel1: TBevel Left = 216 Top = 24 Width = 50 Height = 50 end object FindBtn: TSpeedButton Left = 121 Top = 2 Width = 22 Height = 22 Hint = 'Find text' Glyph.Data = { 12010000424D12010000000000007600000028000000110000000D0000000100 0400000000009C00000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700000777770 00007000000070F000777770F0007000000070F000777770F000700000007000 00007000000070000000700F000000F0000070000000700F000700F000007000 0000700F000700F00000700000007700000000000007700000007770F00070F0 0077700000007770000070000077700000007777000777000777700000007777 0F07770F077770000000777700077700077770000000} OnClick = FindBtnClick end object FindAgainBtn: TSpeedButton Left = 143 Top = 2 Width = 22 Height = 22 Hint = 'Find text again' Glyph.Data = { EE000000424DEE0000000000000076000000280000000F0000000F0000000100 0400000000007800000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00700007770000 777F70F007770F00777F70F007770F00777F700000000000777F70F00080F000 777F70F00000F000777F770008780007777F777007770077777F777007770077 777F777778477777777F777784777744447F777747777774447F777747777774 447F777784777847747F777778444477777F} OnClick = FindDialogFind end object SaveBtn: TSpeedButton Left = 253 Top = 2 Width = 22 Height = 22 Hint = 'Save changes' Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555550080000000800550330888887703055033088888770305503308888877 0305503300000000030550333333333333055030000000003305503077777777 0305503077777777030550307777777703055030777777770305503077777777 0005503077777777070550000000000000055555555555555555} OnClick = SaveBtnClick end object RefreshBtn: TSpeedButton Left = 231 Top = 2 Width = 22 Height = 22 Hint = 'Reload files' Glyph.Data = { E6000000424DE60000000000000076000000280000000E0000000E0000000100 0400000000000000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777888777 770077778000088777007780000000087700770007FFF0008700770077777F00 87C67007777777F008C6F007777777F008C6F007777787F008C6F008777F08F0 07C67F00877F080077C67F00777F000087C677F7777F000877C67777777F0000 08C67777777FFFFFF7C6} OnClick = RefreshBtnClick end object GoToBtn: TSpeedButton Left = 165 Top = 2 Width = 22 Height = 22 Hint = 'Go to line number' Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555500555555555555503305555555555550330555 5005555555030555033055500550555503305503305555555030503333055500 5505033330555033055503330555033305550333055033330555033055033330 5555500555033330555555555503330555555555555000555555} OnClick = GoToBtnClick end object ReportBtn: TSpeedButton Left = 209 Top = 2 Width = 22 Height = 22 Hint = 'Produce differences report' Glyph.Data = { 36010000424D3601000000000000760000002800000012000000100000000100 040000000000C000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888000000000 0000880000008880F8F8F8F8F8F08800000088808F8F8F8F8F80880000008880 F008F800F8F0880000008887008F87700F80880100F0888008F8F87700F08801 004088007F8F8F87700088000000877008F8F8F800F0880000008877008F8F80 0F80880C000088877008F800F8F0880000008880777F877F8F80880000008880 F8F8F8F000008800000088808F8F8F808F80880000008880F8F8F8F0F8088800 000088808F8F8F80808888F01A01888000000000088888FFFFFF} OnClick = ReportBtnClick end end object FunctionsPopup: TPopupMenu AutoPopup = False Left = 48 Top = 96 object PopupLink: TMenuItem Caption = 'Link' ShortCut = 0 OnClick = PopupLinkClick end object NextDifference2: TMenuItem Caption = '&Next Difference' ShortCut = 0 OnClick = NextBtnClick end object PreviousDifference2: TMenuItem Caption = '&Previous Difference' ShortCut = 0 OnClick = PrevBtnClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object PopupCopyRight: TMenuItem Caption = 'Copy &Right -->' ShortCut = 0 OnClick = PopupCopyRightClick end object PopupCopyLeft: TMenuItem Caption = '<-- Copy &Left' ShortCut = 0 OnClick = PopupCopyLeftClick end object PopupDeleteLeft: TMenuItem Caption = 'Delete Left' ShortCut = 0 OnClick = PopupDeleteLeftClick end object PopupDeleteRight: TMenuItem Caption = 'Delete Right' ShortCut = 0 OnClick = PopupDeleteRightClick end object PopupUndoEdit: TMenuItem Caption = '&Undo Edit' ShortCut = 0 OnClick = PopupUndoEditClick end object OpenWith2: TMenuItem Caption = 'Open &With' ShortCut = 0 end end object ToolbarPopup: TPopupMenu Left = 80 Top = 96 object ConfigureToolbar1: TMenuItem Caption = 'Configure Toolbar...' ShortCut = 0 OnClick = ConfigureToolbar1Click end end object MainMenu: TMainMenu Left = 16 Top = 96 object File1: TMenuItem Caption = '&File' ShortCut = 0 object OpenWith1: TMenuItem Caption = 'Open &With' ShortCut = 0 end object Save1: TMenuItem Caption = '&Save...' ShortCut = 16467 OnClick = SaveBtnClick end object SaveAs1: TMenuItem Caption = 'Save &As...' ShortCut = 0 OnClick = SaveBtnClick end object N7: TMenuItem Caption = '-' ShortCut = 0 end object MakeBackups: TMenuItem Caption = '&Backup Before Save' ShortCut = 0 OnClick = MakeBackupsClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Report1: TMenuItem Caption = 'Differences &Report' ShortCut = 0 OnClick = ReportBtnClick end object N8: TMenuItem Caption = '-' ShortCut = 0 end object Close1: TMenuItem Caption = '&Close' ShortCut = 0 OnClick = CloseBtnClick end end object Find1: TMenuItem Caption = '&Search' ShortCut = 0 object NextDifference1: TMenuItem Caption = '&Next Difference' ShortCut = 16462 OnClick = NextBtnClick end object Previousdifference1: TMenuItem Caption = '&Previous Difference' ShortCut = 16464 OnClick = PrevBtnClick end object GoToLine1: TMenuItem Caption = '&Go To Line...' ShortCut = 16455 OnClick = GoToBtnClick end object N6: TMenuItem Caption = '-' ShortCut = 0 end object Find2: TMenuItem Caption = '&Find...' ShortCut = 16454 OnClick = FindBtnClick end object FindAgain1: TMenuItem Caption = 'Find &Again' ShortCut = 114 OnClick = FindDialogFind end end object View1: TMenuItem Caption = '&View' ShortCut = 0 object ShowToolbar: TMenuItem Caption = '&Toolbar' Checked = True ShortCut = 0 OnClick = ShowToolbarClick end object ShowStatusbar: TMenuItem Caption = '&Statusbar' Checked = True ShortCut = 0 OnClick = ShowStatusbarClick end object N4: TMenuItem Caption = '-' ShortCut = 0 end object JustDifferences: TMenuItem Caption = 'Just &Differences' ShortCut = 0 OnClick = JustDifferencesClick end object ScrollRight1: TMenuItem Caption = 'Scroll &Right' ShortCut = 0 OnClick = ShiftRightBtnClick end object ScrollLeft1: TMenuItem Caption = 'Scroll &Left' ShortCut = 0 OnClick = ShiftLeftBtnClick end object Refresh1: TMenuItem Caption = 'Refresh' ShortCut = 116 OnClick = RefreshBtnClick end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Properties2: TMenuItem Caption = '&Options' ShortCut = 0 object FileViewerOptions1: TMenuItem Caption = '&File Viewer Options...' ShortCut = 0 OnClick = SetPropertiesBtnClick end object ConfigureToolbar2: TMenuItem Caption = 'Configure &Toolbar...' ShortCut = 0 OnClick = ConfigureToolbar1Click end end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object Contents1: TMenuItem Caption = '&Help Topics' ShortCut = 0 OnClick = Contents1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object About1: TMenuItem Caption = '&About' ShortCut = 0 OnClick = About1Click end end end object FindDialog: TFindDialog Options = [frDown, frFindNext, frHideWholeWord, frHideUpDown] OnFind = FindDialogFind Left = 112 Top = 96 end object SaveDialog: TSaveDialog FileEditStyle = fsEdit Options = [ofOverwritePrompt, ofHideReadOnly] Left = 144 Top = 96 end end