object Muscol: TMuscol Left = -2 Top = 3 BorderStyle = bsSingle Caption = 'Private Music Collection' ClientHeight = 554 ClientWidth = 792 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Icon.Data = {} Menu = MainMenu1 Position = poScreenCenter OnActivate = FormActivate OnClick = FormClick OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 16 object Header: TPanel Left = 8 Top = 0 Width = 641 Height = 177 BevelInner = bvLowered Enabled = False TabOrder = 0 object Label1: TLabel Left = 24 Top = 16 Width = 29 Height = 16 Caption = 'Artist' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 24 Top = 48 Width = 26 Height = 16 Caption = 'Title' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 24 Top = 80 Width = 37 Height = 16 Caption = 'Genre' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 24 Top = 112 Width = 34 Height = 16 Caption = 'Label' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 24 Top = 144 Width = 60 Height = 16 Caption = 'Released' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Artist: TEdit Left = 136 Top = 8 Width = 425 Height = 24 AutoSelect = False AutoSize = False MaxLength = 30 TabOrder = 0 OnChange = ArtistChange OnExit = ArtistExit end object Title: TEdit Left = 136 Top = 40 Width = 425 Height = 24 AutoSelect = False AutoSize = False MaxLength = 50 TabOrder = 1 OnChange = TitleChange OnExit = TitleExit end object Genre: TComboBox Left = 136 Top = 72 Width = 425 Height = 24 ItemHeight = 16 MaxLength = 25 TabOrder = 2 OnChange = GenreChange end object maatschappij: TEdit Left = 136 Top = 104 Width = 425 Height = 24 AutoSelect = False AutoSize = False MaxLength = 20 TabOrder = 3 OnChange = maatschappijChange end object released: TEdit Left = 136 Top = 136 Width = 145 Height = 24 AutoSelect = False AutoSize = False MaxLength = 10 TabOrder = 4 OnChange = releasedChange end end object Panel2: TPanel Left = 656 Top = 168 Width = 129 Height = 175 BevelOuter = bvLowered TabOrder = 2 object Label9: TLabel Left = 16 Top = 4 Width = 97 Height = 16 Alignment = taCenter Caption = 'Data Editor' end object BitBtn2: TBitBtn Left = 17 Top = 72 Width = 96 Height = 24 Caption = '&Insert' Enabled = False TabOrder = 0 OnClick = BitBtn2Click Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777770000000000000077777777770000000FFFFFF077777777770000000FFFF FF077777777770000000FFFFFF07777777777000000000000007777777777000 0000777777774770000070000000777777744770EFEF70000000777777444440 FEFE70000000777777744770EFEF700000007777777747700000700000000000 00077777777770000000FFFFFF077777777770000000FFFFFF07777777777000 0000FFFFFF077777777770000000000000077777777770000000777777777777 777770000000} Layout = blGlyphRight Spacing = 28 end object BitBtn3: TBitBtn Left = 17 Top = 120 Width = 96 Height = 24 Caption = '&Delete' Enabled = False TabOrder = 5 OnClick = BitBtn3Click Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777700000007777777777777777700000007000000007777777700000007FFF FFFF07777777700000007FFFFFFF07777777700000007FFFFFFF077777777000 00007000000000007747700000007EFEFEFEFEF07744700000007FEFEFEFEFE0 4444400000007EFEFEFEFEF07744700000007000000000007747700000007FFF FFFF07777777700000007FFFFFFF07777777700000007FFFFFFF077777777000 0000700000000777777770000000777777777777777770000000777777777777 777770000000} Layout = blGlyphRight Spacing = 25 end object BitBtn4: TBitBtn Left = 17 Top = 96 Width = 96 Height = 24 Cancel = True Caption = '&Cancel' Enabled = False ModalResult = 2 TabOrder = 1 OnClick = BitBtn4Click Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888889800008898888888888888898800008899 88777777777798880000889990000000000998880000888990BFFFBFFF998888 0000888899FCCCCCCF97888800008888999FBFFFB9978888000088888999CCC9 990788880000888880999FB99F0788880000888880FC9999CF07888800008888 80FF9999BF0788880000888880FC9999000788880000888880B99F099F078888 0000888880999F099998888800008888999FBF0F089988880000889999000000 8889988800008899988888888888898800008888888888888888889800008888 88888888888888880000} Layout = blGlyphRight Spacing = 22 end object BitBtn5: TBitBtn Left = 17 Top = 24 Width = 48 Height = 24 Caption = '&<' Enabled = False TabOrder = 3 OnClick = BitBtn5Click Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDD0000000DDDDDDDDDDDDDDDDD0000000DD00000000000DDDD0000000DD0F FFFFFFFF0DDDD0000000DD0F0000000F0DDDD0000000DD0FFFFFFFFF0DD4D000 0000DD0F00000FFF8D4DD0000000DD0FFFFFFF4F74DDD0000000DD0F00000F44 4DDDD0000000DD0FFFFFFF444DDDD0000000DD0FF0000F4444DDD0000000DD0F FFFFFFFFDDDDD0000000DD0F0000000F0DDDD0000000DD0FFFFFFFFF0DDDD000 0000DD00000000000DDDD0000000DDDDDDDDDDDDDDDDD0000000DDDDDDDDDDDD DDDDD0000000} Layout = blGlyphRight Spacing = 10 end object BitBtn6: TBitBtn Left = 65 Top = 24 Width = 48 Height = 24 Caption = '&>' Enabled = False TabOrder = 2 OnClick = BitBtn6Click Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDD0000000DDDDDDDDDDDDDDDDD0000000DD00000000000DDDD0000000DD0F FFFFFFFF0DDDD0000000DD0F0000000F0DDDD0000000DD0FFFFFFFFF0DD4D000 0000DD0F00000FFF8D4DD0000000DD0FFFFFFF4F74DDD0000000DD0F00000F44 4DDDD0000000DD0FFFFFFF444DDDD0000000DD0FF0000F4444DDD0000000DD0F FFFFFFFFDDDDD0000000DD0F0000000F0DDDD0000000DD0FFFFFFFFF0DDDD000 0000DD00000000000DDDD0000000DDDDDDDDDDDDDDDDD0000000DDDDDDDDDDDD DDDDD0000000} Layout = blGlyphRight Spacing = 10 end object BitBtn12: TBitBtn Left = 17 Top = 144 Width = 96 Height = 24 Caption = 'So&rt' Enabled = False TabOrder = 4 OnClick = BitBtn12Click Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777700000007711111177777077700000007711777177778087700000007771 1777777700077000000077771177777800087000000077777117777000007000 0000771777117777707770000000771111117777707770000000777777777777 7077700000007744474447777077700000007784777487777077700000007774 4444777770777000000077784748777770777000000077774447777770777000 0000777784877777707770000000777774777777707770000000777777777777 777770000000} Layout = blGlyphRight Spacing = 38 end object BitBtn13: TBitBtn Left = 17 Top = 48 Width = 96 Height = 24 Caption = '&Search' Enabled = False TabOrder = 6 OnClick = BitBtn13Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333FF33333333333330003FF3FFFFF3333777003000003333 300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333 330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000 333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000 339977FF777777773377000BFB03333333337773FF733333333F333000333333 3300333777333333337733333333333333003333333333333377333333333333 333333333333333333FF33333333333330003333333333333777333333333333 3000333333333333377733333333333333333333333333333333} Layout = blGlyphRight NumGlyphs = 2 Spacing = 18 end end object Panel3: TPanel Left = 656 Top = 0 Width = 129 Height = 161 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object Label8: TLabel Left = 8 Top = 4 Width = 113 Height = 16 Alignment = taCenter Caption = 'Audio Player' Font.Color = clBlack Font.Height = -13 Font.Name = 'System' Font.Style = [fsBold] ParentFont = False end object BitBtn7: TBitBtn Left = 9 Top = 111 Width = 47 Height = 22 TabOrder = 0 OnClick = BitBtn7Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333 70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333 70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033 70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333 70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333} NumGlyphs = 2 end object BitBtn8: TBitBtn Left = 9 Top = 133 Width = 56 Height = 22 TabOrder = 3 OnClick = BitBtn8Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333 70E337F33333333337F3E0F33333333370E337F3333F3FF337F3E0F333030033 70E337F3337F77F337F3E0F33003003370E337F3377F77F337F3E0F300030033 70E337F3777F77F337F3E0F33003003370E337F3377F77F337F3E0F333030033 70E337F33373773337F3E0F33333333370E337F33333333337F3E0F333333333 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333} NumGlyphs = 2 end object BitBtn9: TBitBtn Left = 65 Top = 133 Width = 56 Height = 22 TabOrder = 4 OnClick = BitBtn9Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333 70E337F33333333337F3E0F33333333370E337F333FF3F3337F3E0F330030333 70E337F3377F7FF337F3E0F33003003370E337F3377F77FF37F3E0F330030003 70E337F3377F777337F3E0F33003003370E337F3377F773337F3E0F330030333 70E337F33773733337F3E0F33333333370E337F33333333337F3E0F333333333 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333} NumGlyphs = 2 end object BitBtn10: TBitBtn Left = 56 Top = 111 Width = 33 Height = 22 TabOrder = 2 OnClick = BitBtn10Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333 70E337F33333333337F3E0F33333333370E337F333FF3FF337F3E0F330030033 70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033 70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033 70E337F33773773337F3E0F33333333370E337F33333333337F3E0F333333333 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333} NumGlyphs = 2 end object BitBtn11: TBitBtn Left = 89 Top = 111 Width = 32 Height = 22 TabOrder = 1 OnClick = BitBtn11Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333 70E337F33333333337F3E0F33333333370E337F333FFFFF337F3E0F330000033 70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033 70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033 70E337F33777773337F3E0F33333333370E337F33333333337F3E0F333333333 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333} NumGlyphs = 2 end object Panel1: TPanel Left = 8 Top = 24 Width = 113 Height = 85 BevelInner = bvLowered BevelOuter = bvLowered Color = clBlack TabOrder = 5 object Label18: TLabel Left = 8 Top = 6 Width = 41 Height = 16 Caption = 'Track' Font.Color = clGreen Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label20: TLabel Left = 8 Top = 46 Width = 36 Height = 16 Caption = 'Time' Font.Color = clGreen Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label19: TLabel Left = 89 Top = 16 Width = 15 Height = 29 Alignment = taRightJustify Caption = '1' Font.Color = clGreen Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label21: TLabel Left = 90 Top = 56 Width = 12 Height = 24 Alignment = taRightJustify Caption = '1' Font.Color = clGreen Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end end end object Panel4: TPanel Left = 656 Top = 350 Width = 129 Height = 179 BevelInner = bvLowered BevelOuter = bvLowered TabOrder = 3 object Label17: TLabel Left = 8 Top = 4 Width = 112 Height = 16 Caption = 'File Management' end object BitBtn14: TBitBtn Left = 16 Top = 24 Width = 97 Height = 25 Caption = '&New' TabOrder = 1 OnClick = BitBtn14Click Glyph.Data = { E6050000424DE605000000000000E60300002800000020000000100000000100 08000000000000020000120B0000120B0000EC00000000000000000000003300 00006600000099000000CC000000FF0000000033000033330000663300009933 0000CC330000FF33000000660000336600006666000099660000CC660000FF66 000000990000339900006699000099990000CC990000FF99000000CC000033CC 000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF 0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00 330000333300333333006633330099333300CC333300FF333300006633003366 33006666330099663300CC663300FF6633000099330033993300669933009999 3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC 330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300 66006600660099006600CC006600FF0066000033660033336600663366009933 6600CC336600FF33660000666600336666006666660099666600CC666600FF66 660000996600339966006699660099996600CC996600FF99660000CC660033CC 660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF 6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00 990000339900333399006633990099339900CC339900FF339900006699003366 99006666990099669900CC669900FF6699000099990033999900669999009999 9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC 990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300 CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933 CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66 CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00 FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366 FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999 FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000000000D0D 0D001A1A1A00282828003535350043434300505050005D5D5D006B6B6B007878 78008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6D600E4E4 E400F1F1F100FFFFFF007E7E7E7E7E7E7E7E7E7E75A0737E7E7E7E7E7E7E7E7E 7E7E7E7EE37EE37E7E7E7E7E7E7E7E0000007E7900E6007E7E7E7E7E7E7E7EE3 E3E37E7EE37EE37E7E7E7E7E7E7E00A800AA007E00E6007E7E7E7E7E7E7EE37E E37EE37EE37EE37E7E7E7E7E7E00A87E00D6E60000E6E3007E7E7E7E7EE37E7E E37E7EE3E37EE3E37E7E7E7E00A8A8A800D6D6AA00E6E6E2007E7E7EE37E7E7E E37E7E7EE37E7EE3E37E7E00A8A8A87E00D6D60000E6DFE3007E7EE37E7E7E7E E37E7EE3E37EE37EE37E00A8A8A8A87E00D600D7E6E3E1E62A7EE37E7E7E7E7E E37EE37E7E7EE37EE37E00A8A8A8A800AA00D7ADAD2500D70000E37E7E7E7EE3 7EE37E7E7EE3E37EE3E300A8A80000AA00D7ADADADADADADD700E37E7EE3E37E E37E7E7E7E7E7E7E7EE300A8007EAA00D7ADADADADADADD7007EE37EE37E7EE3 7E7E7E7E7E7E7E7EE37E0000007FE600ADADADADADADD7007E7EE3E3E37E7EE3 7E7E7E7E7E7E7EE37E7E00007E00AAAA00ADADADADD7007E7E7EE3E37EE37E7E E37E7E7E7E7EE37E7E7E2A7E7E7E000000E6ADADD7007E7E7E7EE37E7E7EE3E3 E37E7E7E7EE37E7E7E7E7E7E7E7E7E7E7E00E6D7007E7E7E7E7E7E7E7E7E7E7E 7EE37E7EE37E7E7E7E7E7E7E7E7E7E7E7E7E00007E7E7E7E7E7E7E7E7E7E7E7E 7E7EE3E37E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E 7E7E7E7E7E7E7E7E7E7E} Layout = blGlyphRight NumGlyphs = 2 Spacing = 38 end object BitBtn15: TBitBtn Left = 16 Top = 49 Width = 97 Height = 25 Caption = '&Open' TabOrder = 0 OnClick = BitBtn15Click Glyph.Data = { E6050000424DE605000000000000E60300002800000020000000100000000100 08000000000000020000CF0E0000D50E0000EC00000000000000000000003300 00006600000099000000CC000000FF0000000033000033330000663300009933 0000CC330000FF33000000660000336600006666000099660000CC660000FF66 000000990000339900006699000099990000CC990000FF99000000CC000033CC 000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF 0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00 330000333300333333006633330099333300CC333300FF333300006633003366 33006666330099663300CC663300FF6633000099330033993300669933009999 3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC 330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300 66006600660099006600CC006600FF0066000033660033336600663366009933 6600CC336600FF33660000666600336666006666660099666600CC666600FF66 660000996600339966006699660099996600CC996600FF99660000CC660033CC 660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF 6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00 990000339900333399006633990099339900CC339900FF339900006699003366 99006666990099669900CC669900FF6699000099990033999900669999009999 9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC 990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300 CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933 CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66 CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00 FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366 FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999 FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000000000D0D 0D001A1A1A00282828003535350043434300505050005D5D5D006B6B6B007878 78008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6D600E4E4 E400F1F1F100FFFFFF006F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F 6F6F6F6F6F6F6F6F6F6F00000000000000000000000000000000E2E2E2E2E2E2 E2E2E2E2E2E2E2E2E2E200A9A9A9A900A9A9A9A90000A9A9A900E26F6F6F6FE2 6F6F6F6FE26F6F6F6FE200A9A9A9001E00A9A9001E00A9A9A900E26F6F6FE26F E26F6FE26FE26F6F6FE200A9A9A9A90000A9A9A90000A9A9A900E26F6F6FE2E2 E26F6F6FE2E26F6F6FE200A9A9A9A9A900A9A9A9A900A9A9A900E26F6F6F6F6F E26F6F6F6FE26F6F6FE200A9A9A9A9A900A9A9000000A9A9A900E26F6F6F6F6F E26F6FE2E2E26F6F6FE200A9A9A9A9A90000001E1E00A9A9A900E26F6F6F6F6F E2E2E26F6FE26F6F6FE200A9A9A9A9A9001E1E000000A9A9A900E26F6F6F6F6F E26F6FE2E2E26F6F6FE200A9A9A9A9A9000000A9A9A9A9A9A900E26F6F6F6F6F E2E2E26F6F6F6F6F6FE200A9A9A9A9A9A9A9A9A9A9A9A9A9A900E26F6F6F6F6F E26F6F6F6F6F6F6F6FE26F00A9A9A9A9A900000000000000006F6FE26F6F6F6F 6FE2E2E2E2E2E2E2E2E26F6F00A9A9A9006F6F6F6F6F6F6F6F6F6F6FE26F6F6F E26F6F6F6F6F6F6F6F6F6F6F6F000000006F6F6F6F6F6F6F6F6F6F6F6FE2E2E2 6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F 6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F 6F6F6F6F6F6F6F6F6F6F} Layout = blGlyphRight NumGlyphs = 2 Spacing = 32 end object BitBtn16: TBitBtn Left = 16 Top = 74 Width = 97 Height = 25 Caption = 'C&lose' Enabled = False TabOrder = 2 OnClick = BitBtn16Click Glyph.Data = { E6050000424DE605000000000000E60300002800000020000000100000000100 08000000000000020000CF0E0000D50E0000EC00000000000000000000003300 00006600000099000000CC000000FF0000000033000033330000663300009933 0000CC330000FF33000000660000336600006666000099660000CC660000FF66 000000990000339900006699000099990000CC990000FF99000000CC000033CC 000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF 0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00 330000333300333333006633330099333300CC333300FF333300006633003366 33006666330099663300CC663300FF6633000099330033993300669933009999 3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC 330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300 66006600660099006600CC006600FF0066000033660033336600663366009933 6600CC336600FF33660000666600336666006666660099666600CC666600FF66 660000996600339966006699660099996600CC996600FF99660000CC660033CC 660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF 6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00 990000339900333399006633990099339900CC339900FF339900006699003366 99006666990099669900CC669900FF6699000099990033999900669999009999 9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC 990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300 CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933 CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66 CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00 FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366 FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999 FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000000000D0D 0D001A1A1A00282828003535350043434300505050005D5D5D006B6B6B007878 78008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6D600E4E4 E400F1F1F100FFFFFF006F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F 6F6F6F6F6F6F6F6F6F6F00000000000000000000000000000000E2E2E2E2E2E2 E2E2E2E2E2E2E2E2E2E200A9A9A9A900A9A9A9A90000A9A9A900E26F6F6F6FE2 6F6F6F6FE26F6F6F6FE200A9A9A900B400A9A900B400A9A9A900E26F6F6FE26F E26F6FE26FE26F6F6FE200A9A9A9A90000A9A9A90000A9A9A900E26F6F6FE2E2 E26F6F6FE2E26F6F6FE200A9A9A9A9A900A9A9A9A900A9A9A900E26F6F6F6F6F E26F6F6F6FE26F6F6FE200A9A9A9A9A900A9A9000000A9A9A900E26F6F6F6F6F E26F6FE2E2E26F6F6FE200A9A9A9A9A9000000B4B400A9A9A900E26F6F6F6F6F E2E2E26F6FE26F6F6FE200A9A9A9A9A900B4B4000000A9A9A900E26F6F6F6F6F E26F6FE2E2E26F6F6FE200A9A9A9A9A9000000A9A9A9A9A9A900E26F6F6F6F6F E2E2E26F6F6F6F6F6FE200A9A9A9A9A9A9A9A9A9A9A9A9A9A900E26F6F6F6F6F E26F6F6F6F6F6F6F6FE26F00A9A9A9A9A900000000000000006F6FE26F6F6F6F 6FE2E2E2E2E2E2E2E2E26F6F00A9A9A9006F6F6F6F6F6F6F6F6F6F6FE26F6F6F E26F6F6F6F6F6F6F6F6F6F6F6F000000006F6F6F6F6F6F6F6F6F6F6F6FE2E2E2 6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F 6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F 6F6F6F6F6F6F6F6F6F6F} Layout = blGlyphRight NumGlyphs = 2 Spacing = 28 end object BitBtn1: TBitBtn Left = 16 Top = 147 Width = 97 Height = 25 Caption = '&Exit' TabOrder = 3 OnClick = BitBtn1Click Glyph.Data = { E6040000424DE604000000000000E60300002800000010000000100000000100 08000000000000010000120B0000120B0000EC00000000000000000000003300 00006600000099000000CC000000FF0000000033000033330000663300009933 0000CC330000FF33000000660000336600006666000099660000CC660000FF66 000000990000339900006699000099990000CC990000FF99000000CC000033CC 000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF 0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00 330000333300333333006633330099333300CC333300FF333300006633003366 33006666330099663300CC663300FF6633000099330033993300669933009999 3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC 330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300 66006600660099006600CC006600FF0066000033660033336600663366009933 6600CC336600FF33660000666600336666006666660099666600CC666600FF66 660000996600339966006699660099996600CC996600FF99660000CC660033CC 660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF 6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00 990000339900333399006633990099339900CC339900FF339900006699003366 99006666990099669900CC669900FF6699000099990033999900669999009999 9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC 990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300 CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933 CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66 CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00 FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366 FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999 FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000000000D0D 0D001A1A1A00282828003535350043434300505050005D5D5D006B6B6B007878 78008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6D600E4E4 E400F1F1F100FFFFFF007E7E7E78737A7A9E9E9E9EBB787E7E7E7E7E78737348 486C484848C2C27E7E7E7E7873734824242424242473C9C97E7E7873736C9DC8 7972C1C19D48C9C2C27873736C72C1CFC8C8CFCFC87297BBBBBB7A6C9072C8CF A4CFCFCFCF9D48B4B49E7A90B496C8A4C89D9D9DA4C8726CB49E9EB4B496C8CF C8A4C8C89797C824909E9EB4B4729DA4A4CFCFA47396C896909E9EB4B4729D9D 9D9D799D976CB4B4B47A9EB4B4729D9D9DC89D9D7390B4906C7ABBBBBBC19D9D 9D9D9D9D9D90906C737378C2C2C997C89D9D9DC19D906C7373787E7EC9C9BBBB B4C89DBB976C7373787E7E7E7EC2BBB4B4BBB4906C7373787E7E7E7E7E78BB9E 9E9E9E7A7A73787E7E7E} Layout = blGlyphRight Spacing = 40 end object BitBtn19: TBitBtn Left = 16 Top = 110 Width = 97 Height = 25 Caption = '&Print' Enabled = False TabOrder = 4 OnClick = BitBtn19Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888 8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F 8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F 8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} Layout = blGlyphRight NumGlyphs = 2 Spacing = 35 end end object MediaPlayer1: TMediaPlayer Left = 200 Top = 240 Width = 253 Height = 41 AutoRewind = False DeviceType = dtCDAudio Shareable = True Visible = False TabOrder = 5 end object TabbedNotebook1: TTabbedNotebook Left = 8 Top = 184 Width = 641 Height = 345 Enabled = False TabsPerRow = 5 TabFont.Color = clBtnText TabFont.Height = -11 TabFont.Name = 'MS Sans Serif' TabFont.Style = [] TabOrder = 1 OnChange = TabbedNotebook1Change object TTabPage Left = 4 Top = 27 Caption = 'Details' object Label6: TLabel Left = 16 Top = 128 Width = 105 Height = 16 AutoSize = False Caption = 'ID Number' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label22: TLabel Left = 16 Top = 160 Width = 97 Height = 16 Caption = 'Number of disks' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label23: TLabel Left = 16 Top = 224 Width = 73 Height = 16 Caption = 'Obtained by' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label24: TLabel Left = 16 Top = 256 Width = 44 Height = 16 Caption = 'Lend to' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label16: TLabel Left = 16 Top = 288 Width = 58 Height = 16 Caption = 'Image file' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label25: TLabel Left = 272 Top = 288 Width = 32 Height = 16 Caption = '.bmp' end object Label26: TLabel Left = 16 Top = 192 Width = 114 Height = 16 Caption = 'Show Artist of Song' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Medium: TRadioGroup Left = 16 Top = 0 Width = 601 Height = 113 Caption = 'Soundcarrier' Color = clBtnFace Columns = 2 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Items.Strings = ( 'Compact Disk' 'CD Single' 'Music Cassette' 'Demo' 'LP' 'DAT' 'DCC') ParentColor = False ParentFont = False TabOrder = 0 TabStop = True OnClick = MediumClick end object nummer: TEdit Left = 144 Top = 120 Width = 297 Height = 24 AutoSelect = False AutoSize = False MaxLength = 15 TabOrder = 1 OnChange = nummerChange end object disks: TEdit Left = 144 Top = 152 Width = 41 Height = 24 MaxLength = 1 TabOrder = 2 OnChange = disksChange end object Obtained: TEdit Left = 144 Top = 216 Width = 297 Height = 24 MaxLength = 15 TabOrder = 3 OnChange = ObtainedChange end object Lend: TEdit Left = 144 Top = 248 Width = 297 Height = 24 MaxLength = 15 TabOrder = 4 OnChange = LendChange end object Hoes: TEdit Left = 144 Top = 280 Width = 121 Height = 24 MaxLength = 8 TabOrder = 5 OnChange = HoesChange OnExit = HoesExit end object Panel6: TPanel Left = 472 Top = 120 Width = 145 Height = 129 BevelInner = bvLowered BevelOuter = bvLowered TabOrder = 6 Visible = False object Image2: TImage Left = 2 Top = 2 Width = 141 Height = 125 Align = alClient Stretch = True end end object BitBtn18: TBitBtn Left = 312 Top = 280 Width = 33 Height = 25 TabOrder = 7 OnClick = BitBtn18Click Glyph.Data = { E6040000424DE604000000000000E60300002800000010000000100000000100 08000000000000010000120B0000120B0000EC00000000000000000000003300 00006600000099000000CC000000FF0000000033000033330000663300009933 0000CC330000FF33000000660000336600006666000099660000CC660000FF66 000000990000339900006699000099990000CC990000FF99000000CC000033CC 000066CC000099CC0000CCCC0000FFCC000000FF000033FF000066FF000099FF 0000CCFF0000FFFF000000003300330033006600330099003300CC003300FF00 330000333300333333006633330099333300CC333300FF333300006633003366 33006666330099663300CC663300FF6633000099330033993300669933009999 3300CC993300FF99330000CC330033CC330066CC330099CC3300CCCC3300FFCC 330000FF330033FF330066FF330099FF3300CCFF3300FFFF3300000066003300 66006600660099006600CC006600FF0066000033660033336600663366009933 6600CC336600FF33660000666600336666006666660099666600CC666600FF66 660000996600339966006699660099996600CC996600FF99660000CC660033CC 660066CC660099CC6600CCCC6600FFCC660000FF660033FF660066FF660099FF 6600CCFF6600FFFF660000009900330099006600990099009900CC009900FF00 990000339900333399006633990099339900CC339900FF339900006699003366 99006666990099669900CC669900FF6699000099990033999900669999009999 9900CC999900FF99990000CC990033CC990066CC990099CC9900CCCC9900FFCC 990000FF990033FF990066FF990099FF9900CCFF9900FFFF99000000CC003300 CC006600CC009900CC00CC00CC00FF00CC000033CC003333CC006633CC009933 CC00CC33CC00FF33CC000066CC003366CC006666CC009966CC00CC66CC00FF66 CC000099CC003399CC006699CC009999CC00CC99CC00FF99CC0000CCCC0033CC CC0066CCCC0099CCCC00CCCCCC00FFCCCC0000FFCC0033FFCC0066FFCC0099FF CC00CCFFCC00FFFFCC000000FF003300FF006600FF009900FF00CC00FF00FF00 FF000033FF003333FF006633FF009933FF00CC33FF00FF33FF000066FF003366 FF006666FF009966FF00CC66FF00FF66FF000099FF003399FF006699FF009999 FF00CC99FF00FF99FF0000CCFF0033CCFF0066CCFF0099CCFF00CCCCFF00FFCC FF0000FFFF0033FFFF0066FFFF0099FFFF00CCFFFF00FFFFFF00000000000D0D 0D001A1A1A00282828003535350043434300505050005D5D5D006B6B6B007878 78008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6D600E4E4 E400F1F1F100FFFFFF007E7EE1DF817E7E7E7E7E7E7E7E7E7E7E7E7EE080DBDB DF817E7E7E7E7E7E7E7E7EE1E64F7A8055DBDDE1E87E7E7E7E7E7EE18000E100 55E0E2552BDBE181E1E6E6E255DDE6DD00DA0055805C55DAE22AE1E62B00E6E1 DFDF00DD0000807AAA2AE1550000DDD7DAE6DAE1E1DDE1E0AA2ADB805C552ADD E6D7D7E100807A80AA2A7EE07973DF80DD2A0000DAAB4FAAAA2A7EE6AAAA7979 73DF554F557A80AAAA2A7EE6AAAAAAAAAA797979E3DFAAAAAA2A7EE6AAAAAAAA AAAAAAAA7980AAAAAA2A7EE6AAAAAAAAAAAAAAAAAAAAAAAAAA2A7EE5E9E8E8E8 E9E8E8E6E6E6E6E6E6DD7EE9ABAAAAAAAAAAE57E7E7E7E7E7E7E7E7EE9E6E6E6 E6E67E7E7E7E7E7E7E7E} end object Verzamel: TCheckBox Left = 144 Top = 192 Width = 17 Height = 17 TabOrder = 8 OnClick = VerzamelClick end end object TTabPage Left = 4 Top = 27 Caption = 'Songs' object Panel5: TPanel Left = 1 Top = 0 Width = 630 Height = 321 BevelOuter = bvNone Caption = 'Panel5' TabOrder = 0 OnClick = Panel5Click object SongList: TStringGrid Left = 6 Top = 8 Width = 617 Height = 310 ColCount = 6 DefaultColWidth = 122 DefaultRowHeight = 20 Enabled = False FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing, goTabs, goThumbTracking] TabOrder = 0 OnGetEditMask = SongListGetEditMask OnKeyDown = SongListKeyDown end end end object TTabPage Left = 4 Top = 27 Caption = 'Record List' object RecordList: TStringGrid Left = 8 Top = 8 Width = 617 Height = 305 ColCount = 2 DefaultColWidth = 305 DefaultRowHeight = 20 FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect, goThumbTracking] ScrollBars = ssVertical TabOrder = 0 OnSelectCell = RecordListSelectCell end end object TTabPage Left = 4 Top = 27 Caption = 'Search List' object Label7: TLabel Left = 8 Top = 8 Width = 114 Height = 16 Caption = 'Results of search' end object Label13: TLabel Left = 128 Top = 8 Width = 4 Height = 16 end object SearchList: TStringGrid Left = 8 Top = 24 Width = 617 Height = 289 ColCount = 2 DefaultColWidth = 305 DefaultRowHeight = 20 FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect, goThumbTracking] ScrollBars = ssVertical TabOrder = 0 OnSelectCell = SearchListSelectCell end end object TTabPage Left = 4 Top = 27 Caption = 'Deleted Records' object DeletedList: TStringGrid Left = 8 Top = 8 Width = 617 Height = 273 ColCount = 2 DefaultColWidth = 305 DefaultRowHeight = 20 FixedCols = 0 RowCount = 2 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect, goThumbTracking] ScrollBars = ssVertical TabOrder = 0 OnSelectCell = DeletedListSelectCell end object BitBtn17: TBitBtn Left = 520 Top = 288 Width = 105 Height = 25 Caption = 'Undelete' Enabled = False TabOrder = 1 OnClick = BitBtn17Click Glyph.Data = { 42010000424D4201000000000000760000002800000011000000110000000100 040000000000CC00000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777770000000777777770000000770000000777777770FFFFF07700000007777 77770FCCCF0770000000777777770FFFFF0770000000777000000FCCCF077000 0000777077770FFFFF077000000070007CCC0FCCCF0770000000706077770FFF FF077000000070607CCC00000007700000007060777770777777700000007060 7CCC707777747000000070607777707777444000000070600000007777747000 0000706666607774777470000000700000007777444770000000777777777777 777770000000} end end end object StatusBar1: TStatusBar Left = 0 Top = 535 Width = 792 Height = 19 Panels = < item Text = 'File :' Width = 180 end item Text = 'Number Of Records :' Width = 250 end item Text = 'Record :' Width = 150 end item Text = 'Status :' Width = 220 end> SimplePanel = False end object MainMenu1: TMainMenu Left = 544 object File1: TMenuItem Caption = '&File' ShortCut = 0 object New1: TMenuItem Caption = '&New' ShortCut = 0 end object Open1: TMenuItem Caption = '&Open' ShortCut = 0 end object Save1: TMenuItem Caption = '&Close' Enabled = False ShortCut = 0 end object N2: TMenuItem Caption = '-' ShortCut = 0 end object PrinterSetup1: TMenuItem Caption = 'Printer &Setup' ShortCut = 0 OnClick = PrinterSetup1Click end object PrinterFont1: TMenuItem Caption = 'Printer &Font' ShortCut = 0 OnClick = PrinterFont1Click end object PrintRecord1: TMenuItem Caption = '&Print' Enabled = False ShortCut = 0 OnClick = PrintRecord1Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Export1: TMenuItem Caption = 'Export &ASCII' Enabled = False ShortCut = 0 OnClick = Export1Click end object N4: TMenuItem Caption = '-' ShortCut = 0 end object Exit1: TMenuItem Caption = '&Exit' ShortCut = 0 end end object Record1: TMenuItem Caption = '&Record' ShortCut = 0 object Insert1: TMenuItem Caption = '&Insert' Enabled = False ShortCut = 16429 end object Cancel1: TMenuItem Caption = '&Cancel' Enabled = False ShortCut = 113 end object Delete2: TMenuItem Caption = '&Delete' Enabled = False ShortCut = 16430 end object Sort1: TMenuItem Caption = 'So&rt' Enabled = False ShortCut = 115 end object Search1: TMenuItem Caption = '&Search' Enabled = False ShortCut = 16467 end end object Tools1: TMenuItem Caption = '&Options' ShortCut = 0 object Purge1: TMenuItem Caption = '&Purge Records At Close' ShortCut = 0 OnClick = Purge1Click end object SortClose1: TMenuItem Caption = '&Sort Records At Close' ShortCut = 0 OnClick = SortClose1Click end object Show1: TMenuItem Caption = 'S&how Artists Of Each Song' ShortCut = 0 OnClick = Show1Click end object Configuration1: TMenuItem Caption = '&Edit Genre List' ShortCut = 0 OnClick = Configuration1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Sorttitle: TMenuItem Caption = 'Sort By Artist And &Album Title' ShortCut = 0 OnClick = SorttitleClick end object SortRelease: TMenuItem Caption = 'Sort By Artist And &Release Date' ShortCut = 0 OnClick = SortReleaseClick end object N5: TMenuItem Caption = '-' ShortCut = 0 end object DefaultPrinterFont1: TMenuItem Caption = 'Default Printer &Font' ShortCut = 0 OnClick = DefaultPrinterFont1Click end object SaveSettings1: TMenuItem Caption = 'Save Se&ttings' Enabled = False ShortCut = 0 OnClick = SaveSettings1Click end object N7: TMenuItem Caption = '-' ShortCut = 0 Visible = False end object Run1: TMenuItem Caption = 'Run &M.C. Cover' ShortCut = 0 Visible = False OnClick = Run1Click end end object Help1: TMenuItem Caption = '&Help' ShortCut = 0 object Contents1: TMenuItem Caption = 'Contents' ShortCut = 0 OnClick = Contents1Click end object HelpTopics1: TMenuItem Caption = 'Help Topics' ShortCut = 0 OnClick = HelpTopics1Click end object HelponHelp1: TMenuItem Caption = 'Help on Help' ShortCut = 0 OnClick = HelponHelp1Click end object N6: TMenuItem Caption = '-' ShortCut = 0 end object About1: TMenuItem Caption = '&About P.M.C.' ShortCut = 0 OnClick = About1Click end end end object Timer1: TTimer Interval = 30000 OnTimer = Timer1Timer Left = 576 end object PrinterSetupDialog1: TPrinterSetupDialog Left = 512 end object PrintDialog1: TPrintDialog Options = [poPrintToFile, poPageNums, poSelection, poWarning, poDisablePrintToFile] Left = 480 end object FontDialog1: TFontDialog Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] MinFontSize = 10 MaxFontSize = 14 Options = [fdEffects, fdLimitSize, fdScalableOnly] Left = 448 end end