object MainForm: TMainForm Left = 244 Top = 141 Width = 629 Height = 454 Caption = '%' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 PopupMenu = PropertiesPopup Position = poDefaultPosOnly ShowHint = True OnActivate = FormActivate OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Header: TPaintBox Left = 0 Top = 26 Width = 621 Height = 22 Align = alTop OnMouseDown = RightClickHandler OnPaint = HeaderPaint end object Bevel: TBevel Left = 0 Top = 0 Width = 621 Height = 2 Align = alTop Shape = bsTopLine end object StatusBar: TPaintBox Left = 0 Top = 387 Width = 621 Height = 21 Align = alBottom OnMouseDown = RightClickHandler OnPaint = StatusBarPaint end object ListBox: TListBox Left = 0 Top = 48 Width = 621 Height = 339 Align = alClient Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 20 MultiSelect = True ParentFont = False PopupMenu = FunctionsPopup Style = lbOwnerDrawFixed TabOrder = 0 OnClick = ListBoxClick OnDblClick = ListBoxDblClick OnDrawItem = ListBoxDrawItem OnKeyDown = ListBoxKeyDown OnKeyPress = ListBoxKeyPress OnMouseDown = RightClickHandler end object MainToolbar: TToolbarControl Left = 0 Top = 2 Width = 621 Height = 24 Align = alTop BevelOuter = bvNone IniFilename = 'BEYOND32.INI' TabOrder = 1 OnMouseDown = RightClickHandler object SelectBtn: TSpeedButton Left = 11 Top = 2 Width = 22 Height = 22 Hint = 'Select Directories' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333 333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300 300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333 333337F373F773333333303330033333333337F3377333333333303333333333 333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333 333337777F337F33333330330BB00333333337F373F773333333303330033333 333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000 333377777F77377733330BBB0333333333337F337F33333333330BB003333333 333373F7733333333333300333333333333337733333333333330000} NumGlyphs = 2 OnClick = SelectBtnClick end object ShowAnyBtn: TSpeedButton Tag = 1 Left = 55 Top = 2 Width = 22 Height = 22 Hint = 'Show Any' GroupIndex = 1 Down = True Glyph.Data = { C6000000424DC60000000000000076000000280000000A0000000A0000000100 0400000000005000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777F7777F700 0000770FF770F70000007800FF00770000007880000777000000778800FFF700 000077000000FF000000700800F007000000887800F877000000777800777700 00007778877777000000} OnClick = ShowAny1Click end object ShowMismatchesBtn: TSpeedButton Tag = 2 Left = 77 Top = 2 Width = 22 Height = 22 Hint = 'Show Mismatches Only' GroupIndex = 1 Glyph.Data = { BE000000424DBE0000000000000076000000280000000F000000090000000100 0400000000004800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077777FF777FF 777077770077700FF770777007778800FF707700777778800FF0700FF7777788 00708800FF777770077078800FF7770077707788007770077770777888778877 7770} OnClick = ShowMismatchesOnly1Click end object ShowMatchesBtn: TSpeedButton Tag = 3 Left = 99 Top = 2 Width = 22 Height = 22 Hint = 'Show Matches Only' GroupIndex = 1 Glyph.Data = { E6000000424DE60000000000000076000000280000000E0000000E0000000100 0400000000000000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77007777777777777700777777777777770077777777777777007777FFFFFFFF 7785777000000007770277888888887777007777FFFFFFFF774F777000000007 77007788888888777700777777777777770077777777777777FF777777777777 77007777777777777700} OnClick = ShowMatchesOnly1Click end object ShowDoublesBtn: TSpeedButton Tag = 4 Left = 121 Top = 2 Width = 22 Height = 22 Hint = 'Show Double Sides Only' GroupIndex = 1 Glyph.Data = { A6000000424DA6000000000000007600000028000000080000000C0000000100 0400000000003000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077FFFFFF7000 000780088877800FF7778800FF7778800FF7778800FF77F8800F700F800F800F 80078800007778888777} OnClick = ShowDoubleSidesOnly1Click end object ShowSinglesBtn: TSpeedButton Tag = 5 Left = 143 Top = 2 Width = 22 Height = 22 Hint = 'Show Single Sides Only' GroupIndex = 1 Glyph.Data = { A6000000424DA6000000000000007600000028000000060000000C0000000100 0400000000003000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007777FF007770 0F0077800F0077800F0077800F0077800F0077800F0077800F0077800F007000 0F008880070077887700} OnClick = ShowSingleSidesOnly1Click end object RefreshBtn: TSpeedButton Tag = 6 Left = 432 Top = 2 Width = 22 Height = 22 Hint = 'Refresh' Glyph.Data = { E6000000424DE60000000000000076000000280000000E0000000E0000000100 0400000000000000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777888777 770077778000088777007780000000087700770007FFF0008700770077777F00 87C67007777777F008C6F007777777F008C6F007777787F008C6F008777F08F0 07C67F00877F080077C67F00777F000087C677F7777F000877C67777777F0000 08C67777777FFFFFF7C6} Visible = False OnClick = RefreshBtnClick end object CopyRightBtn: TSpeedButton Tag = 9 Left = 231 Top = 2 Width = 22 Height = 22 Hint = 'Copy To Right' Glyph.Data = { 50010000424D500100000000000076000000280000001E0000000C0000000100 040000000000C000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777778877 777777777778877777007777777F00877777777777F7787777007777777F0008 7777777777F77787770078888887000087778888887777787700F00000000000 087F7777777777778700F00000000000008F7777777777777800F00000000000 007F7777777777777700F00000000000077F7777777777777700FFFFFFFF0000 777FFFFFFFF7777777007777777F00077777777777F7777777007777777F0077 7777777777F7777777007777777FF7777777777777FF77777700000000000000 0000000000000000000000000000000000000000} Layout = blGlyphRight NumGlyphs = 2 OnClick = CopyRightBtnClick end object CopyLeftBtn: TSpeedButton Tag = 10 Left = 253 Top = 2 Width = 22 Height = 22 Hint = 'Copy To Left' Glyph.Data = { 50010000424D500100000000000076000000280000001E0000000C0000000100 040000000000C000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777887777 7777777778877777770077777008777777777777778777777700777700087777 7777777777877777770077700008888888877777778888888800770000000000 0087777777777777780070000000000000877777777777777800F00000000000 008F7777777777777800FF0000000000008F77777777777778007FF00007FFFF FF77FF77777FFFFFF70077FF0008777777777FF7778777777700777FF0087777 777777FF7787777777007777FFF777777777777FFF7777777700000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = CopyLeftBtnClick end object DeleteBtn: TSpeedButton Tag = 11 Left = 297 Top = 2 Width = 22 Height = 22 Hint = 'Delete' Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777770000000777777777777777770000000777777777777770F700000007777 0F777777777770000000777000F7777770F770000000777000F777770F777000 00007777000F77700F777000000077777000F700F7777000000077777700000F 7777700000007777777000F777777000000077777700000F7777700000007777 7000F70F7777700000007770000F77700F7770000000770000F7777700F77000 00007700F7777777700F70000000777777777777777770000000777777777777 777770000000} OnClick = DeleteBtnClick end object CloseBtn: TSpeedButton Tag = 12 Left = 480 Top = 2 Width = 22 Height = 22 Hint = 'Exit Program' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301111111110333337F333333337F33330111111111 0333337F333333337F333301111111110333337F333333337F33330111111111 0333337F333333337F333301111111110333337F333333337F33330111111111 0333337F3333333F7F333301111111B10333337F333333737F33330111111111 0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11 0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11 0333337F377777337F333301111111110333337F333333337F33330111111111 0333337FFFFFFFFF7F33330000000000033333777777777773330000} NumGlyphs = 2 Visible = False OnClick = CloseBtnClick end object HelpBtn: TSpeedButton Left = 456 Top = 2 Width = 22 Height = 22 Hint = 'Help' Glyph.Data = { 06010000424D060100000000000076000000280000000C000000120000000100 0400000000009000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777766777777 00007776446777770000777E6647777701007777E66777770000777777777777 000077774467777700007776664777770000777E664777770000777E66647777 62007777E6664777010077777E6664770000744777E6664700006664777E6647 0000E6664446664700A07E6666666667620077EE6666667700007777EEEEE777 00007777777777776200} Visible = False OnClick = Contents1Click end object QuickCompareBtn: TSpeedButton Tag = 8 Left = 209 Top = 2 Width = 22 Height = 22 Hint = 'Quick Compare' Glyph.Data = { D6000000424DD6000000000000007600000028000000100000000C0000000100 0400000000006000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 FF777777777777700777777777777778FF7777FFFFFFF7700F77700000007770 0F778888888777700FF777FFFFFFF77800FF7000000077F8800F8888888770FF 800F77777777800F800777777777880000777777777778888777} OnClick = PopupQuickCompareClick end object SetPropertiesBtn: TSpeedButton Tag = 6 Left = 408 Top = 2 Width = 22 Height = 22 Hint = 'Properties' Glyph.Data = { F6000000424DF60000000000000076000000280000000E000000100000000100 0400000000008000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00778888888888 7700700000000008775F70FFFFFFFF08770070FFFF00FF08770070FFF0000F08 770070FF80000F08770070F800000008770070F000F0000877F070F00FFF0008 770070FFFFF00008770070FFFFF0F000770070FFFFF007008700700000007780 07A0777777777770080077777777777700F07777777777777000} Visible = False OnClick = SetPropertiesBtnClick end object SelectAllBtn: TSpeedButton Left = 187 Top = 2 Width = 22 Height = 22 Hint = 'Select All' Glyph.Data = { FE000000424DFE0000000000000076000000280000000C000000110000000100 0400000000008800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077770F777777 7FFF777000F77777FFFF770000F77777FFFF7000F00F7777FFFF000F7700F777 FFFF70F77770F777FFEF777777770F77FFFF77770F7770F77FFF777000F7770F FFFF770000F77770FFFF7000F00F7777FFFF000F7700F777FFFF70F77770F777 FFEF777777770F77FFFF7777777770F77FFF77777777770FFFFF777777777770 FFFF} OnClick = SelectAllClick end object PrintBtn: TSpeedButton Tag = 6 Left = 384 Top = 2 Width = 22 Height = 22 Hint = 'Report' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF77333333333000000333333333377777733333330000} NumGlyphs = 2 Visible = False OnClick = PrintBtnClick end object SelectNewerBtn: TSpeedButton Left = 360 Top = 2 Width = 22 Height = 22 Hint = 'Select Newer' Glyph.Data = { FE000000424DFE0000000000000076000000280000000C000000110000000100 0400000000008800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077771F777777 7FFF777111F77777FFFF771111F77777FFFF7111F11F7777FFFF111F7711F777 FFFF71F77771F777FFEF777777771F77FFFF77771F7771F77FFF777111F7771F FFFF771111F77771FFFF7111F11F7777FFFF111F7711F777FFFF71F77771F777 FFEF777777771F77FFFF7777777771F77FFF77777777771FFFFF777777777771 FFFF} Visible = False OnClick = SelectNewerBtnClick end end object FunctionsPopup: TPopupMenu AutoPopup = False Left = 48 Top = 96 object PopupCopyRight: TMenuItem Caption = 'Copy -->' ShortCut = 0 OnClick = CopyRightBtnClick end object PopupCopyLeft: TMenuItem Caption = '<-- Copy' ShortCut = 0 OnClick = CopyLeftBtnClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object PopupDelete: TMenuItem Caption = 'Delete...' ShortCut = 0 OnClick = DeleteBtnClick end object PopupQuickCompare: TMenuItem Caption = '&Quick Compare' ShortCut = 0 OnClick = PopupQuickCompareClick end object PopupLink: TMenuItem Caption = 'Link' ShortCut = 0 OnClick = PopupLinkClick end end object PropertiesPopup: TPopupMenu AutoPopup = False Left = 80 Top = 96 object Properties2: TMenuItem Caption = '&Properties...' ShortCut = 0 OnClick = SetPropertiesBtnClick end end object MainMenu1: TMainMenu Left = 16 Top = 96 object File1: TMenuItem Caption = '&File' ShortCut = 0 object Open1: TMenuItem Caption = '&Open in Viewer' ShortCut = 0 OnClick = ListBoxDblClick end object SelectAll1: TMenuItem Caption = '&Select All' ShortCut = 0 OnClick = SelectAllClick end object SelectNewer1: TMenuItem Caption = 'Select &Newer' ShortCut = 0 OnClick = SelectNewerBtnClick end object QuickCompare1: TMenuItem Caption = '&Quick Compare' ShortCut = 0 OnClick = PopupQuickCompareClick end object Copy1: TMenuItem Caption = 'Copy -->' ShortCut = 0 OnClick = CopyRightBtnClick end object Copy2: TMenuItem Caption = '<-- Copy' ShortCut = 0 OnClick = CopyLeftBtnClick end object Delete1: TMenuItem Caption = 'Delete...' ShortCut = 0 OnClick = DeleteBtnClick end object N3: TMenuItem Caption = '-' ShortCut = 0 end object SelectDirectories1: TMenuItem Caption = '&Directories...' ShortCut = 0 OnClick = SelectBtnClick end object Refresh1: TMenuItem Caption = '&Refresh' ShortCut = 116 OnClick = RefreshBtnClick end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = 'E&xit' ShortCut = 27 OnClick = CloseBtnClick end end object Display1: TMenuItem Caption = '&Display' ShortCut = 0 object ShowAny1: TMenuItem Caption = 'Show Any' ShortCut = 0 OnClick = ShowAny1Click end object ShowMismatchesOnly1: TMenuItem Caption = 'Show Mismatches Only' ShortCut = 0 OnClick = ShowMismatchesOnly1Click end object ShowMatchesOnly1: TMenuItem Caption = 'Show Matches Only' ShortCut = 0 OnClick = ShowMatchesOnly1Click end object ShowDoubleSidesOnly1: TMenuItem Caption = 'Show Double Sides Only' ShortCut = 0 OnClick = ShowDoubleSidesOnly1Click end object ShowSingleSidesOnly1: TMenuItem Caption = 'Show Single Sides Only' ShortCut = 0 OnClick = ShowSingleSidesOnly1Click end object N6: TMenuItem Caption = '-' ShortCut = 0 end object Report1: TMenuItem Caption = '&Report...' ShortCut = 0 OnClick = PrintBtnClick end object Properties1: TMenuItem Caption = '&Properties...' ShortCut = 0 OnClick = SetPropertiesBtnClick end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object Contents1: TMenuItem Caption = '&Contents' ShortCut = 0 OnClick = Contents1Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object Register1: TMenuItem Caption = '&Register...' ShortCut = 0 OnClick = Register1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object About1: TMenuItem Caption = '&About...' ShortCut = 0 OnClick = About1Click end end end object SSReport: TSSReport LogoAlignment = taLeftJustify LogoOffset = 0 LogoShrink = 0 Orientation = poPortrait OnHeading = SSReportHeading Left = 112 Top = 96 FontList = ( 'Arial' 'S' 10 '' 0 0 'Arial' 'S' 10 'Bold' 0 0 'Arial' 'S' 6 '' 0 0) end end