home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: Shareware for Win 95
/
Chip-Shareware-Win95.bin
/
hudba
/
pmc
/
_setup.1
/
Pmc.exe
/
0
/
RCDATA
/
TMUSCOL
/
TMUSCOL.txt
< prev
Wrap
Text File
|
1997-04-09
|
51KB
|
1,417 lines
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 = {<image000.ico>}
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