object Main: TMain Left = 200 Top = 173 HelpContext = 1 AutoScroll = False Caption = 'Chgname 2.0' ClientHeight = 434 ClientWidth = 527 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Menu = MainMenu1 Position = poDefaultPosOnly Visible = True OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object ListBox1: TListBox Left = 0 Top = 45 Width = 527 Height = 370 Columns = 2 ItemHeight = 13 MultiSelect = True ParentShowHint = False PopupMenu = PopupMenu1 ShowHint = False TabOrder = 0 OnClick = ListBox1Click OnKeyDown = ListBox1KeyDown end object Panel1: TPanel Left = 0 Top = 0 Width = 528 Height = 45 BevelOuter = bvLowered BevelWidth = 2 TabOrder = 1 object SpeedButton1: TSpeedButton Left = 2 Top = 2 Width = 41 Height = 41 Hint = 'Start' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777771777777 7777700088887777777733383717777777700999088887777777777F83717777 700999991088887777773337F8371770099999991108888777777783F3871009 9999999911108888777777787F8719999999999911110888877777737F771999 9999999911110888877777778F8710099999999911110888777777073F871770 0999999911110877777777073F371FF770999999111107777777770773F8718F F7099999111107777777770783737718F709999911110777777770F7F37F8718 8F70999911110777777770F7737F83818F7099991111077777770F087F37F813 8F7099991111077777770F0887F383318F7009991111077007770F0088331133 8F7009991111070800770F0008833318F70809991111008708070F0000888338 F7080999111108707F800F000008888F708809911111070707F070F00000880F 7088099111110077707070F0000000FF077099F1111107777707770FF0000F00 8F7099F111107777777777000FFFF087F0099F11111077777777777070000800 0999F11111107777777777770999999999FF9911110777777777777770F99999 FF9999911107777777777777770FFFFF99F99999107777777777777777701199 999F99990777777777777777777701119999F900777777777777777777777001 1999007777777777777777777777777000007777777777777777} ParentShowHint = False ShowHint = True OnClick = RenameFilesClick end object SpeedButton2: TSpeedButton Left = 51 Top = 2 Width = 41 Height = 41 Hint = 'Add' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777000777777777777777777777777777008B00777777777777777777 777777008B730087777777777777777777770037BFB800887777777777777777 770037B7FB73808887777777777777770037BFB7B7B880088877777777777700 3FB7BFBFB7B88008888777777777003FB7BFBFB7BFB870088888777777003FB7 BFBFB7B7BFB8B0088887777770B7B7BFBFB7BFBFB738B0088777777770BFB7BF B7BFBFB7B737B8087777777770BFB7BFBFB7BFB7B78FB8307777777707BFB7BF BBFB7BFBFB8BB830777777770BFBFBBBFB7BFBFB7B8BB810777777770BFB7B7B FB7BFB7BFB8BB718077777707BFBFBFBFB7BFB7BFB87778807777770FBFBFBF7 BFBFB7BBB7777F0807777770FFBFBF7BF7BFB77BF8777708807777CCFFBFFBFB FBFBFFBFB8F7F78880777CCCCFBFFBFBFBBF7B73877FFF888077CCCCCCBFFFCC CCCCCCC77FFFFF888077CCCCCCCFFBCCCCCCCCCFFFFFFF883807CCCCCCCCFFBC CCCCCCCFFFFFFF88370770CCCCCCC387CCCCCCCFFFFF8883780770FCCCCCCC7C CCCCCCCFF788B8737B0770FFCCCCCCCCCCCCCCC888B7373770770800FCCCCCCC CCCFCCC377B37B737077007777CCCCCCCC788CC300377B8007777777770CCCCC C887B8007700000777777777770FCCC073780077777777777777777777080070 8300777777777777777777777700777000777777777777777777} ParentShowHint = False ShowHint = True OnClick = OpenFilesClick end object SpeedButton3: TSpeedButton Left = 92 Top = 2 Width = 41 Height = 41 Hint = 'Dispose' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777000777777777777777777777777777008B00777777777777777777 777777008B730087777777777777777777770037BFB800887777777777777777 770037B7FB73808887777777777777770037BFB7B7B880088877777777777700 3FB7BFBFB7B88008888777777777003FB7BFBFB7BFB870088888777777003FB7 BFBFB7B7BFB8B0088887777770B7B7BFBFB7BFBFB738B0088777777770BFB7BF B7BFBFB7B737B8087777777770BFB7BFBFB7BFB7B78FB8307777777707BFB7BF BBFB7BFBFB8BB830777777770BFBFBBBFB7BFBFB7B8BB810777777770BFB7B7B FB7BFB7BFB8BB7180777999999999BFBFB7BFB7BFB8777880777999999999BF7 BFBFB7BBB7777F08077799999999BF7BF7BFB77BF877770880779999999FFBFB FBFBFFBFB8F7F78880779999999FFBFBFBBF7B73877FFF88807799999999FFFB FFBF88877FFFFF888077999999999BFFB799777FFFFFFF883807999F999999B8 89999FFFFFFFFF88370799FFF999999999999FFFFFFF8883780770FFBF999999 999999FFF788B8737B0770FF0009999999999FF888B7373770770800F70F9999 9999F88377B37B7370770077770FF99999988B7300377B8007777777770FFF99 9987B8007700000777777777770FF70073780077777777777777777777080070 8300777777777777777777777700777000777777777777777777} ParentShowHint = False ShowHint = True OnClick = RemoveItemsClick end object SpeedButton4: TSpeedButton Left = 133 Top = 2 Width = 41 Height = 41 Hint = 'Select all' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF999999999FFFFFFFFFFFFFFFFFFFFF9999 999999999FFFFFFFFFFFFFFFFF9999FFFFFFFFF9999FFFFFFFFFFFFF9999FFFF FFFFFFFFF9999FFFFFFF99F999FFFFFFFFFFFFFFFFF9999FFFFF99999FFFFFFF 99999FFFFFFFF99FFFFF9999FFFFFF999999999FFFFFFF99FFFF99999FFF9999 FFFFF9999FFFFF99FFFF99999F9999FFFFFFFFF9999FFFF99FFFFFFFFF99FFFF FFFFFFFFF99FFFF99FFFFFFFF99FFFFF9999FFFFFF99FFFF99FFFFFFF99FFF99 999999FFFF99FFFF99FFFFFF99FFFF99FFFF9999FFF99FFFF99FFFFF99FFF99F FFFFFF99FFF99FFFF99FFFF99FFFF99FFF999FF99FFF99FFF99FFFF99FFF99FF FF999FF99FFF99FFF99FFFF99FFF99FFF99FFFF99FFF99FFF99FFFF99FFF99FF F99FFFF99FFF99FFF99FFFF99FFF99FFF99FFF99FFF99FFFF99FFFF99FFFF99F FF999999FFF99FFF99FFFFFF99FFF99FFF9999FFFF99FFFF99FFFFFF99FFFF99 FFFFFFFF9999FFF99FFFFFFFF99FFF9999FFFF9999FFFFF99FFFFFFFF99FFFFF 99999999FFFFFF99FFFFFFFFFF99FFFFFF9999FFFFFFFF99FFFFFFFFFFF99FFF FFFFFFFFFFFFF99FFFFFFFFFFFF9999FFFFFFFFFFFF9999FFFFFFFFFFFFFF999 9FFFFFFFF9999FFFFFFFFFFFFFFFFFF999999999999FFFFFFFFFFFFFFFFFFFFF F99999999FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} ParentShowHint = False ShowHint = True OnClick = SelectAllClick end object SpeedButton5: TSpeedButton Left = 174 Top = 2 Width = 41 Height = 41 Hint = 'Dispose all' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777700000 0000000000000777777777777708777777778888888880777777777777087FF7 7777777888888077777777777708777778777887888880777777777770877777 7877788878088807777777777087777778777888780888077777777770877777 7877788877808807777777770877777787777788878088807777777708777777 8777778887708880777777708777777877777778887808880777777087777FF8 77F77778887808880777777087777FF877FF7778887808880777777087777FF8 77FFF778887808880777777087777FF877FFFF78887808880777777087777FF8 77FFFF78887808880777777087777FF877FFFF78887808880777777087777FF8 77FFFF78887808880777777087777FF877FFFF78887808880777777087777FF8 77FFFF78887808880777777087777FF877FFFF788878088807777777087777FF 877FF78887808880777777770877777F8777778887808880777777777087777F F877788878088807777777777087777FF877788878088807777777777708777F F7877787788880777777777777087FFFF7777777788880777777777777087777 7777777788888077777777777000000000000000000000077777777770888777 F777788888888807777777777700000000000000000000777777777777777777 0877788077777777777777777777777770000007777777777777} ParentShowHint = False ShowHint = True OnClick = RemoveAllClick end object SpeedButton6: TSpeedButton Left = 223 Top = 2 Width = 41 Height = 41 Hint = 'Move up' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777000000000007777777777777777777704 4444444444077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777000000000FCCCCCCCCC40000000077770444444444 CCCCCCCCC444444440777770FCCCCCCCCCCCCCCCCCCCCC44077777770FCCCCCC CCCCCCCCCCCCC4407777777770FCCCCCCCCCCCCCCCCC440777777777770FCCCC CCCCCCCCCCC44077777777777770FCCCCCCCCCCCCC4407777777777777770FCC CCCCCCCCC440777777777777777770FCCCCCCCCC44077777777777777777770F CCCCCCC4407777777777777777777770FCCCCC44077777777777777777777777 0FCCC44077777777777777777777777770FC4407777777777777777777777777 770F407777777777777777777777777777700777777777777777777777777777 7777777777777777777777777777777777777777777777777777} ParentShowHint = False ShowHint = True OnClick = SpeedButton6Click end object SpeedButton7: TSpeedButton Left = 264 Top = 2 Width = 41 Height = 41 Hint = 'Move down' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777700777777777777777777777777777 7704407777777777777777777777777770444407777777777777777777777777 044CC44077777777777777777777777044CCCC44077777777777777777777704 4CCCCCC4407777777777777777777044CCCCCCCC44077777777777777777044C CCCCCCCCC440777777777777777044CCCCCCCCCCCC4407777777777777044CCC CCCCCCCCCCC44077777777777044CCCCCCCCCCCCCCCC440777777777044CCCCC CCCCCCCCCCCCC4407777777044CCCCCCCCCCCCCCCCCCCC4407777704FFFFFFFF CCCCCCCCC4FFFFFF407777000000000FCCCCCCCCC4000000007777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F CCCCCCCCC4077777777777777777770FCCCCCCCCC4077777777777777777770F FFFFFFFFF4077777777777777777777000000000007777777777777777777777 7777777777777777777777777777777777777777777777777777} ParentShowHint = False ShowHint = True OnClick = SpeedButton7Click end object SpeedButton8: TSpeedButton Left = 313 Top = 2 Width = 41 Height = 41 Hint = 'Name' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777771111777777777777777777777777771999991777777777777777 7777777779999779777777777777777777777777999977777777777777777777 7777777999977777777777777777777777777799997777777777711111777777 7777799999777777777799999911777777777999917777777777779999991777 7777999991777777777777777779917777779999991777777777777777779917 7777999999177777777777777777991777799991991777777777777777777991 7779999199177777777777777777799177799991991777777777777777777991 7779991799917777777777777777799917999917799177777777777717777799 1799991779917777777777799117779917999177799177777777777999917799 1799917779991777777777999917779919999177799917777777779999177779 9999917777991777777777799917777999991777779917777777777999177779 9999177777991777777777799917777999991777779991777777777799177779 9991777777799177777777777991111199917777777991777777777777999999 9991777777799177777777777779999999977777777799177777777777777777 7777777777779917777777777777777777777777777779917777777777777777 7777777777777799177777777777777777777777777777797777} ParentShowHint = False ShowHint = True OnClick = SpeedButton8Click end object SpeedButton9: TSpeedButton Left = 354 Top = 2 Width = 41 Height = 41 Hint = 'Date' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777711111111 1111117777777777777777799999999999999911777777777777777799999917 7777799917777777777777777777999177777779911777777777777777777999 1777777799917777777777777777799991777777799917777777777777777799 9177777777999177777777777777779999177777779999177777777777777799 9917777777799917777777771177777999177777777999917777777999177779 9991777777799991777777799991777999917777777799991777777999917779 9991777777779999177777799991777799997777777799991777777999917777 9999177777779999177777779991777799991777777799991777777799991777 9999177777779999177777777999177779991777777999997777777777999177 7999917777799997777777777779991119999177779999977777777777777999 9999911199999777777777777777777799999999999777777777777777777777 7777997777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777} ParentShowHint = False ShowHint = True OnClick = SpeedButton9Click end object SpeedButton10: TSpeedButton Left = 395 Top = 2 Width = 41 Height = 41 Hint = 'Attributes' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777177777 7777777111777777777777777991177777777799991111177777777779999177 7777779999999997777777777999991777777799999777777777777777779991 7777779999177777777777777777799177777779991777777777777777777799 1777777999177777777777777777779991111119991777777777777777777779 9999999999917777777777777777777799917779999177777777777777777777 7991777999917777777777777777717779991779999177777777777777779911 7799917999917777777777777777999917799179999177777777777777779991 7777991199917777777777777777999177779991999177777777777777779991 7777799199917777777777777777799177777799999177777777777777777991 1777777999917777777777777777779991111199999917777777777777777777 9999999999991777777777777777777779999999999917777777777777777777 7777777777997777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777777777777777 7777777777777777777777777777777777777777777777777777} ParentShowHint = False ShowHint = True OnClick = SpeedButton10Click end object Bevel1: TBevel Left = 305 Top = 2 Width = 7 Height = 41 ParentShowHint = False ShowHint = False Style = bsRaised end object Bevel2: TBevel Left = 215 Top = 2 Width = 7 Height = 41 ParentShowHint = False ShowHint = False Style = bsRaised end object Bevel3: TBevel Left = 43 Top = 2 Width = 7 Height = 41 ParentShowHint = False ShowHint = False Style = bsRaised end object SpeedButton11: TSpeedButton Left = 485 Top = 2 Width = 41 Height = 41 Hint = 'About' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 700000077777777777777777777777778BBBBB30777777777777777777777778 BBBBBBB3077777777777777777777778BBBBBBB3307777777777777777777778 BBBBBBB33077777777777777777777778BBBBB33307777777777777777777777 7333337330777777777777777777777300000000077777777777777777777773 FBBBBBB3077777777777777777777773FBBBBBB3307777777777777777777773 FBBBBBB3330777777777777777777773FBBBBBB3330777777777777777777773 FBBBBBB33307777777777777777777773BBBBBBB330777777777777777777777 3FBBBBBB33077777777777777777777773FBBBBBB30777777777777777777777 773FBBBBBB30777777777777300000077773FBBBBBB30777777777773FBBBBB0 77778BBBBBBB3077777777773FBBBBB307778BBBBBBB3307777777773FBBBBB3 30778BBBBBBB3330777777773FBBBBB333070BBBBBBB3330777777773FBBBBBB 3300BBBBBBBB3330777777773FBBBBBBBBBBBBBBBBBB33307777777773FBBBBB BBBBBBBBBBBB73307777777773FBBBBBBBBBBBBBBBB7773077777777773FBBBB BBBBBBBBBB777733777777777773FBBBBBBBBBBBFF7777377777777777773FFF FFFFFFFF77777377777777777777733F7F7F7FF7F77737777777777777777773 37F7FF7F77337777777777777777777773333333337777777777} ParentShowHint = False ShowHint = True OnClick = AboutClick end object SpeedButton12: TSpeedButton Left = 436 Top = 2 Width = 41 Height = 41 Hint = 'Reset all' Glyph.Data = { 76020000424D7602000000000000760000002800000020000000200000000100 0400000000000002000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007C7777777777 777777777777777777C7CCC77777777777777777777777777CCC7CCC77777777 1111111777777777CCC777CCC7777777999177791777777CCC77777CCC777777 77791777997777CCC7777777CCC777777779977779977CCC777777777CCC7777 777991777791CCC77777777777CCC77791779977779CCC7777777777777CCC77 9977997777CCC777777777777777CCC7997799177CCC17777777777777777CCC 99179917CCC9177777777777777777CCC997799CCC997777777777777777777C CC7999CCC99771777777777777777777CCC77CCC777799999777777777777777 7CCCCCC997779917777777777777777777CCCC77917779177777777777777777 77CCCC777999999777777777711777777CCCCCC7779779977777777779991777 CCC77CCC17997997777777777777917CCC9177CCC779199777777777777779CC C991777CCC7799977777777777777CCC91997777CCC77997777777777717CCC9 917977777CCC999177777777779CCC199779177777CCC7977777777779CCC799 97791777777CCC77777777777CCC7799177917777777CCC777777777CCC17799 7777977777777CCC7777777CCC79999977779777777777CCC77777CCC7777777 777791777777777CCC777CCC777777777777791777777777CCC7CCC777777777 77777777777777777CCC7C7777777777777777777777777777C7} ParentShowHint = False ShowHint = True OnClick = Resetall1Click end object Bevel4: TBevel Left = 477 Top = 2 Width = 7 Height = 41 ParentShowHint = False ShowHint = False Style = bsRaised end end object StatusBar1: TStatusBar Left = 0 Top = 415 Width = 527 Height = 19 Panels = < item Text = 'Files: 0' Width = 64 end item Text = 'Marked: 0' Width = 50 end> SimplePanel = False SizeGrip = False end object MainMenu1: TMainMenu Left = 32 Top = 280 object File1: TMenuItem Caption = '&Files' ShortCut = 0 object Start1: TMenuItem Caption = '&Start' ShortCut = 0 OnClick = RenameFilesClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Add1: TMenuItem Caption = '&Add' ShortCut = 0 OnClick = OpenFilesClick end object Remove1: TMenuItem Caption = '&Dispose' ShortCut = 0 OnClick = RemoveItemsClick end object Selectall1: TMenuItem Caption = 'S&elect all' ShortCut = 0 OnClick = SelectAllClick end object Removeall1: TMenuItem Caption = 'Dis&pose all' ShortCut = 0 OnClick = RemoveAllClick end object Sortlist2: TMenuItem Caption = 'S&ort list' ShortCut = 0 OnClick = Sortlist1Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = 'Exit' ShortCut = 0 OnClick = Exit1Click end end object Options1: TMenuItem Caption = '&Options' ShortCut = 0 object Name1: TMenuItem Caption = '&Name' ShortCut = 0 OnClick = SpeedButton8Click end object Date1: TMenuItem Caption = '&Date' ShortCut = 0 OnClick = SpeedButton9Click end object Attribute1: TMenuItem Caption = '&Attribute' ShortCut = 0 OnClick = SpeedButton10Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object Columns2: TMenuItem Caption = '&Columns' ShortCut = 0 object N12: TMenuItem Caption = '&1' ShortCut = 0 OnClick = N11Click end object N22: TMenuItem Caption = '&2' ShortCut = 0 OnClick = N21Click end object N32: TMenuItem Caption = '&3' ShortCut = 0 OnClick = N31Click end object N42: TMenuItem Caption = '&4' ShortCut = 0 OnClick = N41Click end object N52: TMenuItem Caption = '&5' ShortCut = 0 OnClick = N51Click end end object Hidetoolbar1: TMenuItem Caption = 'Hide &toolbar' ShortCut = 0 OnClick = Hidetoolbar1Click end end object Quick1: TMenuItem Caption = '&Quick Settings' ShortCut = 0 object Resetall1: TMenuItem Caption = 'Reset &all' ShortCut = 0 OnClick = Resetall1Click end object Resetname1: TMenuItem Caption = 'Reset &names' ShortCut = 0 OnClick = Resetname1Click end object Resetdate1: TMenuItem Caption = 'Reset &dates' ShortCut = 0 OnClick = Resetdate1Click end object Resetattribute1: TMenuItem Caption = '&Reset a&ttributes' ShortCut = 0 OnClick = Resetattribute1Click end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object Help2: TMenuItem Caption = '&Help' ShortCut = 0 OnClick = Help2Click end object Introduction1: TMenuItem Caption = '&Introduction' ShortCut = 0 OnClick = Introduction1Click end object Howtogethelp1: TMenuItem Caption = 'How to &get help' ShortCut = 0 OnClick = Howtogethelp1Click end object N5: TMenuItem Caption = '-' ShortCut = 0 end object About1: TMenuItem Caption = '&About' ShortCut = 0 OnClick = AboutClick end end end object PopupMenu1: TPopupMenu Left = 112 Top = 280 object AddFiles1: TMenuItem Caption = '&Add files' ShortCut = 0 OnClick = OpenFilesClick end object Deletefiles1: TMenuItem Caption = '&Dispose files' ShortCut = 0 OnClick = RemoveItemsClick end object Selectall2: TMenuItem Caption = '&Select all' ShortCut = 0 OnClick = SelectAllClick end object Disposeall1: TMenuItem Caption = 'Dis&pose all' ShortCut = 0 OnClick = RemoveAllClick end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Columns1: TMenuItem Caption = '&Columns' ShortCut = 0 object N11: TMenuItem Caption = '&1' ShortCut = 0 OnClick = N11Click end object N21: TMenuItem Caption = '&2' ShortCut = 0 OnClick = N21Click end object N31: TMenuItem Caption = '&3' ShortCut = 0 OnClick = N31Click end object N41: TMenuItem Caption = '&4' ShortCut = 0 OnClick = N41Click end object N51: TMenuItem Caption = '&5' ShortCut = 0 OnClick = N51Click end end object Sortlist1: TMenuItem Caption = 'S&ort list' ShortCut = 0 OnClick = Sortlist1Click end object N6: TMenuItem Caption = '-' ShortCut = 0 end object Hidetoolbar2: TMenuItem Caption = 'Hide &toolbar' ShortCut = 0 OnClick = Hidetoolbar1Click end end end