home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BUG 11
/
BUGCD1998_02.ISO
/
mulmedia
/
midinigh
/
_setup.1
/
MN.EXE
/
0
/
RCDATA
/
TMAINFORM
/
TMAINFORM.txt
< prev
Wrap
Text File
|
1997-12-11
|
29KB
|
927 lines
object mainForm: TmainForm
Left = 389
Top = 165
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'MIDInight Express II'
ClientHeight = 122
ClientWidth = 457
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnActivate = FormActivate
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnKeyUp = FormKeyUp
PixelsPerInch = 96
TextHeight = 13
object playBtn: TSpeedButton
Left = 40
Top = 72
Width = 25
Height = 25
Hint = '[P]lay'
GroupIndex = 1
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777F77777777
7777777F777777777777778AFF77777777777787FF7777777777778AAAFF7777
7777778777FF77777777778AAAAAFF77777777877777FF777777778AAAAAAAFF
77777787777777FF7777778AAAAAAAAAFF77778777777777FF77778AAAAAAAAA
88F777877777777788F7778AAAAAAA8877777787777777887777778AAAAA8877
77777787777788777777778AAA88777777777787778877777777778A88777777
7777778788777777777777887777777777777788777777777777777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = playBtnClick
end
object pauseBtn: TSpeedButton
Left = 64
Top = 72
Width = 25
Height = 25
Hint = 'P[a]use'
GroupIndex = 1
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777777777777777777777777777777777777778FFF78FFF
77777778FFF78FFF77777778BBF78BBF7777777877F7877F77777778BBF78BBF
7777777877F7877F77777778BBF78BBF7777777877F7877F77777778BBF78BBF
7777777877F7877F77777778BBF78BBF7777777877F7877F77777778BBF78BBF
7777777877F7877F77777778BBF78BBF7777777877F7877F77777778BBF78BBF
7777777877F7877F77777778BBF78BBF7777777877F7877F77777778BBF78BBF
7777777877F7877F7777777888F7888F7777777888F7888F7777777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = pauseBtnClick
end
object stopBtn: TSpeedButton
Left = 88
Top = 72
Width = 25
Height = 25
Hint = '[S]top'
GroupIndex = 1
Down = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777777777777
77777777777777777777777FFFFFFFFFFFF7777FFFFFFFFFFFF7778999999999
99F777877777777777F777899999999999F777877777777777F7778999999999
99F777877777777777F777899999999999F777877777777777F7778999999999
99F777877777777777F777899999999999F777877777777777F7778999999999
99F777877777777777F777899999999999F777877777777777F7778888888888
8877778888888888887777777777777777777777777777777777777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = stopBtnClick
end
object backwardBtn: TSpeedButton
Left = 120
Top = 72
Width = 25
Height = 25
Hint = '[B]ack 10%'
AllowAllUp = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777777777777777777777777777777777777777777777FF
7FFF7777777777FF7FFF77777777FFCF78CF77777777FF7F787F777777FFCCCF
78CF777777FF777F787F7777FFCCCCCF78CF7777FF77777F787F77FFCCCCCCCF
78CF77FF7777777F787F7FCCCCCCCCCF78CF7F777777777F787F88CCCCCCCCCF
78CF88777777777F787F7788CCCCCCCF78CF77887777777F787F777788CCCCCF
78CF77778877777F787F77777788CCCF78CF77777788777F787F7777777788CF
78CF77777777887F787F77777777778F788877777777778F7888777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = backwardBtnClick
end
object forwardBtn: TSpeedButton
Left = 144
Top = 72
Width = 25
Height = 25
Hint = '[F]orward 10%'
AllowAllUp = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777777777777777777777777777777777778FF7FF777777
77778FF7FF77777777778CF78CFF7777777787F787FF777777778CF78CCCFF77
777787F78777FF7777778CF78CCCCCFF777787F7877777FF77778CF78CCCCCCC
FF7787F787777777FF778CF78CCCCCCCCCFF87F78777777777FF8CF78CCCCCCC
CC8887F78777777777888CF78CCCCCCC887787F78777777788778CF78CCCCC88
777787F78777778877778CF78CCC8877777787F78777887777778CF78C887777
777787F787887777777788F788777777777788F7887777777777777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = forwardBtnClick
end
object ejectBtn: TSpeedButton
Left = 176
Top = 72
Width = 25
Height = 25
Hint = '[E]ject'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00C78FFFFFFFFF
FF77C78FFFFFFFFFFF77C789999999999F77C787777777777F77C78888888888
8877C788888888888877C777777777777777C777777777777777C7FFFFFFFFFF
FF77C7FFFFFFFFFFFF77C789999999999F77C787777777777F77C77899999999
F777C77877777777F777C77899999999F777C77877777777F777C7778999999F
7777C7778777777F7777C7778999999F7777C7778777777F7777C777789999F7
7777C777787777F77777C777789999F77777C777787777F77777C77777899F77
7777C77777877F777777C77777899F777777C77777877F777777C7777778F777
7777C7777778F7777777CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = ejectBtnClick
end
object track1Btn: TSpeedButton
Left = 288
Top = 8
Width = 17
Height = 25
Hint = 'Track [1]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '1'
ParentShowHint = False
ShowHint = True
OnClick = track1BtnClick
end
object track2Btn: TSpeedButton
Left = 304
Top = 8
Width = 17
Height = 25
Hint = 'Track [2]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '2'
ParentShowHint = False
ShowHint = True
OnClick = track2BtnClick
end
object track3Btn: TSpeedButton
Left = 320
Top = 8
Width = 17
Height = 25
Hint = 'Track [3]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '3'
ParentShowHint = False
ShowHint = True
OnClick = track3BtnClick
end
object track4Btn: TSpeedButton
Left = 336
Top = 8
Width = 17
Height = 25
Hint = 'Track [4]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '4'
ParentShowHint = False
ShowHint = True
OnClick = track4BtnClick
end
object track5Btn: TSpeedButton
Left = 352
Top = 8
Width = 17
Height = 25
Hint = 'Track [5]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '5'
ParentShowHint = False
ShowHint = True
OnClick = track5BtnClick
end
object track6Btn: TSpeedButton
Left = 368
Top = 8
Width = 17
Height = 25
Hint = 'Track [6]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '6'
ParentShowHint = False
ShowHint = True
OnClick = track6BtnClick
end
object track7Btn: TSpeedButton
Left = 384
Top = 8
Width = 17
Height = 25
Hint = 'Track [7]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '7'
ParentShowHint = False
ShowHint = True
OnClick = track7BtnClick
end
object track8Btn: TSpeedButton
Left = 400
Top = 8
Width = 17
Height = 25
Hint = 'Track [8]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '8'
ParentShowHint = False
ShowHint = True
OnClick = track8BtnClick
end
object track9Btn: TSpeedButton
Left = 416
Top = 8
Width = 17
Height = 25
Hint = 'Track [9]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '9'
ParentShowHint = False
ShowHint = True
OnClick = track9BtnClick
end
object track0Btn: TSpeedButton
Left = 432
Top = 8
Width = 17
Height = 25
Hint = 'Track 1[0]: No file'
AllowAllUp = True
GroupIndex = 3
Caption = '0'
ParentShowHint = False
ShowHint = True
OnClick = track0BtnClick
end
object muteBtn: TSpeedButton
Left = 208
Top = 72
Width = 25
Height = 25
Hint = '[M]ute'
AllowAllUp = True
GroupIndex = 4
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFC88FFF
FFFFFFFFFF8FFFFFFFFFFFFFFCC88FFCFFFFFFFFF88FFFF8FFFFFF88CEC88FFF
CFFFFFFF888FFFFF8FFFFF8CEEC88FCFFCFFFFF8888FFF8FF8FF0C0EEEC88FFC
FFCF8888888FFFF8FF8FC0CEEEC88CFFCFCF8888888FF8FF8F8F0C0EEEC88FCF
CFCF8888888FFF8F8F8FCCCEEEC88FCFCFCF8888F88FFF8F8F8FCCCEEEC88FCF
CFCF888F8F8FFF8F8F8FCCCEEEC88CFFCFCF8888F88FF8FF8F8FC0CEEEC88FFC
FFCF8888888FFFF8FF8F0C0EEEC88FCFFCFF8888888FFF8FF8FFFFFCEEC88FFF
CFFFFFF8888FFFFF8FFFFFFFCECF8FFCFFFFFFFF888FFFF8FFFFFFFFFCCFFFFF
FFFFFFFFF88FFFFFFFFFFFFFFFCFFFFFFFFFFFFFFF8FFFFFFFFF}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = muteBtnClick
end
object volumeBtn: TSpeedButton
Left = 232
Top = 72
Width = 25
Height = 25
Hint = 'Default [v]olume'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFF88F88F88F88F88FFFFFFFFFFFFFFFFFCCFCC8CC8CC
8CC8F88F88F88F88F88FFFFFCCFCC8CC8CC8FFFF88F88F88F88FFFFFFFFCC8CC
8CC8FFFFFFF88F88F88FFFFFFFFCCFCC8CC8FFFFFFF88F88F88FFFFFFFFFFFCC
8CC8FFFFFFFFFF88F88FFFFFFF0FFFCC8CC8FFFFFF8FFF88F88FFFFFF000FFCC
FCC8FFFFF888FF88F88FFFFF00000FFFF998FFFF88888FFFF88FFFFFFF0FFFFF
F998FFFFFF8FFFFFF88FFFFFFF0FFFFFF998FFFFFF8FFFFFF88FF000000FFFFF
F99FF888888FFFFFF88FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = volumeBtnClick
end
object balanceBtn: TSpeedButton
Left = 256
Top = 72
Width = 25
Height = 25
Hint = 'Default bala[n]ce'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFFFFFFC
FFFFFFFF8FFFFFF8FFFFFFFCFFFFFFFFCFFFFFF8FFFFFFFF8FFFFFCFFCFFFFCF
FCFFFF8FF8FFFF8FF8FFFCFFCFFFFFFCFFCFF8FF8FFFFFF8FF8FFCFCFFCFFCFF
CFCFF8F8FF8FF8FF8F8FFCFCFCFFFFCFCFCFF8F8F8FFFF8F8F8FFCFCFCFFFFCF
CFCFF8F8F8FFFF8F8F8FFCFCFCFFFFCFCFCFF8F8F8FFFF8F8F8FFCFCFFCFFCFF
CFCFF8F8FF8FF8FF8F8FFCFFCFFFFFFCFFCFF8FF8FFFFFF8FF8FFFCFFCFFFFCF
FCFFFF8FF8FFFF8FF8FFFFFCFFFFFFFFCFFFFFF8FFFFFFFF8FFFFFFFCFFFFFFC
FFFFFFFF8FFFFFF8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = balanceBtnClick
end
object recordBtn: TSpeedButton
Left = 424
Top = 72
Width = 25
Height = 25
Hint = '[R]ecord to WAV'
AllowAllUp = True
GroupIndex = 5
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777777777777
77777777777777777777777777FFFFF77777777777FFFFF777777777779999F7
77777777777777F7777777777999999F777777777777777F7777777899999999
F777777877777777F777777899999999F777777877777777F777777899999999
F777777877777777F777777899999999F777777877777777F777777889999997
7777777887777777777777778899997777777777887777777777777778888877
7777777778888877777777777777777777777777777777777777777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = recordBtnClick
end
object repeatBtn: TSpeedButton
Left = 208
Top = 40
Width = 25
Height = 25
Hint = 'Repeat mode'
AllowAllUp = True
GroupIndex = 2
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666666666666666666666666666666666666666666666
666666666666666666666CCCCCCCCCCCCCC6C66666666666666CC6666666C666
666C6CCCCC6CCCCCCCC666666666C66666666666666666666666666666666666
6666666666666666666666666666666666666666666666666666}
ParentShowHint = False
ShowHint = True
end
object introBtn: TSpeedButton
Left = 232
Top = 40
Width = 25
Height = 25
Hint = 'Intro mode'
AllowAllUp = True
GroupIndex = 6
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666666666666666666666666666666666666666666666
66666666666666666666C666666666666C66C666666666666CC6CCC66CCC66CC
CCCCC666666666666CC6C666666666666C666666666666666666666666666666
6666666666666666666666666666666666666666666666666666}
ParentShowHint = False
ShowHint = True
end
object shuffleBtn: TSpeedButton
Left = 256
Top = 40
Width = 25
Height = 25
Hint = 'Shuffle mode'
AllowAllUp = True
GroupIndex = 2
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666666
6666666666666666666666666666666666666666666666666666666666666666
66666CCCCCCCCCCCCCCCC666666666666666C6666C6666C666666CCCCCC66CCC
CCC666666C6666C6666C666666666666666CCCCCCCCCCCCCCCC6666666666666
6666666666666666666666666666666666666666666666666666}
ParentShowHint = False
ShowHint = True
end
object helpBtn: TSpeedButton
Left = 8
Top = 72
Width = 25
Height = 25
Hint = '[H]elp'
Glyph.Data = {
4E010000424D4E01000000000000760000002800000012000000120000000100
040000000000D800000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333366333
333333000000333333644633333333000000333333E664333333330000003333
333E663333333300000033333333333333333300000033333334463333333300
0000333333666433333333000000333333E66433333333000000333333E66643
3333330000003333333E666433333300000033333333E6664433330000003334
44333E666643330000003366664333E666433300000033E66664446666433300
0000333EE666666666633300000033333EE666666633330000003333333EEEEE
333333000000333333333333333333000000}
ParentShowHint = False
ShowHint = True
OnClick = helpBtnClick
end
object Image0: TImage
Left = 8
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image000.bmp>}
Visible = False
end
object Image1: TImage
Left = 32
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image001.bmp>}
Visible = False
end
object Image2: TImage
Left = 56
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image002.bmp>}
Visible = False
end
object Image3: TImage
Left = 80
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image003.bmp>}
Visible = False
end
object Image4: TImage
Left = 104
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image004.bmp>}
Visible = False
end
object Image5: TImage
Left = 128
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image005.bmp>}
Visible = False
end
object Image6: TImage
Left = 152
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image006.bmp>}
Visible = False
end
object Image7: TImage
Left = 176
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image007.bmp>}
Visible = False
end
object Image8: TImage
Left = 200
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image008.bmp>}
Visible = False
end
object Image9: TImage
Left = 224
Top = 0
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image009.bmp>}
Visible = False
end
object Image10: TImage
Left = 248
Top = 0
Width = 5
Height = 25
AutoSize = True
Picture.Data = {<image010.bmp>}
Visible = False
end
object skipBackBtn: TSpeedButton
Left = 208
Top = 8
Width = 25
Height = 25
Hint = 'Skip bac[k]'
AllowAllUp = True
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777777777777777777777777777777777778FF777777777
77FF8FF77777777777FF8CF777777777FFCF87F777777777FF7F8CF7777777FF
CCCF87F7777777FF777F8CF77777FFCCCCCF87F77777FF77777F8CF777FFCCCC
CCCF87F777FF7777777F8CF77FCCCCCCCCCF87F77F777777777F8CF788CCCCCC
CCCF87F788777777777F8CF77788CCCCCCCF87F777887777777F8CF7777788CC
CCCF87F777778877777F8CF777777788CCCF87F777777788777F8CF777777777
88CF87F777777777887F88F777777777778F88F777777777778F777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = skipBackBtnClick
end
object skipForwardBtn: TSpeedButton
Left = 232
Top = 8
Width = 25
Height = 25
Hint = 'Skip for[w]ard'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777777777777777777777777777777777777777777777778F7777777777
78FF8F777777777778FF8CFF7777777778CF87FF77777777787F8CCCFF777777
78CF8777FF777777787F8CCCCCFF777778CF877777FF7777787F8CCCCCCCFF77
78CF87777777FF77787F8CCCCCCCCCF778CF8777777777F7787F8CCCCCCCCC88
78CF877777777788787F8CCCCCCC887778CF877777778877787F8CCCCC887777
78CF877777887777787F8CCC8877777778CF877788777777787F8C8877777777
78CF878877777777787F887777777777788F887777777777788F777777777777
7777777777777777777777777777777777777777777777777777}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = skipForwardBtnClick
end
object playListBtn: TSpeedButton
Left = 256
Top = 8
Width = 25
Height = 25
Hint = 'Play[l]ist'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00900000000000
000090FFFFFFFFFFFFF090F787FFFFFFFFF090F808F4444444F090F787FFFFFF
FFF090FFFFFFFFFFFFF090F787FFFFFFFFF090F808F444444FF090F787FFFFFF
FFF090FFFFFFFFFFFFF090F787FFFFFFFFF090F808F4444444F090F787FFFFFF
FFF090FFFFFFFFFFFFF090000000000000009999999999999999}
ParentShowHint = False
ShowHint = True
OnClick = playListBtnClick
end
object optionsBtn: TSpeedButton
Left = 8
Top = 8
Width = 25
Height = 33
Hint = '[O]ptions'
Glyph.Data = {
56010000424D56010000000000007600000028000000100000001C0000000100
040000000000E000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00999999999900
999999999999900009999999999990FF09999999999990FF09999999999990FF
09999999999990FF09999999999990FF09999999999990FF09999999999000FF
099999990000F0FF099990000F0FF0FF000900F0FF0FF0FF0F000FF0FF0FF0FF
0FF00FF0FF0FF0FF0FF00FF0FF0FF0FF0FF00FFFFFFFFFFF0FF00FFFFFFFFFFF
FFF000FFFFFFFFFFFFF090FFFFFFFFFFFF00900FFFFFFFFFFF09990FFFFFFFFF
F009990FFFFFFFFF0099990FFFFFFFFF0999990FFFFFFFFF0999990FFFFFFFFF
0999990000000000099999900000000099999999999999999999}
Margin = 4
ParentShowHint = False
ShowHint = True
OnClick = optionsBtnClick
end
object minimizeButton: TSpeedButton
Left = 8
Top = 40
Width = 25
Height = 25
Hint = 'Minimize'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777778F77777777777778AAF7777777777778AAF77
7777777778AAAAF77777777778AAAAF7777777778AAAAAAF777777778AAAAAAF
77777778AAAAAAAAF7777778AAAAAAAAF777778AAAAAAAAAAF77778888888888
8877777777777777777777777777777777777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = minimizeButtonClick
end
object StatusBar: TStatusBar
Left = 0
Top = 103
Width = 457
Height = 19
Hint = 'Status'
Panels = <>
ParentShowHint = False
ShowHint = False
SimplePanel = True
SimpleText = 'Initializing,,,'
end
object volumeUpDown: TUpDown
Left = 320
Top = 40
Width = 25
Height = 25
Hint = 'Volume control [+, -]'
Min = 0
Max = 99
ParentShowHint = False
Position = 10
ShowHint = True
TabOrder = 1
Wrap = False
OnClick = volumeUpDownClick
end
object balanceUpDown: TUpDown
Left = 424
Top = 40
Width = 25
Height = 25
Hint = 'Balance control [<-, ->]'
Min = 0
Orientation = udHorizontal
ParentShowHint = False
Position = 50
ShowHint = True
TabOrder = 2
Wrap = False
OnClick = balanceUpDownClick
end
object balancePanel: TPanel
Left = 352
Top = 40
Width = 73
Height = 25
BevelOuter = bvLowered
TabOrder = 3
object balanceGauge: TGauge
Left = 2
Top = 2
Width = 69
Height = 21
Hint = 'Balance'
Color = clBlack
Kind = gkNeedle
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
BorderStyle = bsNone
BackColor = clAqua
ParentColor = False
ParentFont = False
ParentShowHint = False
Progress = 50
ShowHint = True
end
end
object volumePanel: TPanel
Left = 288
Top = 40
Width = 33
Height = 25
Hint = 'Volume'
BevelOuter = bvLowered
Caption = '1.0'
Color = clBlack
Font.Color = clAqua
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
object timePanel: TPanel
Left = 40
Top = 8
Width = 161
Height = 57
BevelOuter = bvLowered
Color = clBlack
TabOrder = 5
object ImageHiMin: TImage
Left = 8
Top = 8
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image011.bmp>}
end
object ImageLoMin: TImage
Left = 24
Top = 8
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image012.bmp>}
end
object ImageColon: TImage
Left = 46
Top = 8
Width = 5
Height = 25
AutoSize = True
Picture.Data = {<image013.bmp>}
end
object ImageHiSec: TImage
Left = 56
Top = 8
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image014.bmp>}
end
object ImageLoSec: TImage
Left = 72
Top = 8
Width = 17
Height = 25
AutoSize = True
Picture.Data = {<image015.bmp>}
end
object positionGauge: TGauge
Left = 8
Top = 40
Width = 145
Height = 12
Color = clBlack
Font.Color = clAqua
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ForeColor = clAqua
BackColor = clBlack
ParentColor = False
ParentFont = False
Progress = 30
end
object trackLbl: TLabel
Left = 106
Top = 8
Width = 33
Height = 13
Caption = 'Track'
Font.Color = clAqua
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object trackNr: TLabel
Left = 138
Top = 8
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '99'
Font.Color = clAqua
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object fileKindLabel: TLabel
Left = 128
Top = 21
Width = 23
Height = 13
Alignment = taRightJustify
Caption = 'MIDI'
Font.Color = clAqua
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
end
object recordPanel: TPanel
Left = 288
Top = 72
Width = 137
Height = 25
Alignment = taRightJustify
BevelOuter = bvLowered
ParentShowHint = False
ShowHint = False
TabOrder = 6
object wavLbl: TLabel
Left = 8
Top = 6
Width = 121
Height = 13
Hint = 'Destination WAV'
Alignment = taRightJustify
Caption = 'Test.WAV'
ParentShowHint = False
ShowHint = True
end
end
object MediaPlayer: TMediaPlayer
Left = 440
Top = 104
Width = 253
Height = 30
AutoRewind = False
Visible = False
TabOrder = 7
end
object Timer: TTimer
Enabled = False
OnTimer = TimerTimer
Left = 408
Top = 104
end
object bannerTimer: TTimer
Enabled = False
Interval = 60000
OnTimer = bannerTimerTimer
Left = 376
Top = 104
end
end