home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Vrtulník 3
/
Vrtulnik-3.bin
/
zvuk
/
wavmak24
/
_setup.1
/
WMWIN.EXE
/
0
/
RCDATA
/
TWMMAIN
/
TWMMAIN.txt
Wrap
Text File
|
1996-11-11
|
31KB
|
913 lines
object WMmain: TWMmain
Left = 0
Top = 0
BorderStyle = bsSingle
Caption = 'WAVmaker for Windows'
ClientHeight = 374
ClientWidth = 624
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Visible = True
OnActivate = FormActivate
OnClose = onClose
OnCreate = onCreate
OnPaint = FormPaint
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object SelectorBox: TGroupBox
Left = 8
Top = 8
Width = 73
Height = 249
Caption = 'Selector'
TabOrder = 0
object RadioButton8: TRadioButton
Left = 8
Top = 24
Width = 57
Height = 17
Caption = 'MID'
Checked = True
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
TabStop = True
OnClick = RadioButton8Click
end
object radioButton9: TRadioButton
Left = 8
Top = 56
Width = 57
Height = 17
Caption = 'LST'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = radioButton9Click
end
object RadioButton10: TRadioButton
Left = 8
Top = 88
Width = 57
Height = 17
Caption = 'Song'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = RadioButton10Click
end
object RadioButton11: TRadioButton
Left = 8
Top = 120
Width = 57
Height = 17
Caption = 'PRG'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = RadioButton11Click
end
object RadioButton12: TRadioButton
Left = 8
Top = 152
Width = 57
Height = 17
Caption = 'WAV'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = RadioButton12Click
end
object RadioButton13: TRadioButton
Left = 8
Top = 184
Width = 57
Height = 17
Caption = 'Temp'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = RadioButton13Click
end
object RadioButton14: TRadioButton
Left = 8
Top = 216
Width = 57
Height = 17
Caption = 'DFT'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = RadioButton14Click
end
end
object GroupBox2: TGroupBox
Left = 88
Top = 8
Width = 185
Height = 249
Caption = 'Directories'
TabOrder = 1
object Edit1: TEdit
Left = 8
Top = 24
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Text = 'Edit1'
OnClick = Edit1Click
OnExit = Edit1Click
OnKeyPress = Edit1KeyPress
end
object Edit2: TEdit
Left = 8
Top = 56
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Text = 'Edit2'
OnClick = Edit2Click
OnExit = Edit2Click
OnKeyPress = Edit2KeyPress
end
object Edit3: TEdit
Left = 8
Top = 88
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Text = 'Edit3'
OnClick = Edit3Click
OnExit = Edit3Click
OnKeyPress = Edit3KeyPress
end
object Edit4: TEdit
Left = 8
Top = 120
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
Text = 'Edit4'
OnClick = Edit4Click
OnExit = Edit4Click
OnKeyPress = Edit4KeyPress
end
object Edit5: TEdit
Left = 8
Top = 152
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
Text = 'Edit5'
OnClick = Edit5Click
OnExit = Edit5Click
OnKeyPress = Edit5KeyPress
end
object Edit6: TEdit
Left = 8
Top = 184
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Text = 'Edit6'
OnClick = Edit6Click
OnExit = Edit6Click
OnKeyPress = Edit6KeyPress
end
object Edit7: TEdit
Left = 8
Top = 216
Width = 137
Height = 24
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Text = 'Edit7'
OnClick = Edit7Click
OnExit = Edit7Click
OnKeyPress = Edit7KeyPress
end
object MIDbrowse: TBitBtn
Left = 152
Top = 24
Width = 25
Height = 25
TabOrder = 7
OnClick = MIDbrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
object LSTbrowse: TBitBtn
Left = 152
Top = 56
Width = 25
Height = 25
TabOrder = 8
OnClick = LSTbrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
object SongBrowse: TBitBtn
Left = 152
Top = 88
Width = 25
Height = 25
TabOrder = 9
OnClick = SongBrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
object PRGbrowse: TBitBtn
Left = 152
Top = 120
Width = 25
Height = 25
TabOrder = 10
OnClick = PRGbrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
object WAVbrowse: TBitBtn
Left = 152
Top = 152
Width = 25
Height = 25
TabOrder = 11
OnClick = WAVbrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
object TempBrowse: TBitBtn
Left = 152
Top = 184
Width = 25
Height = 25
TabOrder = 12
OnClick = TempBrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
object DFTbrowse: TBitBtn
Left = 152
Top = 216
Width = 25
Height = 25
TabOrder = 13
OnClick = DFTbrowseClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F7FF75500FFFFFF0F00105577F555FF7F77575550FF70000F
0F0055575FF777757F775555000FFFFF0F005555777555FF7F77555550FF7000
0F055555575FF777757F555555000FFFFF05555555777555FF7F55555550FF70
0005555555575FF7777555555555000555555555555577755555555555555555
55555555555555555555555555555555555555555555555555550000}
Layout = blGlyphRight
NumGlyphs = 2
end
end
object GroupBox4: TGroupBox
Left = 8
Top = 264
Width = 609
Height = 105
Caption = 'Operations'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
object BitBtn8: TBitBtn
Left = 96
Top = 19
Width = 80
Height = 38
Caption = 'Play'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BitBtn8Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF3333333333333003333333333333377F333333333333
30003FFFFFFFFFFFF77707777777777777707777777777777777033333333333
33307FFFFFFFFFFFFFF707777777700777707777777777777777030333333000
33307F7FFFFFF777FFF707770077777077707777777777777777030300033330
33307F7F777FFFF7FFF707777707777077777777777777777777033333033330
33337FFFFF7FFFF7FFFF07777707777077777777777777777777333333000000
3333333333777777F33333333303333033333333337FFFF7F333333333000000
33333333337777773333333333333333333333333333333333330000}
NumGlyphs = 2
end
object BitBtn5: TBitBtn
Left = 180
Top = 19
Width = 80
Height = 38
Caption = 'Scan'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn5Click
NumGlyphs = 2
end
object BitBtn6: TBitBtn
Left = 264
Top = 19
Width = 80
Height = 38
Caption = 'Edit'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = BitBtn6Click
NumGlyphs = 2
end
object BitBtn7: TBitBtn
Left = 348
Top = 19
Width = 80
Height = 38
Caption = 'Convert'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = BitBtn7Click
end
object BitBtn4: TBitBtn
Left = 520
Top = 19
Width = 80
Height = 38
Caption = 'Print'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = BitBtn4Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object BitBtn1: TBitBtn
Left = 180
Top = 60
Width = 80
Height = 38
Caption = 'Copy'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = BitBtn1Click
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 264
Top = 60
Width = 80
Height = 38
Caption = 'Move'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
OnClick = BitBtn2Click
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 348
Top = 60
Width = 80
Height = 38
Caption = 'Delete'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
OnClick = BitBtn3Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F33333333330000033333333333777773333330000}
NumGlyphs = 2
end
object HelpBtn: TBitBtn
Left = 8
Top = 19
Width = 80
Height = 38
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = HelpBtnClick
Kind = bkHelp
Margin = 2
Spacing = -1
IsControl = True
end
object BitBtn9: TBitBtn
Left = 520
Top = 60
Width = 80
Height = 38
Caption = 'Exit'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
OnClick = BitBtn9Click
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFF
FFFFFFFFFFFFF00FFFFFFFFFF030FFFFFFFFFFFFFFFFF030FFFFFFFF0330FFFF
FFFFFFFFFFFFF0330FFFFFFF00030FFFFFFFFFFFFFFF03000FFFFFFFFFF030FF
FFFFFFFFFFF030FFFFFFFFFFFFFF0300F0F0F0F0F0030FFFFFFFFFFFFFFFF030
000000000030FFFFFFFFFFFFFFFFFF0030303030300FFFFFFFFFFFFFFFFFFF03
33333333330FFFFFFFFFFFFFFFFFFF0333333333330FFFFFFFFFFFFFFFFFF000
333030333000FFFFFFFFFFFFFFFF00333330003333300FFFFFFFFFFFFFFF0333
3330003333330FFFFFFFFFFFFFFF03330033333003330FFFFFFFFFFFFFFF0330
0003330000330FFFFFFFFFFFFFFF03300003330000330FFFFFFFFFFFFFFF0033
0033333003300FFFFFFFFFFFFFFFF003333333333300FFFFFFFFFFFFFFFFFF03
33333333330FFFFFFFFFFFFFFFFFF030003333300030FFFFFFFFFFFFFFFF030F
F0000000FF030FFFFFFFFFFFF00030FFFFFFFFFFFFF03000FFFFFFFFF0330FFF
FFFFFFFFFFFF0330FFFFFFFFFF030FFFFFFFFFFFFFFF030FFFFFFFFFFFF00FFF
FFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
Layout = blGlyphRight
end
object mlBtn: TBitBtn
Left = 432
Top = 60
Width = 80
Height = 38
Caption = 'ML'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
OnClick = mlBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF005FF0FFFF0FFF
F0FF5FF7FFFF7FFFF7FF5FF0FFFF0FFFF0FF5FF7FFFF7FFFF7FF5FF0FFFF0FFF
F0FF5FF7FFFF7FFFF7FF5FF0FFFF0FFFF0FF5FF7FFFF7FFFF7FF5FF0FFFF0FFF
F0FF5FF7FFFF7FFFF7FF5FF0FFFF0FFFF0FF5FF7FFFF7FFFF7FF5F000FF000FF
000F5F777FF777FF777F5F000FF000FF000F5F777FF777FF777F5F000FF000FF
000F5F777FF777FF777F5F000FF000FF000F5F777FF777FF777F5F000FF000FF
000F5F777FF777FF777F5F000FF000FF000F5F777FF777FF777F5F000FF000FF
000F5F777FF777FF777F5F000FF000FF000F5F777FF777FF777F5F000FF000FF
000F5F777FF777FF777F55555555555555555555555555555555}
NumGlyphs = 2
end
object mnBtn: TBitBtn
Left = 432
Top = 19
Width = 80
Height = 38
Caption = 'MN'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = mnBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000CE0E0000D80E00000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666660006660
0066600066600066666666660888060888060888060888066666666088088088
0880880880880880666600000888000888000888000888000000000000000000
0000000000000000000000000000000000000000000000000000000008888888
88888888888888888006000000000000000000000000000000060F0FFF000000
000000000000000000B60F0F0F000000000000000000000000060F0FFF000000
0000000000000000066600000000660000666000066000066666606666006660
0666600006600006666660666600666666666600666000066666000000006666
6666666666000000666666666666666666666666666600666666}
end
object Button1: TBitBtn
Left = 8
Top = 60
Width = 80
Height = 38
Caption = 'About...'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = Button1Click
end
object BitBtn10: TBitBtn
Left = 96
Top = 60
Width = 80
Height = 38
Caption = 'Iconize'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = BitBtn10Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337F33333333333333033333333333333373F333333333333090333
33333333337F7F33333333333309033333333333337373F33333333330999033
3333333337F337F33333333330999033333333333733373F3333333309999903
333333337F33337F33333333099999033333333373333373F333333099999990
33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F333333333333000333333333333377733333330000}
NumGlyphs = 2
end
end
object GroupBox3: TGroupBox
Left = 280
Top = 8
Width = 337
Height = 249
Caption = 'Files'
TabOrder = 2
object DriveComboBox1: TDriveComboBox
Left = 8
Top = 24
Width = 105
Height = 22
DirList = DirectoryListBox1
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object DirectoryListBox1: TDirectoryListBox
Left = 8
Top = 56
Width = 105
Height = 185
FileList = FileListBox1
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 16
ParentFont = False
TabOrder = 1
end
object FilterComboBox1: TFilterComboBox
Left = 120
Top = 216
Width = 169
Height = 24
FileList = FileListBox1
Filter =
'All files (*.*)|*.*|MID (*.MID)|*.MID|LST (*.LST)|*.LST|WAV (*.W' +
'AV)|*.WAV|PRG (*.PRG)|*.PRG|DFT (*.DFT)|*.DFT'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnChange = FilterComboBox1Change
end
object updateBtn: TBitBtn
Left = 296
Top = 215
Width = 33
Height = 26
TabOrder = 4
OnClick = updateBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
3333333777333777FF33339993707399933333773337F3777FF3399933000339
9933377333777F3377F3399333707333993337733337333337FF993333333333
399377F33333F333377F993333303333399377F33337FF333373993333707333
333377F333777F333333993333101333333377F333777F3FFFFF993333000399
999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
99933773FF777F3F777F339993707399999333773F373F77777F333999999999
3393333777333777337333333999993333333333377777333333}
NumGlyphs = 2
end
object FileListBox1: TExtFileListBox
Left = 120
Top = 24
Width = 209
Height = 185
Font.Color = clBlack
Font.Height = -15
Font.Name = 'System'
Font.Style = [fsBold]
ItemHeight = 16
MultiSelect = True
ParentFont = False
ShowGlyphs = True
TabOrder = 2
OnChange = FileListBox1Change
OnClick = FileListBox1Click
ShowDate = False
ShowTime = False
SizePos = -8
end
end
object printBtn: TBitBtn
Left = 544
Top = 0
Width = 81
Height = 33
Caption = 'Print'
TabOrder = 4
Visible = False
OnClick = BitBtn4Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object recBtn: TBitBtn
Left = 464
Top = 0
Width = 80
Height = 33
Caption = 'Record'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
Visible = False
OnClick = BitBtn10Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E99999999999
99E338888888888888F3E9F88888888889E338F33333333338F3E9F333333333
89E338F33333333338F3E9F33333333389E338F3333FFF3338F3E9F338999833
89E338F333888FF338F3E9F33999993389E338F3388888F338F3E9F339999933
89E338F3388888F338F3E9F33999993389E338F33888883338F3E9F338999833
89E338F33388833338F3E9F33333333389E338F33333333338F3E9F333333333
89E338F33333333338F3E9FFFFFFFFFFF9E338FFFFFFFFFFF8F3E99999999999
99E33888888888888833EEEEEEEEEEEEEEE33333333333333333}
NumGlyphs = 2
end
object minBtn: TBitBtn
Left = 384
Top = 0
Width = 80
Height = 33
Caption = 'Iconize'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Visible = False
OnClick = BitBtn10Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337F33333333333333033333333333333373F333333333333090333
33333333337F7F33333333333309033333333333337373F33333333330999033
3333333337F337F33333333330999033333333333733373F3333333309999903
333333337F33337F33333333099999033333333373333373F333333099999990
33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F33333333333309033333333333337F7F333333333333090333
33333333337F7F333333333333000333333333333377733333330000}
NumGlyphs = 2
end
object PrintDialog1: TPrintDialog
MaxPage = 100
Options = [poPrintToFile, poPageNums, poWarning]
Left = 600
Top = 256
end
end