home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 September (Special)
/
Chip-Special_2004-09_Digitalni-Hudba.bin
/
hudba
/
producer
/
musicsproducer120b2.exe
/
musicstd
/
PLAYBIN.DLL
/
RCDATA
/
TMAIN
/
TMAIN.txt
< prev
Wrap
Text File
|
2004-04-09
|
106KB
|
3,107 lines
object Main: TMain
Left = 42
Top = 363
Width = 888
Height = 322
Hint = '$7FFFFFFF'
HelpContext = 1000
HorzScrollBar.Visible = False
Color = clAppWorkSpace
Ctl3D = False
DockSite = True
Font.Charset = SHIFTJIS_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = '�l�r �S�V�b�N'
Font.Style = []
FormStyle = fsMDIForm
KeyPreview = True
Menu = MainMenu1
OldCreateOrder = True
Position = poDefault
Scaled = False
WindowState = wsMaximized
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnMouseMove = FormMouseMove
OnMouseUp = FormMouseUp
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Im_Wall: TImage
Left = 352
Top = 117
Width = 81
Height = 76
AutoSize = True
Visible = False
end
object PB_Level: TPaintBox
Left = 786
Top = 100
Width = 94
Height = 57
Align = alRight
Visible = False
OnMouseDown = PB_LevelMouseDown
OnPaint = PB_LevelPaint
end
object Im_LevelON: TImage
Left = 1608
Top = 152
Width = 80
Height = 77
AutoSize = True
Visible = False
end
object Im_LevelOFF: TImage
Left = 1648
Top = 192
Width = 80
Height = 77
AutoSize = True
Visible = False
end
object Sp_Debug: TSplitter
Left = 0
Top = 157
Width = 880
Height = 3
Cursor = crVSplit
Align = alBottom
Visible = False
end
object Pa_Status: TStatusBar
Left = 0
Top = 249
Width = 880
Height = 19
Panels = <
item
Text = 'La_Status'
Width = 880
end
item
Text = 'Undo'
Width = 34
end>
ParentFont = True
SimplePanel = False
UseSystemFont = False
end
object Pa_Control: TPanel
Left = 0
Top = 31
Width = 880
Height = 69
Align = alTop
BevelOuter = bvNone
Ctl3D = True
ParentCtl3D = False
TabOrder = 0
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object Pa_Loop: TPanel
Left = 704
Top = 0
Width = 137
Height = 69
Align = alLeft
TabOrder = 0
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object Bu_Offset: TSpeedButton
Left = 24
Top = 8
Width = 25
Height = 17
Hint = '$40000843'
Glyph.Data = {
12010000424D12010000000000007600000028000000110000000D0000000100
0400000000009C00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777700000007777777777777777700000007770077777777777700000007707
7077777707777000000070777707777700777000000070777707777700077000
0000707777070000000070000000707777077777000770000000707777077777
0077700000007707707777770777700000007770077777777777700000007777
77777777777770000000777777777777777770000000}
OnClick = Bu_OffsetClick
end
object La_Offset: TLabel
Tag = 10
Left = 52
Top = 10
Width = 77
Height = 13
Caption = '0000:00:000'
OnClick = La_OffsetClick
end
object Bu_LoopStart: TSpeedButton
Left = 24
Top = 26
Width = 25
Height = 17
Hint = '$40000844'
Glyph.Data = {
12010000424D12010000000000007600000028000000110000000D0000000100
0400000000009C00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777700000007777777777777777700000007000000000000000700000007777
7707777777777000000077777000777777777000000077770000077777777000
0000777000000077777770000000777777077777777770000000777777077777
7777700000007777770777777777700000007777770000000000700000007777
77777777777770000000777777777777777770000000}
OnClick = Bu_LoopStartClick
end
object La_LoopStart: TLabel
Tag = 11
Left = 52
Top = 28
Width = 77
Height = 13
Caption = '0000:00:000'
OnClick = La_OffsetClick
end
object Bu_LoopEnd: TSpeedButton
Left = 24
Top = 44
Width = 25
Height = 17
Hint = '$40000845'
Glyph.Data = {
12010000424D12010000000000007600000028000000110000000D0000000100
0400000000009C00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777700000007777777777777777700000007000000000000000700000007777
7777770777777000000077777777770777777000000077770777770777777000
0000777007777707777770000000770007777707777770000000700000000007
7777700000007700077777777777700000007770077777777777700000007777
07777777777770000000777777777777777770000000}
OnClick = Bu_LoopEndClick
end
object La_LoopEnd: TLabel
Tag = 12
Left = 52
Top = 46
Width = 77
Height = 13
Caption = '0000:00:000'
OnClick = La_OffsetClick
end
object Ch_Offset: TCheckBox
Left = 8
Top = 8
Width = 13
Height = 17
Hint = '$40000840'
TabStop = False
Caption = 'Ch_Offset'
TabOrder = 0
OnClick = Ch_OffsetClick
end
object Ch_LoopStart: TCheckBox
Left = 8
Top = 26
Width = 13
Height = 17
Hint = '$40000841'
TabStop = False
Caption = 'Ch_LoopStart'
TabOrder = 1
OnClick = Ch_LoopStartClick
end
object Ch_LoopEnd: TCheckBox
Left = 8
Top = 44
Width = 13
Height = 17
Hint = '$40000842'
TabStop = False
Caption = 'Ch_LoopEnd'
TabOrder = 2
OnClick = Ch_LoopEndClick
end
end
object Pa_WButton: TPanel
Left = 841
Top = 0
Width = 183
Height = 69
Align = alLeft
TabOrder = 1
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object Bu_CPlay: TSpeedButton
Left = 120
Top = 8
Width = 25
Height = 25
Hint = '$40000413'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333330003333333333333333333330003333333333333333333330003033
3300030330333033300030333303330330333033300030003303330000333033
3000303303033303303303033000303303033303303033303000300033033330
0330333030003333333333333333333330003333333333333333333330003300
0033333333333333300030033003333333333333300030333333333333333333
3000303333333333333333333000303333333333333333333000300330033333
3333333330003300003333333333333330003333333333333333333330003333
33333333333333333000333333333333333333333000}
OnClick = MW_CPlayClick
end
object Bu_AEntry: TSpeedButton
Left = 120
Top = 36
Width = 25
Height = 25
Hint = '$40000415'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333330003000000000333333303330003033033333333333030330003033
0333333333303330300030000000003033303330300030330333333033303333
3000303303333333030333333000300000000033303333333000303303333333
3333333330003033033333033333333330003000000000000000000030003033
0333330333333333300030330333330333333333300030000000000000000000
300030FF0FFFFF0FFFFFFFFF300030FF0FFFFF0FFFFFFFFF3000300000000000
0000000030003088088888088888888830003088088888088888888830003000
00000000000000003000333333333333333333333000}
OnClick = MW_WaveClick
end
object Bu_AMixer: TSpeedButton
Left = 64
Top = 36
Width = 25
Height = 25
Hint = '$40000414'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777770007778887777777770777070007700088777777770000070007000
00877777777077707000700F00877777777077707000700F0077777777770007
7000770F07777777777777777000777777777777888777777000777777777770
0087777770007788888888800088888870007000000000000000000770007777
7777777000877777700077777777777000777777700077777777777777777777
7000777777788877777777777000777777000877777777777000778888000888
8888888870007000000000000000000770007777770008777777777770007777
77000777777777777000777777777777777777777000}
OnClick = MW_AMixerClick
end
object Bu_Mixer: TSpeedButton
Left = 64
Top = 8
Width = 25
Height = 25
Hint = '$40000412'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777770007778887777777770777070007700088777777770777070007000
00877777777070707000700F00877777777007007000700F0077777777707770
7000770F07777777777777777000777777777777888777777000777777777770
0087777770007788888888800088888870007000000000000000000770007777
7777777000877777700077777777777000777777700077777777777777777777
7000777777788877777777777000777777000877777777777000778888000888
8888888870007000000000000000000770007777770008777777777770007777
77000777777777777000777777777777777777777000}
OnClick = MW_MixerClick
end
object Bu_Track: TSpeedButton
Left = 36
Top = 8
Width = 25
Height = 25
Hint = '$40000410'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333330003000000000000030333030003033033333033330333030003033
0333330333303030300030000000000000300300300030330333330333303330
3000303303333303333333333000300000000000000000003000303303333303
3333333330003033033333033333333330003000000000000000000030003033
0333330333333333300030330333330333333333300030000000000000000000
300030FF0FFFFF0FFFFFFFFF300030FF0FFFFF0FFFFFFFFF3000300000000000
0000000030003088088888088888888830003088088888088888888830003000
00000000000000003000333333333333333333333000}
OnClick = MW_TrackClick
end
object Bu_ATrack: TSpeedButton
Left = 36
Top = 36
Width = 25
Height = 25
Hint = '$40000411'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333330003000000000000030333030003033033333033330000030003033
0333330333303330300030000000000000303330300030330333330333330003
3000303303333303333333333000300000000000000000003000303303333303
3333333330003033033333033333333330003000000000000000000030003033
0333330333333333300030330333330333333333300030000000000000000000
300030FF0FFFFF0FFFFFFFFF300030FF0FFFFF0FFFFFFFFF3000300000000000
0000000030003088088888088888888830003088088888088888888830003000
00000000000000003000333333333333333333333000}
OnClick = MW_ATrackClick
end
object Bu_Proj: TSpeedButton
Left = 8
Top = 36
Width = 25
Height = 25
Hint = '$40000241'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333330003333330303333333033330003333300003033330030330003000
0000000000000003300033333000030333300303300033333303033333330333
3000333333333333333333333000333303333030333033333000333003030000
0300033330003000000000000000000330003330030300000300033330003333
0333303033303333300033333333333333333333300033333333333333333333
3000303333033033003330333000303333033030330303033000300033000330
3303330330003033030330303303330330003000330003330033300030003333
33333333333333333000333333333333333333333000}
OnClick = Bu_ProjClick
end
object Bu_Song: TSpeedButton
Left = 8
Top = 8
Width = 25
Height = 25
Hint = '$40000240'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC00000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333330003333333333333333333330003333300333333003333330003333
0000333300003333300033333000333330003333300033333330333333303333
3000333333303333333033333000333333303333333033333000333333303333
3330333330003333333000000000333330003333333033333330333330003333
3330000000003333300033333333333333333333300033333333333333333333
3000300033300330330330303000333303033030330303003000330033033030
3003033330003033330330300303033030003300033003303303300330003333
33333333333333333000333333333333333333333000}
OnClick = Bu_SongClick
end
object Bu_XYMIDI: TSpeedButton
Left = 92
Top = 8
Width = 25
Height = 25
Hint = '$40000424'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777770007077707770777770777070007707077770777770777070007770
7777707777707070700077070777070777700700700070777070777077707770
7000777777777777777777777000777777777777777777777000778888888888
8888888870007000000000000000000870007044444444644444440870007044
444444644664440870007044444444646EE6440870007044466444646EE64408
700070666EE6666666666608700070446EE64464444444087000704446644464
4444440870007044444444644444440870007044444444644444440870007000
00000000000000077000777777777777777777777000}
OnClick = MW_XYMixerMIDIClick
end
object Bu_XYAudio: TSpeedButton
Left = 92
Top = 36
Width = 25
Height = 25
Hint = '$40000425'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777770007077707770777770777070007707077770777770000070007770
7777707777707770700077070777070777707770700070777070777077770007
7000777777777777777777777000777777777777777777777000778888888888
8888888870007000000000000000000870007044444444644444440870007044
444444644664440870007044444444646EE6440870007044466444646EE64408
700070666EE6666666666608700070446EE64464444444087000704446644464
4444440870007044444444644444440870007044444444644444440870007000
00000000000000077000777777777777777777777000}
OnClick = MW_XYMixerAudioClick
end
object Bu_SCMix: TSpeedButton
Left = 148
Top = 36
Width = 25
Height = 25
Hint = '$40000426'
Glyph.Data = {
72010000424D7201000000000000760000002800000015000000150000000100
040000000000FC000000C40E0000C40E00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777770007778788888888888777770007708030303030308777770007708
0303030303088888700077022222222222222228700073002233332222222228
7000730032222223300323287000770223300032200323287000770222200022
3223232870007300222000332233232870007300333222222222232870007702
2222233333333327700077022222222222222227700077087777777777777777
7000770877077707070777077000770887077707077070777000770077070707
0777077770007777770070070770707770007777770777070707770770007777
77777777777777777000777777777777777777777000}
OnClick = MW_SCMixClick
end
end
object Pa_End: TPanel
Left = 1706
Top = 0
Width = 138
Height = 69
Align = alClient
TabOrder = 2
end
object Pa_NoteNum: TPanel
Left = 1024
Top = 0
Width = 97
Height = 69
Align = alLeft
TabOrder = 3
object Bevel1: TBevel
Left = 8
Top = 28
Width = 81
Height = 34
end
object La_NoteNum: TLabel
Left = 64
Top = 12
Width = 24
Height = 13
Hint = '���݂̔�������\�����܂�'
Alignment = taRightJustify
AutoSize = False
Caption = '0'
end
object Bu_AllNoteOff: TSpeedButton
Left = 8
Top = 8
Width = 49
Height = 17
Hint = '$40000610'
Caption = 'PANIC'
OnClick = MH_AllNoteOffClick
end
object PB_NoteNum: TPaintBox
Left = 9
Top = 29
Width = 79
Height = 32
Hint = '$40000846'
OnPaint = PB_NoteNumPaint
end
end
object Pa_CPU: TPanel
Left = 1425
Top = 0
Width = 120
Height = 69
Align = alLeft
TabOrder = 4
object Label2: TLabel
Left = 8
Top = 28
Width = 28
Height = 13
Caption = 'HDD:'
end
object Label10: TLabel
Left = 8
Top = 8
Width = 28
Height = 13
Caption = 'CPU:'
end
object Label14: TLabel
Left = 8
Top = 48
Width = 28
Height = 13
Caption = 'Buf:'
end
object Bevel2: TBevel
Left = 40
Top = 7
Width = 72
Height = 15
end
object Bevel3: TBevel
Left = 40
Top = 27
Width = 72
Height = 15
end
object Bevel5: TBevel
Left = 40
Top = 47
Width = 72
Height = 15
end
object PB_NSP: TPaintBox
Left = 41
Top = 8
Width = 70
Height = 13
OnPaint = PB_BarPaint
end
object PB_FileBuf: TPaintBox
Left = 41
Top = 28
Width = 70
Height = 13
OnPaint = PB_BarPaint
end
object PB_Buf: TPaintBox
Left = 41
Top = 48
Width = 70
Height = 13
OnPaint = PB_BarPaint
end
end
object Pa_Spectrum: TPanel
Left = 1121
Top = 0
Width = 211
Height = 69
Align = alLeft
TabOrder = 5
object Bevel4: TBevel
Left = 8
Top = 28
Width = 195
Height = 34
end
object PB_Spectrum: TPaintBox
Left = 9
Top = 29
Width = 193
Height = 32
Hint = '$40000218'
OnPaint = PB_SpectrumPaint
end
object Label5: TLabel
Left = 8
Top = 8
Width = 91
Height = 13
Caption = 'MIDI Spectrum'
end
object Im_Spectrum: TImage
Left = 180
Top = 13
Width = 16
Height = 32
AutoSize = True
Picture.Data = {<image000.bmp>}
Visible = False
end
end
object Pa_Screen: TPanel
Left = 1545
Top = 0
Width = 161
Height = 69
Align = alLeft
TabOrder = 6
object Label6: TLabel
Left = 8
Top = 12
Width = 91
Height = 13
Caption = 'Screen Memory'
end
object Bu_Store: TSpeedButton
Left = 106
Top = 8
Width = 23
Height = 23
Hint = '$40000870'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010444444444401001044444444440100104444444444010010444444444
4010010444444444401001044444444440100000000000000000}
OnClick = Bu_StoreClick
end
object Bu_Delete: TSpeedButton
Left = 130
Top = 8
Width = 23
Height = 23
Hint = '$40000871'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111111111111111111110011111111110011100111111110011111001111110
0111111100111100111111111001100111111111110000111111111111100111
1111111111000011111111111001100111111111001111001111111001111110
0111110011111111001110011111111110011111111111111111}
OnClick = Bu_DeleteClick
end
object Co_Preset: TComboBox
Left = 8
Top = 40
Width = 145
Height = 21
Hint = '$40000872'
ItemHeight = 13
TabOrder = 0
OnClick = Co_PresetClick
end
end
object Pa_Sig: TPanel
Left = 1332
Top = 0
Width = 93
Height = 69
Align = alLeft
TabOrder = 7
object SpeedButton1: TSpeedButton
Left = 48
Top = 8
Width = 33
Height = 17
Hint = '$40000851'
GroupIndex = 1
Caption = 'Dev'
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 8
Top = 8
Width = 33
Height = 17
Hint = '$40000850'
GroupIndex = 1
Down = True
Caption = 'Ch'
OnClick = SpeedButton2Click
end
object PB_Sig: TPaintBox
Left = 8
Top = 32
Width = 77
Height = 29
Hint = '$40000852'
OnPaint = PB_SigPaint
end
object Im_Sig: TImage
Left = 72
Top = 48
Width = 16
Height = 16
AutoSize = True
Picture.Data = {<image001.bmp>}
Visible = False
end
end
object Pa_Ctrl: TPanel
Left = 0
Top = 0
Width = 289
Height = 69
Align = alLeft
TabOrder = 8
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object La_Measure: TLabel
Tag = 100
Left = 4
Top = 1
Width = 61
Height = 25
Alignment = taRightJustify
AutoSize = False
Caption = '0000'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -25
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
OnClick = La_MeasureClick
end
object Label3: TLabel
Tag = 101
Left = 67
Top = -1
Width = 7
Height = 30
Caption = ':'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -25
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnClick = La_MeasureClick
end
object La_Beat: TLabel
Tag = 101
Left = 72
Top = 1
Width = 31
Height = 25
Alignment = taRightJustify
AutoSize = False
Caption = '00'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -25
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
OnClick = La_MeasureClick
end
object Label4: TLabel
Tag = 102
Left = 104
Top = -1
Width = 7
Height = 30
Caption = ':'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -25
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnClick = La_MeasureClick
end
object La_Tick: TLabel
Tag = 102
Left = 109
Top = 1
Width = 46
Height = 25
Alignment = taRightJustify
AutoSize = False
Caption = '000'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -25
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
OnClick = La_MeasureClick
end
object La_Hour: TLabel
Tag = 200
Left = 179
Top = 6
Width = 21
Height = 19
Alignment = taRightJustify
AutoSize = False
Caption = '00'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = La_MeasureClick
end
object Label7: TLabel
Tag = 201
Left = 199
Top = 5
Width = 6
Height = 23
Caption = ':'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = True
OnClick = La_MeasureClick
end
object La_Minu: TLabel
Tag = 201
Left = 206
Top = 6
Width = 21
Height = 19
Alignment = taRightJustify
AutoSize = False
Caption = '00'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = La_MeasureClick
end
object Label8: TLabel
Tag = 202
Left = 226
Top = 5
Width = 6
Height = 23
Caption = ':'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = True
OnClick = La_MeasureClick
end
object La_Sec: TLabel
Tag = 202
Left = 232
Top = 6
Width = 22
Height = 19
Alignment = taRightJustify
AutoSize = False
Caption = '00'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = La_MeasureClick
end
object Label9: TLabel
Tag = 203
Left = 253
Top = 5
Width = 6
Height = 23
Caption = ':'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = True
OnClick = La_MeasureClick
end
object La_Clo: TLabel
Tag = 203
Left = 260
Top = 6
Width = 21
Height = 19
Alignment = taRightJustify
AutoSize = False
Caption = '00'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = La_MeasureClick
end
object Bu_Rec: TSpeedButton
Left = 212
Top = 28
Width = 69
Height = 17
Hint = '$40000807'
AllowAllUp = True
GroupIndex = 3
Caption = 'Midi'
Glyph.Data = {
3E020000424D3E0200000000000036000000280000000D0000000D0000000100
1800000000000802000000000000000000000000000000000000008080008080
0080800080800080800080800080800080800080800080800080800080800080
80000080800080800080800080800000FF0000FF0000FF0000FF0000FF008080
008080008080008080000080800080800080800000FF0000FF0000FF0000FF00
00FF0000FF0000FF008080008080008080000080800080800000FF0000FF0000
FF0000FF0000FF0000FF0000FF0000FF0000FF008080008080000080800000FF
0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0080
80000080800000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF
0000FF0000FF008080000080800000FF0000FF0000FF0000FF0000FF0000FF00
00FF0000FF0000FF0000FF0000FF008080000080800000FF0000FF0000FF0000
FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF008080000080800000FF
0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0080
80000080800080800000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF
0000FF008080008080000080800080800080800000FF0000FF0000FF0000FF00
00FF0000FF0000FF008080008080008080000080800080800080800080800000
FF0000FF0000FF0000FF0000FF00808000808000808000808000008080008080
0080800080800080800080800080800080800080800080800080800080800080
8000}
OnClick = Bu_RecClick
end
object Bu_SetRec: TSpeedButton
Left = 212
Top = 44
Width = 69
Height = 17
Hint = '$40000520'
AllowAllUp = True
Caption = 'Set'
OnClick = Bu_SetRecClick
end
object Bu_BackStep: TSpeedButton
Left = 8
Top = 28
Width = 29
Height = 17
Hint = '$40000800'
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000080C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0C0C0C0C0C0C0000080000080C0C0
C0C0C0C0C0C0C0C0C0C0000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0C0C0C0000080000080000080C0C0
C0C0C0C0C0C0C0000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0000080000080000080000080C0C0
C0C0C0C0000080000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0000080000080000080000080000080C0C0
C0000080000080000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C00000800000800000800000800000800000800000800000800000800000
80000080000080000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0000080000080000080000080000080C0C0
C0000080000080000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0000080000080000080000080C0C0
C0C0C0C0000080000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0C0C0C0000080000080000080C0C0
C0C0C0C0C0C0C0000080000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0C0C0C0C0C0C0000080000080C0C0
C0C0C0C0C0C0C0C0C0C0000080000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0000080000080000080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0000080C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0000080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
Layout = blGlyphRight
OnClick = Bu_BackStepClick
end
object Bu_Rew: TSpeedButton
Left = 36
Top = 28
Width = 29
Height = 17
Hint = '$40000801'
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800080C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800080800080C0C0C0C0C0C0C0C0
C0C0C0C0800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800080800080800080C0C0C0C0C0C0C0C0
C0800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0800080800080800080800080C0C0C0C0C0C08000
80800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0800080800080800080800080800080C0C0C08000808000
80800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C08000808000808000808000808000808000808000808000808000
80800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0800080800080800080800080800080C0C0C08000808000
80800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0800080800080800080800080C0C0C0C0C0C08000
80800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800080800080800080C0C0C0C0C0C0C0C0
C0800080800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800080800080C0C0C0C0C0C0C0C0
C0C0C0C0800080800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800080C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0800080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnMouseDown = Bu_RewMouseDown
OnMouseUp = Bu_RewMouseUp
end
object Bu_Stop: TSpeedButton
Left = 64
Top = 28
Width = 29
Height = 17
Hint = '$40000802'
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C08000008000008000008000008000008000008000008000
00800000800000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnClick = Bu_StopClick
end
object Bu_Play0: TSpeedButton
Left = 92
Top = 28
Width = 29
Height = 17
Hint = '$40000803'
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C0808000C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C0808000808000C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00808000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00808000808000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00808000808000808000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00808000808000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00808000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C08080008080008080
00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C0808000808000C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0808000808000808000C0C0C0C0C0C0808000C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnClick = Bu_Play0Click
end
object Bu_Play: TSpeedButton
Left = 120
Top = 28
Width = 29
Height = 17
Hint = '$40000804'
AllowAllUp = True
GroupIndex = 1
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000008000C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000008000008000C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000008000008000008000C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00080000080000080000080000080
00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00080000080000080000080000080
00008000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00080000080000080000080000080
00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000008000008000008000C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000008000008000C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000008000C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008000C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnClick = Bu_PlayClick
end
object Bu_FF: TSpeedButton
Left = 148
Top = 28
Width = 29
Height = 17
Hint = '$40000805'
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008080C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080C0C0C0C0C0C0C0C0C0C0C0C00080800080
80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080008080C0C0C0C0C0C0C0C0C00080800080
80008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080008080008080C0C0C0C0C0C00080800080
80008080008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080008080008080008080C0C0C00080800080
80008080008080008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C00080800080800080800080800080800080800080800080
80008080008080008080008080C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080008080008080008080C0C0C00080800080
80008080008080008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080008080008080C0C0C0C0C0C00080800080
80008080008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080008080C0C0C0C0C0C0C0C0C00080800080
80008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080008080C0C0C0C0C0C0C0C0C0C0C0C00080800080
80C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0008080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0008080C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnClick = Bu_FFClick
OnMouseDown = Bu_FFMouseDown
OnMouseUp = Bu_FFMouseUp
end
object Bu_NextStep: TSpeedButton
Left = 176
Top = 28
Width = 29
Height = 17
Hint = '$40000806'
Flat = True
Glyph.Data = {
76030000424D76030000000000003600000028000000150000000D0000000100
1800000000004003000000000000000000000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0004080C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080C0C0C0C0C0C0C0C0C0C0C0C0004080004080C0C0C0C0C0
C0C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080004080C0C0C0C0C0C0C0C0C0004080004080004080C0C0
C0C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080004080004080C0C0C0C0C0C00040800040800040800040
80C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080004080004080004080C0C0C00040800040800040800040
80004080C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C00040800040800040800040800040800040800040800040800040800040
80004080004080004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080004080004080004080C0C0C00040800040800040800040
80004080C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080004080004080C0C0C0C0C0C00040800040800040800040
80C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080004080C0C0C0C0C0C0C0C0C0004080004080004080C0C0
C0C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080004080C0C0C0C0C0C0C0C0C0C0C0C0004080004080C0C0C0C0C0
C0C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0004080C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0004080C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0004080004080004080C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
OnClick = Bu_NextStepClick
end
object Sc_Shattle: TScrollBar
Left = 8
Top = 48
Width = 197
Height = 13
Hint = '$40000808'
Ctl3D = False
LargeChange = 10
Max = 80
Min = -80
PageSize = 0
ParentCtl3D = False
TabOrder = 0
TabStop = False
OnChange = Sc_ShattleChange
OnScroll = Sc_ShattleScroll
end
end
object Pa_Loc: TPanel
Left = 289
Top = 0
Width = 97
Height = 69
Align = alLeft
TabOrder = 9
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object Bu_SetPos: TSpeedButton
Left = 8
Top = 28
Width = 17
Height = 17
Visible = False
end
object Ch_SetPosition: TCheckBox
Left = 8
Top = 8
Width = 81
Height = 17
Hint = '$40000810'
TabStop = False
Caption = 'SetLoc'
TabOrder = 0
OnClick = Ch_SetPositionClick
end
end
object Pa_TMK: TPanel
Left = 386
Top = 0
Width = 54
Height = 69
Align = alLeft
TabOrder = 10
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object La_MeterT: TLabel
Left = 36
Top = 22
Width = 14
Height = 13
Hint = '$40000821'
Alignment = taCenter
AutoSize = False
Caption = '4'
Transparent = True
OnClick = La_MeterTClick
end
object La_LaTempo: TLabel
Left = 8
Top = 8
Width = 14
Height = 13
Hint = '$40000820'
Caption = 'T='
OnClick = La_LaTempoClick
end
object La_Tempo: TLabel
Left = 28
Top = 8
Width = 21
Height = 13
Hint = '$40000820'
Alignment = taRightJustify
AutoSize = False
Caption = '120'
OnClick = La_TempoClick
end
object La_LaMet: TLabel
Left = 8
Top = 28
Width = 28
Height = 13
Hint = '$40000821'
Caption = 'Met='
OnClick = La_LaMetClick
end
object La_MeterB: TLabel
Left = 36
Top = 34
Width = 14
Height = 13
Hint = '$40000821'
Alignment = taCenter
AutoSize = False
Caption = '4'
Transparent = True
OnClick = La_MeterBClick
end
object La_LaKey: TLabel
Left = 9
Top = 48
Width = 14
Height = 13
Hint = '$40000822'
Caption = 'K='
OnClick = La_LaKeyClick
end
object La_Key: TLabel
Left = 28
Top = 48
Width = 21
Height = 13
Hint = '$40000822'
Alignment = taCenter
AutoSize = False
Caption = 'C'
OnClick = La_KeyClick
end
object Label12: TLabel
Left = 36
Top = 22
Width = 14
Height = 13
Hint = '$40000821'
Alignment = taCenter
AutoSize = False
Caption = '_'
Transparent = True
OnClick = La_MeterTClick
end
object Ed_Tempo: TEdit
Left = 8
Top = 4
Width = 28
Height = 21
Hint = '$40000823'
MaxLength = 3
TabOrder = 0
Text = '5'
Visible = False
OnChange = Ed_TempoChange
OnExit = Ed_TempoExit
end
object Sc_Tempo: TUpDown
Left = 36
Top = 4
Width = 16
Height = 21
Associate = Ed_Tempo
Min = 5
Max = 500
Position = 5
TabOrder = 1
Visible = False
Wrap = False
end
object Ed_MeterT: TEdit
Left = 8
Top = 14
Width = 28
Height = 21
Hint = '$40000824'
Ctl3D = True
MaxLength = 3
ParentCtl3D = False
TabOrder = 2
Text = '4'
Visible = False
OnChange = Ed_MeterTChange
OnExit = Ed_MeterTExit
end
object Sc_MeterT: TUpDown
Left = 36
Top = 14
Width = 16
Height = 21
Associate = Ed_MeterT
Min = 1
Max = 99
Position = 4
TabOrder = 3
Visible = False
Wrap = False
end
object Co_MeterB: TComboBox
Left = 10
Top = 33
Width = 40
Height = 21
Hint = '$40000825'
Style = csDropDownList
ItemHeight = 13
TabOrder = 4
Visible = False
OnClick = Co_MeterBClick
OnExit = Co_MeterBExit
Items.Strings = (
'1'
'2'
'4'
'8'
'16'
'32')
end
end
object Pa_Mode: TPanel
Left = 440
Top = 0
Width = 185
Height = 69
Align = alLeft
TabOrder = 11
OnMouseDown = Pa_ControlMouseDown
OnMouseMove = Pa_ControlMouseMove
object Label1: TLabel
Left = 8
Top = 30
Width = 77
Height = 13
Caption = 'Max Measure'
end
object La_MaxMeas: TLabel
Left = 170
Top = 30
Width = 7
Height = 13
Alignment = taRightJustify
Caption = '4'
end
object Bu_PlayMode: TSpeedButton
Left = 96
Top = 8
Width = 81
Height = 21
OnClick = Bu_PlayModeClick
end
object Co_PlayX: TComboBox
Left = 8
Top = 8
Width = 81
Height = 21
Hint = '$40000830'
TabStop = False
Style = csDropDownList
Ctl3D = False
ItemHeight = 13
ParentCtl3D = False
TabOrder = 0
OnClick = Co_PlayXClick
Items.Strings = (
'1/2xPlay'
'2/3xPlay'
'3/4xPlay'
' 1 xPlay'
'1.5xPlay'
' 2 xPlay')
end
object Sc_MaxMeas: TScrollBar
Left = 8
Top = 45
Width = 169
Height = 17
Hint = '$40000832'
Ctl3D = False
LargeChange = 8
Max = 9999
Min = 4
PageSize = 0
ParentCtl3D = False
Position = 4
TabOrder = 1
TabStop = False
OnChange = Sc_MaxMeasChange
end
end
object Pa_Metro: TPanel
Left = 625
Top = 0
Width = 79
Height = 69
Align = alLeft
TabOrder = 12
object Label13: TLabel
Left = 8
Top = 8
Width = 63
Height = 13
Caption = 'Metronome'
end
object Bu_MetroPlay: TSpeedButton
Left = 8
Top = 24
Width = 65
Height = 17
AllowAllUp = True
GroupIndex = 4
Caption = 'Play'
OnClick = Bu_MetroPlayClick
end
object Bu_MetroRec: TSpeedButton
Left = 8
Top = 44
Width = 65
Height = 17
AllowAllUp = True
GroupIndex = 5
Caption = 'Rec'
OnClick = Bu_MetroRecClick
end
end
end
object Bu_Enter: TButton
Left = 248
Top = 136
Width = 89
Height = 33
Default = True
TabOrder = 1
OnClick = Bu_EnterClick
end
object Pa_Wall: TPanel
Left = 440
Top = 120
Width = 81
Height = 73
BevelOuter = bvNone
Color = clBtnShadow
TabOrder = 3
Visible = False
end
object Pa_TB: TPanel
Left = 0
Top = 0
Width = 880
Height = 31
Align = alTop
BevelOuter = bvNone
ParentShowHint = False
ShowHint = False
TabOrder = 4
object Pa_MF: TPanel
Left = 0
Top = 0
Width = 331
Height = 31
Align = alLeft
TabOrder = 0
object Bu_NewPL: TSpeedButton
Left = 235
Top = 4
Width = 23
Height = 23
Hint = '$40000030'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333300000000000000330FFFFFFFFFFFF0330FFFFFFFFFFFF0330FF00000000
FF0330FFFFFFFFFFFF0330FF00000000FF0330FFFFFFFFFFFF0330FF00000000
FF0330FFFFFFFFFFFF0330FF00000000FF0330FFFFFFFFFFFF0330FF000000F0
000330FFFFFFFFF0F03330FFFFFFFFF003333000000000003333}
Margin = 1
OnClick = MF_NewPLClick
end
object Bu_OpenPL: TSpeedButton
Left = 258
Top = 4
Width = 23
Height = 23
Hint = '$40000031'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
00000084840000FFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000444444444444
4444000000000004444400222222222044440302222222220444033022222222
2044033300000000004403333333333044440333333333304444033333333330
4444033333000000444440000044444411444444444444411114444444444411
1111444441144444114444444111444111444444441111111444}
Margin = 1
OnClick = MF_OpenPLClick
end
object Bu_OWSPL: TSpeedButton
Left = 281
Top = 4
Width = 23
Height = 23
Hint = '$40000032'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010444444444401001044444444440100104444444444010010444444444
4010010444444444401001044444444440100000000000000000}
Margin = 1
OnClick = MF_OWSPLClick
end
object Bu_SavePL: TSpeedButton
Left = 304
Top = 4
Width = 23
Height = 23
Hint = '$40000033'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010400000000401001044444444440100104000000004010010444444444
4010010400000000401001044444444440100000000000000000}
Margin = 1
OnClick = MF_SavePLClick
end
object Bu_WNS: TSpeedButton
Left = 204
Top = 4
Width = 23
Height = 23
Hint = '$40000021'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010400000000401001044444444440100104000000004010010444444444
4010010400000000401001044444444440100000000000000000}
Margin = 1
OnClick = Bu_WNSClick
end
object Bu_WOpen: TSpeedButton
Left = 181
Top = 4
Width = 23
Height = 23
Hint = '$40000020'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
00000084840000FFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000444444444444
4444000000000004444400222222222044440302222222220444033022222222
2044033300000000004403333333333044440333333333304444033333333330
4444033333000000444440000044444411444444444444411114444444444411
1111444441144444114444444111444111444444441111111444}
Margin = 1
OnClick = Bu_WOpenClick
end
object Bu_ReOpen: TSpeedButton
Left = 96
Top = 4
Width = 23
Height = 23
Hint = '$40000006'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
0000FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222222222222222222222220000002222222200111111002222201111111111
0222201110000111022201110222201110220110222222011022011022222201
1022011022222201102201102222000110000110222201111110011022222011
1102011022222201102200002222222002222222222222222222}
Margin = 1
OnClick = MF_ReLoadMSFClick
end
object Bu_NewSave: TSpeedButton
Left = 73
Top = 4
Width = 23
Height = 23
Hint = '$40000005'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010400000000401001044444444440100104000000004010010444444444
4010010400000000401001044444444440100000000000000000}
Margin = 1
OnClick = MF_SaveAsMSFClick
end
object Bu_OverWriteSave: TSpeedButton
Left = 50
Top = 4
Width = 23
Height = 23
Hint = '$40000004'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010444444444401001044444444440100104444444444010010444444444
4010010444444444401001044444444440100000000000000000}
Margin = 1
OnClick = MF_SaveMSFClick
end
object Bu_Open: TSpeedButton
Left = 27
Top = 4
Width = 23
Height = 23
Hint = '$40000002'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
00000084840000FFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000444444444444
4444000000000004444400222222222044440302222222220444033022222222
2044033300000000004403333333333044440333333333304444033333333330
4444033333000000444440000044444411444444444444411114444444444411
1111444441144444114444444111444111444444441111111444}
Margin = 1
OnClick = MF_OpenMSFClick
end
object Bu_New: TSpeedButton
Left = 4
Top = 4
Width = 23
Height = 23
Hint = '$40000001'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333300000000000000330FFFFFFFFFFFF0330FF000FFFFFFF0330FF0000FFFF
FF0330FF0000F0FFFF0330FFF000FF0FFF0330FFFFF0FF0FFF0330FFFFF0FF0F
FF0330FFFFF0FF0FFF0330FFFFF0F0FFFF0330FFFFF00FFFFF0330FFFFF0FFF0
000330FFFFFFFFF0F03330FFFFFFFFF003333000000000003333}
Margin = 1
OnClick = MF_NewMSFClick
end
object Bu_ImportSMF: TSpeedButton
Left = 127
Top = 4
Width = 23
Height = 23
Hint = '$40000010'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
00000084840000FFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000444444444444
4444000000000004444400222222222044440302222222220444033022222222
2044033300000000004403333333333044440333333333304444033333333330
4444033333000000444440000044444411444444444444411114444444444411
1111444441144444114444444111444111444444441111111444}
Margin = 1
OnClick = MF_ImportClick
end
object Bu_ExportSMF: TSpeedButton
Left = 150
Top = 4
Width = 23
Height = 23
Hint = '$40000011'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
000000848400C6C6C600FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222200000000000000001100000033001100110000003300110011000000330
0110011000000000011001111111111111100110000000000110010444444444
4010010400000000401001044444444440100104000000004010010444444444
4010010400000000401001044444444440100000000000000000}
Margin = 1
OnClick = MF_ExportSMFClick
end
end
object Pa_ME: TPanel
Left = 331
Top = 0
Width = 346
Height = 31
Align = alLeft
TabOrder = 1
object Bu_Undo: TSpeedButton
Left = 4
Top = 4
Width = 23
Height = 23
Hint = '$40000101'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111111111111111111111111111111111111111111111111111111111111111
0111111111111111101110000001111110111000001111111101100001111111
1101100001111111100110010011111100111011100000000011111111100000
1111111111111111111111111111111111111111111111111111}
Margin = 1
OnClick = ME_UndoClick
end
object Bu_Redo: TSpeedButton
Left = 27
Top = 4
Width = 23
Height = 23
Hint = '$40000102'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111111111111111111111111111111111111111111111111111111011111111
1111110111111111111111011111100000011011111111000001101111111110
0001100111111110000111001111110010011100000000011101111100000111
1111111111111111111111111111111111111111111111111111}
Margin = 1
OnClick = ME_RedoClick
end
object Bu_Cut: TSpeedButton
Left = 58
Top = 4
Width = 23
Height = 23
Hint = '$40000110'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111111100111111111111101101100111111110110101101111111011010110
1111111100010110111111111101000111111111110001111111111111101111
1111111111000111111111111101011111111111100100111111111110111011
1111111110111011111111111011101111111111101110111111}
Margin = 1
OnClick = ME_CutClick
end
object Bu_Copy: TSpeedButton
Left = 81
Top = 4
Width = 23
Height = 23
Hint = '$40000111'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000084
8400FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111111111000000000011111102222222201111110200000020000000022222
2220022222020000002002000202222222200222220200000020020002022222
2220022222020002000002000202222202010222220222220011020020000000
0111022220201111111102222001111111110000001111111111}
Margin = 1
OnClick = ME_CopyClick
end
object Bu_Paste: TSpeedButton
Left = 104
Top = 4
Width = 23
Height = 23
Hint = '$40000112'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000084
0000848400000084840000FFFF00C6C6C600FFFFFF0000000000000000000000
0000000000000000000000000000000000000000000000000000333333333333
3333333333300000000030000000666666600121212060000060021212106666
6660012121206006666002121210666600000121212060060603021212106666
0033012121200000033302121212121203330120000000210333021055555012
0333012040004021033330000444000033333333300033333333}
Margin = 1
OnClick = ME_PasteClick
end
object Bu_Del: TSpeedButton
Left = 127
Top = 4
Width = 23
Height = 23
Hint = '$40000113'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111111111111111111110011111111110011100111111110011111001111110
0111111100111100111111111001100111111111110000111111111111100111
1111111111000011111111111001100111111111001111001111111001111110
0111110011111111001110011111111110011111111111111111}
Margin = 1
OnClick = ME_DelClick
end
object Bu_Merge: TSpeedButton
Left = 150
Top = 4
Width = 23
Height = 23
Hint = '$40000114'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000084
0000848400000084840000FFFF00C6C6C600FFFFFF0000000000000000000000
0000000000000000000000000000000000000000000000000000333333333333
3333333333300000000030000000666666600121212060000060021012106666
6660012021206006666000000010666600000120212060060603021012106666
0033012121200000033302121212121203330120000000210333021055555012
0333012040004021033330000444000033333333300033333333}
Margin = 1
OnClick = ME_MergeClick
end
object Bu_Insert: TSpeedButton
Left = 173
Top = 4
Width = 23
Height = 23
Hint = '$40000115'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000084
0000848400000084840000FFFF00C6C6C600FFFFFF0000000000000000000000
0000000000000000000000000000000000000000000000000000333333333333
3333333333300000000030000000666666600121212060600060021212106006
6660012000000000666002121210600600000121212060660603021212106666
0033012121200000033302121212121203330120000000210333021055555012
0333012040004021033330000444000033333333300033333333}
Margin = 1
OnClick = ME_InsertClick
end
object Bu_TimeDel: TSpeedButton
Left = 196
Top = 4
Width = 23
Height = 23
Hint = '$40000116'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000008484
8400FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222000000020000000011111102011111111111110201111111111111020111
1111111111020111111111111102011111110000000200000000222222222222
2222222002222200222222220022200222222222200200222222222222000222
2222222220020022222222220022200222222220022222002222}
Margin = 1
OnClick = Me_TimeDelClick
end
object Bu_TimeIns: TSpeedButton
Left = 219
Top = 4
Width = 23
Height = 23
Hint = '$40000117'
Enabled = False
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000008484
8400FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222000000222200000011111022220111111111102222011111111110222201
1111111110222201111111111022220111110000002222000000222222200222
2222222222000022222222222000000222222222000000002222222222200222
2222222222200222222222222220022222222222222002222222}
Margin = 1
OnClick = Me_TimeInsClick
end
object Bu_SelAll: TSpeedButton
Left = 250
Top = 4
Width = 23
Height = 23
Hint = '$40000120'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
FF00FFFFFF000000800000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222222222222222222222332222222222222311322000000002231132222222
2222223322222222222222222222222222222233222222222222231132200000
0002231132222222222222332222222222222222222222222222223322222222
2222231132200000000223113222222222222233222222222222}
Margin = 1
OnClick = ME_SelAllClick
end
object Bu_ClearSel: TSpeedButton
Left = 273
Top = 4
Width = 23
Height = 23
Hint = '$40000121'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FF00
0000FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000222222222222
2222222222222222222222112222222222222122122000000002212212222222
2222221122222222222222222222222222222211222222222222212212200000
0002212212222222222222112222222222222222222222222222221122222222
2222212212200000000221221222222222222211222222222222}
Margin = 1
OnClick = ME_ClearSelClick
end
object Bu_SelCha: TSpeedButton
Left = 296
Top = 4
Width = 23
Height = 23
Hint = '$40000122'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
84000000FF00FF000000FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000444444444444
4444444444444444444444114444444433444122144444434434412214444443
4434441144444444334444444444444444444440444444440444440004444440
0044400000444400000444404444444404444440444444440444444044444444
0444444404444440444444444000000444444444444444444444}
Margin = 1
OnClick = ME_SelChaClick
end
object Bu_SelFil: TSpeedButton
Left = 319
Top = 4
Width = 23
Height = 23
Hint = '$40000123'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
040000000000800000000000000000000000100000001000000000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111111111111
1111000111111110111100011000001011110110011111100001011001100010
1111000110011110111100011001101000000110011001111111011001100110
0001000110011001111100011001100110010110011001100111011001100110
0111000110011001100100011001100110010000000000000000}
Margin = 1
OnClick = ME_SelFilClick
end
end
object Panel3: TPanel
Left = 677
Top = 0
Width = 203
Height = 31
Align = alClient
TabOrder = 2
end
end
object FLB_Plug: TFileListBox
Left = 536
Top = 112
Width = 145
Height = 97
ItemHeight = 13
Mask = '*.aep'
TabOrder = 5
Visible = False
end
object FLB_IMD: TFileListBox
Left = 688
Top = 112
Width = 145
Height = 97
ItemHeight = 13
Mask = '*.imd'
TabOrder = 6
Visible = False
end
object Me_Debug: TMemo
Left = 0
Top = 160
Width = 880
Height = 89
Align = alBottom
Lines.Strings = (
'<<Debug Window>>')
ScrollBars = ssVertical
TabOrder = 7
Visible = False
end
object MainMenu1: TMainMenu
AutoHotkeys = maManual
AutoLineReduction = maManual
Left = 120
Top = 112
object M_File: TMenuItem
Caption = '�t�@�C��(&F)'
object MF_NewMSF: TMenuItem
Caption = '�V�K�쐬(&N)'
Hint = '$40000001'
OnClick = MF_NewMSFClick
end
object MF_OpenMSF: TMenuItem
Caption = '�J��(&O)...'
GroupIndex = 1
Hint = '$40000002'
ShortCut = 16463
OnClick = MF_OpenMSFClick
end
object MF_ReOpen: TMenuItem
Caption = '�ŋߎg�����t�@�C��(&E)'
GroupIndex = 1
end
object MF_ReOpenD: TMenuItem
Caption = '�ŋߎg�����t�H���_(&C)'
GroupIndex = 1
end
object MF_OpenMIDI: TMenuItem
Caption = 'MIDI�f�[�^�̂݊J��(&M)...'
GroupIndex = 1
Hint = '$40000003'
OnClick = MF_OpenClick
end
object MF_SaveMSF: TMenuItem
Caption = '�㏑���ۑ�(&S)'
GroupIndex = 2
Hint = '$40000004'
ShortCut = 16467
OnClick = MF_SaveMSFClick
end
object MF_SaveAsMSF: TMenuItem
Caption = '���O��t���ĕۑ�(&A)...'
GroupIndex = 3
Hint = '$40000005'
OnClick = MF_SaveAsMSFClick
end
object MF_ReLoadMSF: TMenuItem
Caption = '��蒼��(&R)'
GroupIndex = 4
Hint = '$40000006'
OnClick = MF_ReLoadMSFClick
end
object MF_Sep0_0: TMenuItem
Caption = '-'
GroupIndex = 4
end
object MF_ImportSMF: TMenuItem
Caption = 'SMF�̃C���|�[�g(&I)...'
GroupIndex = 10
Hint = '$40000010'
OnClick = MF_ImportClick
end
object MF_ExportSMF: TMenuItem
Caption = 'SMF�̃G�N�X�|�[�g(&D)...'
GroupIndex = 10
Hint = '$40000011'
OnClick = MF_ExportSMFClick
end
object MF_Sep0_1: TMenuItem
Caption = '-'
GroupIndex = 10
end
object MF_ImportWave: TMenuItem
Caption = 'Wav�t�@�C���̃C���|�[�g(&V)...'
GroupIndex = 10
Hint = '$40000020'
OnClick = MF_WOpenClick
end
object MF_ExportWave: TMenuItem
Caption = 'Wav�t�@�C���̃G�N�X�|�[�g(&R)...'
GroupIndex = 10
Hint = '$40000021'
OnClick = MF_WNSClick
end
object MF_Sep0_2: TMenuItem
Caption = '-'
GroupIndex = 24
end
object MF_NewPlaylist: TMenuItem
Caption = '�v���C���X�g�̐V�K�쐬(&L)'
GroupIndex = 40
Hint = '$40000030'
OnClick = MF_NewPLClick
end
object MF_OpenPlayList: TMenuItem
Caption = '�v���C���X�g���J��(&Y)...'
GroupIndex = 41
Hint = '$40000031'
OnClick = MF_OpenPLClick
end
object MF_SavePlayList: TMenuItem
Caption = '�v���C���X�g�̏㏑���ۑ�(&I)'
GroupIndex = 42
Hint = '$40000032'
OnClick = MF_OWSPLClick
end
object MF_SaveAsPlayList: TMenuItem
Caption = '�v���C���X�g�ɖ��O��t���ĕۑ�(&T)...'
GroupIndex = 43
Hint = '$40000033'
OnClick = MF_SavePLClick
end
object MF_Sep0_3: TMenuItem
Caption = '-'
GroupIndex = 43
end
object MF_Exit: TMenuItem
Caption = '�I��(&X)'
GroupIndex = 50
Hint = '$40000040'
ShortCut = 32883
OnClick = MF_ExitClick
end
end
object M_Edit: TMenuItem
Caption = '�ҏW(&E)'
GroupIndex = 10
object ME_Undo: TMenuItem
Caption = '���ɖ߂�(&U)'
Enabled = False
Hint = '$40000101'
ShortCut = 16474
OnClick = ME_UndoClick
end
object ME_Redo: TMenuItem
Caption = '�ēx�s��(&R)'
Enabled = False
GroupIndex = 1
Hint = '$40000102'
ShortCut = 24666
OnClick = ME_RedoClick
end
object ME_Sep0: TMenuItem
Caption = '-'
GroupIndex = 1
end
object ME_Cut: TMenuItem
Caption = '�؂���(&T)'
Enabled = False
GroupIndex = 10
Hint = '$40000110'
ShortCut = 16472
OnClick = ME_CutClick
end
object ME_Copy: TMenuItem
Caption = '�R�s�[(&C)'
Enabled = False
GroupIndex = 11
Hint = '$40000111'
ShortCut = 16451
OnClick = ME_CopyClick
end
object ME_Paste: TMenuItem
Caption = '�\��t��(&P)'
Enabled = False
GroupIndex = 12
Hint = '$40000112'
ShortCut = 16470
OnClick = ME_PasteClick
end
object ME_Del: TMenuItem
Caption = '�폜(&D)'
Enabled = False
GroupIndex = 13
Hint = '$40000113'
ShortCut = 16430
OnClick = ME_DelClick
end
object ME_Merge: TMenuItem
Caption = '�}�[�W(&M)'
Enabled = False
GroupIndex = 14
Hint = '$40000114'
ShortCut = 24662
OnClick = ME_MergeClick
end
object ME_Insert: TMenuItem
Caption = '�}��(&I)'
Enabled = False
GroupIndex = 15
Hint = '$40000115'
ShortCut = 16429
OnClick = ME_InsertClick
end
object Me_TimeDel: TMenuItem
Caption = '���ԍ폜(&E)'
Enabled = False
GroupIndex = 16
Hint = '$40000116'
ShortCut = 16452
OnClick = Me_TimeDelClick
end
object Me_TimeIns: TMenuItem
Caption = '���ԑ}��(&N)'
Enabled = False
GroupIndex = 17
Hint = '$40000117'
ShortCut = 16457
OnClick = Me_TimeInsClick
end
object ME_Sep1: TMenuItem
Caption = '-'
GroupIndex = 17
end
object ME_SelAll: TMenuItem
Caption = '�S�đI��(&A)'
GroupIndex = 20
Hint = '$40000120'
ShortCut = 16449
OnClick = ME_SelAllClick
end
object ME_ClearSel: TMenuItem
Caption = '�S�I������(&S)'
GroupIndex = 21
Hint = '$40000121'
ShortCut = 24641
OnClick = ME_ClearSelClick
end
object ME_SelCha: TMenuItem
Caption = '�I���̐؂�ւ�(&H)'
GroupIndex = 22
Hint = '$40000122'
ShortCut = 16450
OnClick = ME_SelChaClick
end
object ME_SelFil: TMenuItem
Caption = '�t�B���^�[�őI��(&F)'
GroupIndex = 23
Hint = '$40000123'
ShortCut = 16454
Visible = False
OnClick = ME_SelFilClick
end
end
object M_View: TMenuItem
Caption = '�\��(&V)'
GroupIndex = 15
object MV_TB: TMenuItem
Caption = '�c�[���o�[(&T)'
Hint = '$40000201'
object MVT_File: TMenuItem
Caption = '�t�@�C�����j���[(&F)'
Checked = True
Hint = '$40000202'
OnClick = MVT_FileClick
end
object MVT_Edit: TMenuItem
Caption = '�ҏW���j���[(&E)'
Checked = True
Hint = '$40000203'
OnClick = MVT_EditClick
end
end
object MV_Control: TMenuItem
Caption = '�R���g���[���o�[(&L)'
Hint = '$40000210'
object MVC_Loc: TMenuItem
Caption = '�v���C�R���g���[��(&P)'
Checked = True
Hint = '$40000211'
OnClick = MVC_LocClick
end
object MVC_Location: TMenuItem
Caption = '���P�[�V�����{�^��(&L)'
Checked = True
Hint = '$40000212'
OnClick = MVC_LocationClick
end
object MVC_TMK: TMenuItem
Caption = '�R���_�N�^(&T)'
Checked = True
Hint = '$40000213'
OnClick = MVC_TMKClick
end
object MVC_Mode: TMenuItem
Caption = '�v���C���[�h(&M)'
Checked = True
Hint = '$40000214'
OnClick = MVC_ModeClick
end
object MVC_Metro: TMenuItem
Caption = 'M&etronome'
Checked = True
OnClick = MVC_MetroClick
end
object MVC_Loop: TMenuItem
Caption = '���[�v(&O)'
Checked = True
Hint = '$40000215'
OnClick = MVC_LoopClick
end
object MVC_WButton: TMenuItem
Caption = '�E�C���h�E�{�^��(&W)'
Checked = True
Hint = '$40000216'
OnClick = MVC_WButtonClick
end
object MVC_NoteNum: TMenuItem
Caption = '������(&N)'
Checked = True
Hint = '$40000217'
OnClick = MVC_NoteNumClick
end
object MVC_Spectrum: TMenuItem
Caption = 'MIDI�X�y�N�g��(&S)'
Checked = True
Hint = '$40000218'
OnClick = MVC_SpectrumClick
end
object MVC_Sig: TMenuItem
Caption = '�V�O�i��(&G)'
Checked = True
Hint = '$40000219'
OnClick = MVC_SigClick
end
object MVC_CPU: TMenuItem
Caption = 'CPU/�������g�p��(&C)'
Checked = True
Hint = '$4000021A'
OnClick = MVC_CPUClick
end
object MVC_Screen: TMenuItem
Caption = '�X�N���[��������(&R)'
Checked = True
Hint = '$4000021B'
OnClick = MVC_ScreenClick
end
end
object MV_SB: TMenuItem
Caption = '�X�e�[�^�X�o�[(&S)'
Checked = True
Hint = '$40000220'
OnClick = MV_SBClick
end
object MV_Level: TMenuItem
Caption = '&Master Level Meter'
Hint = '$40000220'
ShortCut = 16503
OnClick = MV_LevelClick
end
object MV_Sep0: TMenuItem
Caption = '-'
GroupIndex = 15
end
object MV_SoftKey: TMenuItem
Caption = '�\�t�g�E�F�A�L�[�{�[�h(&K)'
GroupIndex = 20
Hint = '$40000230'
ShortCut = 16502
OnClick = MV_SoftKeyClick
end
object MV_Property: TMenuItem
Caption = 'Pr&operty'
GroupIndex = 20
Hint = '$40000233'
ShortCut = 16505
OnClick = MV_PropertyClick
end
object MV_ASpe: TMenuItem
Caption = '�I�[�f�B�I�X�y�N�g��(&A)'
GroupIndex = 20
Hint = '$40000231'
ShortCut = 16506
OnClick = MV_ASpeClick
end
object N3: TMenuItem
Caption = '-'
GroupIndex = 20
end
object MV_Song: TMenuItem
Caption = '�\���O(&S)...'
GroupIndex = 30
Hint = '$40000240'
ShortCut = 8304
OnClick = MV_SongClick
end
object MV_Proj: TMenuItem
Caption = '�v���W�F�N�g(&R)...'
GroupIndex = 31
Hint = '$40000241'
ShortCut = 8305
OnClick = MV_ProjClick
end
object MV_Special: TMenuItem
Caption = '�X�y�V�����̕ҏW(&P)...'
GroupIndex = 32
Hint = '$40000242'
OnClick = MV_SpecialClick
end
end
object M_Do: TMenuItem
Caption = '���s(&D)'
GroupIndex = 20
object MD_Quantize: TMenuItem
Caption = '�N�I���^�C�Y(&Q)...'
Enabled = False
Hint = '$40000301'
ShortCut = 16465
OnClick = MD_QuantizeClick
end
object MD_NoteC: TMenuItem
Caption = '�C�x���g�`�F���W(&N)...'
Enabled = False
GroupIndex = 1
Hint = '$40000302'
ShortCut = 16462
OnClick = MD_NoteCClick
end
object MD_CreateC: TMenuItem
Caption = '�N���G�C�g�R���g���[��(&R)...'
GroupIndex = 2
Hint = '$40000303'
ShortCut = 16460
OnClick = MD_CreateCClick
end
object MD_Sep1: TMenuItem
Caption = '-'
GroupIndex = 2
end
object MD_DevChang: TMenuItem
Caption = '�f�o�C�X�̕ύX(&D)...'
GroupIndex = 10
Hint = '$40000304'
ShortCut = 16453
OnClick = MD_DevChangClick
end
object MD_InsIniA: TMenuItem
Caption = '�g���b�N���������̑}��(&I)...'
GroupIndex = 11
Hint = '$40000305'
ShortCut = 24621
OnClick = MD_InsIniAClick
end
object MD_TNChange: TMenuItem
Caption = '�g���b�N�����y�햼�ɕύX(&T)'
GroupIndex = 12
Hint = '$40000306'
ShortCut = 16468
OnClick = MD_TNChangeClick
end
object MD_MakeATrackForMIDI: TMenuItem
Caption = 'MIDI�^���p�I�[�f�B�I�g���b�N�̍쐬(&M)'
GroupIndex = 12
Hint = '$40000308'
OnClick = MD_MakeATrackForMIDIClick
end
object MD_Sep2: TMenuItem
Caption = '-'
GroupIndex = 12
end
object MD_AssignEFX: TMenuItem
Caption = '&Assign Effector'
GroupIndex = 12
Hint = '$40000309'
OnClick = MD_AssignEFXClick
end
end
object M_Window: TMenuItem
Caption = '�E�C���h�E(&W)'
GroupIndex = 30
object MW_New: TMenuItem
Caption = '�V�K�쐬(&N)'
Hint = '$40000401'
object MWN_EventList: TMenuItem
Caption = '�C�x���g���X�g(&E)'
Hint = '$40000404'
ShortCut = 16496
OnClick = MWN_EventListClick
end
object MWN_PianoRoll: TMenuItem
Caption = '�s�A�m���[��(&P)'
Hint = '$40000405'
ShortCut = 16497
OnClick = MWN_PianoRollClick
end
object MWN_ScoreRoll: TMenuItem
Caption = '�X�R�A���[��(&O)'
Hint = '$40000406'
ShortCut = 16498
OnClick = MWN_ScoreRollClick
end
object MWN_AControl: TMenuItem
Caption = '�I�[�f�B�I�R���g���[��(&C)'
Hint = '$40000407'
ShortCut = 16500
OnClick = MWN_AControlClick
end
end
object MW_Indi: TMenuItem
Caption = '�•ʂɍ쐬(&D)'
GroupIndex = 1
Hint = '$40000402'
object MWD_EventList: TMenuItem
Caption = '�C�x���g���X�g(&E)'
Hint = '$40000404'
OnClick = MWD_EventListClick
end
object MWD_PianoRoll: TMenuItem
Caption = '�s�A�m���[��(&P)'
Hint = '$40000405'
OnClick = MWD_PianoRollClick
end
object MWD_ScoreRoll: TMenuItem
Caption = '�X�R�A���[��(&O)'
Hint = '$40000406'
OnClick = MWD_ScoreRollClick
end
object MWD_AControl: TMenuItem
Caption = '�I�[�f�B�I�R���g���[��(&C)'
Hint = '$40000407'
OnClick = MWD_AControlClick
end
end
object MW_All: TMenuItem
Caption = '�S�g���b�N�ō쐬(&W)'
GroupIndex = 2
Hint = '$40000403'
object MWA_EventList: TMenuItem
Caption = '�C�x���g���X�g(&E)'
Hint = '$40000404'
OnClick = MWA_EventListClick
end
object MWA_PianoRoll: TMenuItem
Caption = '�s�A�m���[��(&P)'
Hint = '$40000405'
OnClick = MWA_PianoRollClick
end
object MWA_ScoreRoll: TMenuItem
Caption = '�X�R�A���[��(&O)'
Hint = '$40000406'
OnClick = MWA_ScoreRollClick
end
object MWA_AControl: TMenuItem
Caption = '�I�[�f�B�I�R���g���[��(&C)'
Hint = '$40000407'
OnClick = MWA_AControlClick
end
end
object MW_CloseAll: TMenuItem
Caption = '�S�ĕ‚���(&L)'
GroupIndex = 3
Hint = '$40000408'
ShortCut = 24691
OnClick = MW_CloseAllClick
end
object MW_Sep0: TMenuItem
Caption = '-'
GroupIndex = 3
end
object MW_Track: TMenuItem
Caption = '�g���b�N(&T)'
GroupIndex = 10
Hint = '$40000410'
ShortCut = 8306
OnClick = MW_TrackClick
end
object MW_ATrack: TMenuItem
Caption = '�I�[�f�B�I�g���b�N(&U)'
GroupIndex = 11
Hint = '$40000411'
ShortCut = 8307
OnClick = MW_ATrackClick
end
object MW_Mixer: TMenuItem
Caption = '�~�L�T�[(&M)'
GroupIndex = 12
Hint = '$40000412'
ShortCut = 8308
OnClick = MW_MixerClick
end
object MW_AMixer: TMenuItem
Caption = '�I�[�f�B�I�~�L�T�[(&A)'
GroupIndex = 14
Hint = '$40000414'
ShortCut = 8309
OnClick = MW_AMixerClick
end
object MW_XYMixerMIDI: TMenuItem
Caption = '&XY Mixer'
GroupIndex = 14
Hint = '$40000424'
ShortCut = 8310
OnClick = MW_XYMixerMIDIClick
end
object MW_XYMixerAudio: TMenuItem
Caption = 'Audio X&Y Mixer'
GroupIndex = 14
Hint = '$40000425'
ShortCut = 8311
OnClick = MW_XYMixerAudioClick
end
object MW_CPlay: TMenuItem
Caption = '�`�F�C���v���C���[(&C)'
GroupIndex = 14
Hint = '$40000413'
ShortCut = 8312
OnClick = MW_CPlayClick
end
object MW_Wave: TMenuItem
Caption = '�I�[�f�B�I�G���g���[(&E)'
GroupIndex = 15
Hint = '$40000415'
ShortCut = 8313
OnClick = MW_WaveClick
end
object MW_SCMix: TMenuItem
Caption = 'Audi&o Card Mixer'
GroupIndex = 15
Hint = '$40000426'
ShortCut = 8315
OnClick = MW_SCMixClick
end
object MW_Sep3: TMenuItem
Caption = '-'
GroupIndex = 32
end
object MW_TileV: TMenuItem
Caption = '�c�ɕ��ׂĕ\��(&V)'
GroupIndex = 40
Hint = '$40000420'
ShortCut = 8205
OnClick = MW_TileVClick
end
object MW_TileH: TMenuItem
Caption = '���ɕ��ׂĕ\��(&H)'
GroupIndex = 41
Hint = '$40000421'
ShortCut = 16397
OnClick = MW_TileHClick
end
object MW_Cascade: TMenuItem
Caption = '�d�˂ĕ\��(&S)'
GroupIndex = 42
Hint = '$40000422'
ShortCut = 32781
OnClick = MW_CascadeClick
end
object MW_ArrangeIcons: TMenuItem
Caption = '�A�C�R���̐���(&I)'
GroupIndex = 43
Hint = '$40000423'
ShortCut = 24589
OnClick = MW_ArrangeIconsClick
end
object MW_Sep2: TMenuItem
Caption = '-'
GroupIndex = 43
end
end
object M_Setup: TMenuItem
Caption = '�Z�b�g�A�b�v(&S)'
GroupIndex = 40
object MS_Config2: TMenuItem
Caption = '�‹��̐ݒ�(&C)...'
Hint = '$40000501'
OnClick = MS_Config2Click
end
object MS_Quantize: TMenuItem
Caption = '�C���v�b�g�N�I���^�C�Y�̐ݒ�(&Q)...'
GroupIndex = 30
Hint = '$40000521'
OnClick = MS_QuantizeClick
end
object MS_Sep0: TMenuItem
Caption = '-'
GroupIndex = 30
end
object MS_Device: TMenuItem
Caption = 'MIDI�f�o�C�X�̐ݒ�(&D)...'
GroupIndex = 30
Hint = '$40000511'
OnClick = MS_DeviceClick
end
object MS_ADevice: TMenuItem
Caption = '�I�[�f�B�I�f�o�C�X�̐ݒ�(&F)...'
GroupIndex = 31
Hint = '$40000531'
OnClick = MS_ADeviceClick
end
object MS_ASIO: TMenuItem
Caption = 'ASIO�h���C�o�̐ݒ�(&A)...'
GroupIndex = 31
Hint = '$40000532'
OnClick = MS_ASIOClick
end
object MS_Connection: TMenuItem
Caption = 'MIDI-�I�[�f�B�I�ڑ��̐ݒ�(&O)...'
GroupIndex = 31
Hint = '$40000533'
OnClick = MS_ConnectionClick
end
end
object M_Help: TMenuItem
Caption = '�w���v(&H)'
GroupIndex = 60
object MH_Contents: TMenuItem
Caption = '�ڎ�(&C)'
Hint = '$40000601'
ShortCut = 112
OnClick = MH_ContentsClick
end
object MH_Regist: TMenuItem
Caption = '�V�F�A�E�F�A�o�^(&R)'
GroupIndex = 1
Hint = '$40000602'
OnClick = MH_RegistClick
end
object MH_HP: TMenuItem
Caption = 'Frieve�̃T�C�g(&F)'
GroupIndex = 1
Hint =
'Frieve�̃z�[���y�[�W���J���܂��BMSI�̃o�[�W�����A�b�v���̍ŐV��' +
'�͂����炩��B'
OnClick = MH_HPClick
end
object MH_Set0: TMenuItem
Caption = '-'
GroupIndex = 1
end
object MH_AllNoteOff: TMenuItem
Caption = '�I�[���m�[�g�I�t(&N)'
GroupIndex = 10
Hint = '$40000610'
ShortCut = 16464
OnClick = MH_AllNoteOffClick
end
object MH_Sep1: TMenuItem
Caption = '-'
GroupIndex = 10
end
object MH_SysInfo: TMenuItem
Caption = '�f�o�C�X���(&S)...'
GroupIndex = 20
Hint = '$40000620'
OnClick = MH_SysInfoClick
end
object MH_SysConf: TMenuItem
Caption = '�V�X�e���‹��̐ݒ�(&Y)...'
GroupIndex = 21
Hint = '$40000621'
OnClick = MH_SysConfClick
end
object MH_About: TMenuItem
Caption = '�o�[�W�������(&A)...'
GroupIndex = 22
Hint = '$40000622'
OnClick = MH_AboutClick
end
end
object M_ShortCut: TMenuItem
Caption = '�V���[�g�J�b�g'
GroupIndex = 70
Visible = False
object MD_BackStep: TMenuItem
Caption = '�O�̃|�C���g'
ShortCut = 113
Visible = False
OnClick = MD_BackStepClick
end
object MD_Rew: TMenuItem
Caption = '�����߂�'
ShortCut = 114
Visible = False
OnClick = MD_RewClick
end
object MD_Stop: TMenuItem
Caption = '��~'
ShortCut = 115
Visible = False
OnClick = MD_StopClick
end
object MD_Play0: TMenuItem
Caption = '�ŏ�����Đ�'
ShortCut = 116
Visible = False
OnClick = MD_Play0Click
end
object K53: TMenuItem
Caption = '�ꎞ��~'
Visible = False
end
object MD_Play: TMenuItem
Caption = '��'
ShortCut = 117
Visible = False
OnClick = MD_PlayClick
end
object MD_FF: TMenuItem
Caption = '������'
ShortCut = 118
Visible = False
OnClick = MD_FFClick
end
object MD_NextStep: TMenuItem
Caption = '���̃|�C���g'
ShortCut = 119
Visible = False
OnClick = MD_NextStepClick
end
object MD_Rec: TMenuItem
Caption = '���R�[�f�B���O'
ShortCut = 120
Visible = False
OnClick = MD_RecClick
end
object MD_Locate: TMenuItem
Caption = '���P�[�g'
ShortCut = 121
OnClick = MD_LocateClick
end
object MS_SetMRec: TMenuItem
Caption = 'MIDI���R�[�f�B���O�̐ݒ�'
GroupIndex = 40
ShortCut = 16466
OnClick = Bu_MSetRecClick
end
object MS_SetARec: TMenuItem
Caption = '�I�[�f�B�I���R�[�f�B���O�̐ݒ�'
GroupIndex = 40
ShortCut = 24658
OnClick = Bu_ASetRecClick
end
end
end
object Ti_GetInfo: TTimer
Enabled = False
Interval = 0
OnTimer = Ti_GetInfoTimer
Left = 152
Top = 112
end
object OpenDialog: TOpenDialog
DefaultExt = 'MSF'
Filter =
'Music File(*msf;*ssf;*.mid)|*.msf;*ssf;*.mid|Music Studio File(*' +
'.msf)|*.msf|Sequence Studio File(*ssf)|*.ssf|Standard MIDI File(' +
'*.mid)|*.mid|All Files(*.*)|*.*'
FilterIndex = 0
Left = 120
Top = 152
end
object SMFOpenDialog: TOpenDialog
DefaultExt = 'mid'
Filter = 'Standard MIDI File(*.mid)|*.mid|All Files(*.*)|*.*'
FilterIndex = 0
Left = 8
Top = 152
end
object PLSaveDialog: TSaveDialog
DefaultExt = 'plf'
Filter = 'Play List File(*.plf)|*.plf|All Files(*.*)|*.*'
FilterIndex = 0
Left = 40
Top = 192
end
object PLOpenDialog: TOpenDialog
DefaultExt = 'plf'
Filter = 'Play List File(*.plf)|*.plf|All Files(*.*)|*.*'
FilterIndex = 0
Left = 8
Top = 192
end
object Ti_FFREW: TTimer
Enabled = False
Interval = 50
OnTimer = Ti_FFREWTimer
Left = 184
Top = 112
end
object SaveDialog: TSaveDialog
DefaultExt = 'mid'
Filter = 'Standard MIDI File(*.mid)|*.mid'
FilterIndex = 0
Left = 152
Top = 152
end
object SaveDialogMSF: TSaveDialog
DefaultExt = 'MSF'
Filter = 'Music Studio File(*msf)|*.msf|Standard MIDI File(*.mid)|*.mid'
FilterIndex = 0
Left = 40
Top = 112
end
object OpenDialogMSF: TOpenDialog
DefaultExt = 'MSF'
Filter =
'Music File(*msf;*ssf;*.mid;*.asf)|*.msf;*ssf;*.mid;*.asf|Music S' +
'tudio File(*.msf)|*.msf|Sequence Studio File(*ssf)|*.ssf|Standar' +
'd MIDI File(*.mid)|*.mid|Audio Studio File(*.asf)|*.asf|All File' +
's(*.*)|*.*'
FilterIndex = 0
Left = 8
Top = 112
end
object PM_PlayMode: TPopupMenu
Left = 545
Top = 50
object PM_MIDI: TMenuItem
Caption = 'MIDI'
OnClick = PM_PlayModeClick
end
object PM_MIDIAudio: TMenuItem
Tag = 1
Caption = 'MIDI+Audio'
OnClick = PM_PlayModeClick
end
object PM_Audio: TMenuItem
Tag = 2
Caption = 'Audio'
OnClick = PM_PlayModeClick
end
end
end