object fmAudio: TfmAudio
  Left = 54
  Top = 117
  Width = 533
  Height = 301
  Caption = 'Audio'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Menu = MainMenu1
  Position = poDefault
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnKeyUp = FormKeyUp
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object SplitIt1: TSplitIt
    Left = 112
    Top = 50
    Width = 3
    Height = 205
    Cursor = crHSplit
    SplitDirection = sdHorizontal
    OnSplit = SplitIt1Split
    Align = alLeft
  end
  object Toolbar: TPanel
    Left = 0
    Top = 0
    Width = 525
    Height = 25
    Hint = 'Toolbar'
    Align = alTop
    BevelOuter = bvNone
    Color = 13421772
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object btnLoop: TSpeedButton
      Left = 2
      Top = 3
      Width = 55
      Height = 20
      Hint = 'Loop between left - right on/off'
      AllowAllUp = True
      GroupIndex = 1
      Caption = 'Loop'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      Glyph.Data = {
        C6000000424DC60000000000000076000000280000000A0000000A0000000100
        0400000000005000000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFF00
        0000FFF4444FFF000000FFCCCCC4FF000000FCC4FFFFFF000000FC4FFFF44F00
        0000FC4FFF4C44000000FCC4FFFC4F000000FFCC4444FF000000FFFCCC4FFF00
        0000FFFFFFFFFF000000}
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = btnLoopClick
    end
    object sbSolo: TSpeedButton
      Left = 60
      Top = 3
      Width = 37
      Height = 20
      Hint = '[S] Track solo on/off'
      AllowAllUp = True
      GroupIndex = 20
      Caption = 'Solo'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = sbSoloClick
    end
    object sbDefault: TSpeedButton
      Left = 104
      Top = 3
      Width = 23
      Height = 20
      Hint = '[F2] Default mode'
      GroupIndex = 4
      Down = True
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      Glyph.Data = {
        E2000000424DE200000000000000760000002800000012000000090000000100
        0400000000006C00000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFF000000FFFFF4FFFFFFFF8FFF000000FFCF4FFFFFF8F8FFFF000000FFCC
        CFFFFFF888FFFF000000FFCCC4FFFFF8888FFF000000FFCC4FFFFFF888FFFF00
        0000FFC4FFFFFFF88FFFFF000000FF4FFFFFFFF8FFFFFF000000FFFFFFFFFFFF
        FFFFFF000000}
      NumGlyphs = 2
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = sbDefaultClick
    end
    object sbInsert: TSpeedButton
      Left = 130
      Top = 3
      Width = 23
      Height = 20
      Hint = '[F3] Insert mode'
      GroupIndex = 4
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      Glyph.Data = {
        26010000424D260100000000000076000000280000001E0000000B0000000100
        040000000000B000000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF00CF44FCF444FFFFF8F88F8F888FFFFF00FFFFFFFCCC4F
        FFFFFFFFFF8888FFFF00FFFFFFFCCCF4FFFFFFFFFF888F8FFF00FFFFFFFFCFCC
        4FFFFFFFFFF8F888FF00FFFFFFFFFCCCC4FFFFFFFFFF88888F00FFFFFFFFFFCC
        CCFFFFFFFFFFF8888F00FFFFFFFFFFFCCCFFFFFFFFFFFF888F00FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF00}
      NumGlyphs = 2
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = sbInsertClick
    end
    object sbStep: TSpeedButton
      Left = 155
      Top = 3
      Width = 22
      Height = 20
      Hint = '[F4] Step mode'
      GroupIndex = 4
      Enabled = False
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      Glyph.Data = {
        FA000000424DFA000000000000007600000028000000160000000B0000000100
        0400000000008400000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFF44FF
        FFFFFFF88F00FFFFFFFCCC4FFFFFFF888800F44FFFFCCC4F88FFFF888800CCC4
        FFFFFFF8888FFFFFFF00CCC4FFF4CC48888FFF888800FFFFFFFCCC4FFFFFFF88
        88004CC4FFCCCC48888FF8888800CCC4FFCCCC48888FF8888800CCCC4FFCC4F8
        8888FF888F00CCCC4FFFFFF88888FFFFFF00FCC4FFFFFFFF888FFFFFFF00}
      NumGlyphs = 2
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object sbSnap: TSpeedButton
      Left = 185
      Top = 3
      Width = 65
      Height = 20
      Hint = 'Snap to editres'
      AllowAllUp = True
      GroupIndex = 8
      Down = True
      Caption = 'Snap'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      Glyph.Data = {
        CE000000424DCE0000000000000076000000280000000F0000000B0000000100
        0400000000005800000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00F8FFF8FFF8FF
        F8F088888CCCCCCCCC80F8FFFCCCCCCCCCF0F8FFFCCCCCCCCCF0F8FFFCCCCCCC
        CCF088888CCCCCCCCC80F8FFF8FFF8FFF8F0F8FFF8FFF8FFF8F0F8FFF8FFF8FF
        F8F08888888888888880F8FFF8FFF8FFF8F0}
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object Label1: TLabel
      Left = 261
      Top = 6
      Width = 25
      Height = 14
      Caption = 'bpm'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 333
      Top = 6
      Width = 39
      Height = 14
      Caption = 'Editres'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Panel6: TPanel
      Left = 292
      Top = 3
      Width = 30
      Height = 19
      BevelOuter = bvNone
      Color = clBlack
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      TabOrder = 0
      object editBpm: TEditNew
        Left = 3
        Top = 3
        Width = 34
        Height = 21
        Hint = 'Tempo'
        TabStop = False
        BorderStyle = bsNone
        Color = clBlack
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        PopupMenu = fmArrange.PopupTempo
        ShowHint = True
        TabOrder = 0
        OnDblClick = editBpmDblClick
        OnKeyDown = editBpmKeyDown
        OnKeyPress = editBpmKeyPress
        FocusColor = clBlack
        FocusFontColor = clWhite
        NoFocusColor = clBlack
        NoFocusFontColor = clWhite
      end
    end
    object panelRes: TPanel
      Left = 380
      Top = 3
      Width = 30
      Height = 19
      Cursor = crHandPoint
      Hint = '[Click or 1 - 5] Set edit resolution'
      BevelOuter = bvNone
      Caption = '16'
      Color = clBlack
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      PopupMenu = Popupres
      ShowHint = True
      TabOrder = 1
      OnMouseDown = panelResMouseDown
      OnMouseUp = panelResMouseUp
    end
  end
  object panelWaves: TPanel
    Left = 0
    Top = 50
    Width = 112
    Height = 205
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 1
    object Panel1: TPanel
      Left = 0
      Top = 0
      Width = 112
      Height = 21
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 0
      object Label3: TLabel
        Left = 5
        Top = 3
        Width = 79
        Height = 14
        Caption = 'Samples in track'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
      end
    end
    object Panel4: TPanel
      Left = 0
      Top = 21
      Width = 112
      Height = 184
      Align = alClient
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Caption = 'Panel4'
      TabOrder = 1
      object samples: TScroll
        Left = 0
        Top = 0
        Width = 108
        Height = 180
        TabOrder = 0
        ParentFont = False
        PopupMenu = PopupWaves
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold, fsItalic]
        Align = alClient
        Color = clBlack
        OnPaint = samplesPaint
        OnMouseDown = samplesMouseDown
      end
    end
  end
  object Panel7: TPanel
    Left = 115
    Top = 50
    Width = 410
    Height = 205
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel7'
    TabOrder = 2
    object Panel2: TPanel
      Left = 0
      Top = 0
      Width = 410
      Height = 205
      Align = alClient
      BevelOuter = bvNone
      Caption = 'Panel2'
      TabOrder = 0
      object panelMeter: TPanel
        Left = 0
        Top = 0
        Width = 410
        Height = 21
        Align = alTop
        BevelOuter = bvNone
        BorderStyle = bsSingle
        Caption = 'panelMeter'
        TabOrder = 0
        object meter: TScroll
          Left = 0
          Top = 0
          Width = 406
          Height = 17
          TabOrder = 0
          ParentFont = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clGray
          Font.Height = -9
          Font.Name = 'Small Fonts'
          Font.Style = []
          Align = alClient
          Color = clWhite
          OnPaint = meterPaint
          OnMouseDown = meterMouseDown
          OnMouseMove = meterMouseMove
          OnMouseUp = meterMouseUp
        end
      end
      object Panel3: TPanel
        Left = 0
        Top = 21
        Width = 410
        Height = 184
        Align = alClient
        BevelOuter = bvNone
        BorderStyle = bsSingle
        Caption = 'Panel3'
        TabOrder = 1
        OnResize = Panel3Resize
        object audio: TScroll
          Left = 0
          Top = 0
          Width = 390
          Height = 164
          TabOrder = 0
          ParentFont = False
          Font.Charset = ANSI_CHARSET
          Font.Color = clWhite
          Font.Height = -11
          Font.Name = 'Arial'
          Font.Style = [fsBold, fsItalic]
          Align = alClient
          Color = clBlack
          OnPaint = audioPaint
          OnMouseDown = audioMouseDown
          OnMouseMove = audioMouseMove
          OnMouseUp = audioMouseUp
        end
        object Panel5: TPanel
          Left = 390
          Top = 0
          Width = 16
          Height = 164
          Align = alRight
          BevelOuter = bvNone
          Caption = 'Panel5'
          TabOrder = 1
          object sbVertLess: TSpeedButton
            Left = 1
            Top = 131
            Width = 15
            Height = 16
            Hint = 'Zoom in'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            Glyph.Data = {
              BE000000424DBE00000000000000760000002800000009000000090000000100
              0400000000004800000000000000000000001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
              0000FFFFFFFFF0000000CCCCCCCCC0000000FCCCCCCCF0000000FFCCCCCFF000
              0000FFFCCCFFF0000000FFFFCFFFF0000000FFFFFFFFF0000000FFFFFFFFF000
              0000}
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            Spacing = 0
            OnClick = sbVertLessClick
          end
          object sbVertMore: TSpeedButton
            Left = 1
            Top = 147
            Width = 15
            Height = 16
            Hint = 'Zoom out'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            Glyph.Data = {
              BE000000424DBE00000000000000760000002800000009000000090000000100
              0400000000004800000000000000000000001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
              0000FFFFFFFFF0000000FFFFCFFFF0000000FFFCCCFFF0000000FFCCCCCFF000
              0000FCCCCCCCF0000000CCCCCCCCC0000000FFFFFFFFF0000000FFFFFFFFF000
              0000}
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            Spacing = 0
            OnClick = sbVertMoreClick
          end
          object sbKeyVert: TScrollBar
            Left = 0
            Top = 0
            Width = 16
            Height = 121
            Kind = sbVertical
            TabOrder = 0
            TabStop = False
            OnChange = sbKeyVertChange
          end
        end
        object Panel8: TPanel
          Left = 0
          Top = 164
          Width = 406
          Height = 16
          Align = alBottom
          BevelOuter = bvNone
          Caption = 'Panel8'
          TabOrder = 2
          object sbNavigator: TSpeedButton
            Left = 288
            Top = 0
            Width = 15
            Height = 16
            Hint = 'Transporter on/off'
            Caption = 'T'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlue
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            Spacing = 0
            OnClick = sbNavigatorClick
          end
          object sbHorzLess: TSpeedButton
            Left = 305
            Top = 0
            Width = 15
            Height = 16
            Hint = 'Zoom in'
            Enabled = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            Glyph.Data = {
              BE000000424DBE00000000000000760000002800000009000000090000000100
              0400000000004800000000000000000000001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFCFF000
              0000FFFFFCCFF0000000FFFFCCCFF0000000FFFCCCCFF0000000FFCCCCCFF000
              0000FFFCCCCFF0000000FFFFCCCFF0000000FFFFFCCFF0000000FFFFFFCFF000
              0000}
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            Spacing = 0
          end
          object sbHorzMore: TSpeedButton
            Left = 329
            Top = 0
            Width = 15
            Height = 16
            Hint = 'Zoom out'
            Enabled = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            Glyph.Data = {
              BE000000424DBE00000000000000760000002800000009000000090000000100
              0400000000004800000000000000000000001000000000000000000000000000
              80000080000000808000800000008000800080800000C0C0C000808080000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFCFFFFFF000
              0000FFCCFFFFF0000000FFCCCFFFF0000000FFCCCCFFF0000000FFCCCCCFF000
              0000FFCCCCFFF0000000FFCCCFFFF0000000FFCCFFFFF0000000FFCFFFFFF000
              0000}
            ParentFont = False
            ParentShowHint = False
            ShowHint = True
            Spacing = 0
          end
          object sbKeyHorz: TScrollBar
            Left = 71
            Top = 0
            Width = 121
            Height = 16
            Max = 0
            TabOrder = 0
            TabStop = False
            OnChange = sbKeyHorzChange
          end
          object Panel9: TPanel
            Left = 390
            Top = 0
            Width = 16
            Height = 16
            Align = alRight
            BevelOuter = bvNone
            Caption = 'Panel9'
            TabOrder = 1
            object SpeedButton2: TSpeedButton
              Left = 0
              Top = 0
              Width = 15
              Height = 16
              Hint = 'Zoom 1:1'
              Enabled = False
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              Glyph.Data = {
                C6000000424DC60000000000000076000000280000000A0000000A0000000100
                0400000000005000000000000000000000001000000000000000000000000000
                80000080000000808000800000008000800080800000C0C0C000808080000000
                FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFF00
                0000FCCCCCCFFF000000FCCCCCFFFF000000FCCCCFFFCF000000FCCCFFFCCF00
                0000FCCFFFCCCF000000FCFFFCCCCF000000FFFFCCCCCF000000FFFCCCCCCF00
                0000FFFFFFFFFF000000}
              ParentFont = False
              ParentShowHint = False
              ShowHint = True
              Spacing = 0
            end
          end
        end
      end
    end
  end
  object Panel10: TPanel
    Left = 0
    Top = 25
    Width = 525
    Height = 25
    Hint = 'Toolbar'
    Align = alTop
    BevelOuter = bvNone
    Color = 13421772
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    object Label4: TLabel
      Left = 5
      Top = 6
      Width = 43
      Height = 14
      Caption = 'Volume'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 101
      Top = 6
      Width = 20
      Height = 14
      Caption = 'Pan'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Panel11: TPanel
      Left = 60
      Top = 3
      Width = 30
      Height = 19
      BevelOuter = bvNone
      Color = clBlack
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      TabOrder = 0
      object editVolume: TEditNew
        Left = 3
        Top = 3
        Width = 34
        Height = 21
        Hint = 'Tempo'
        TabStop = False
        BorderStyle = bsNone
        Color = clBlack
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        PopupMenu = fmArrange.PopupTempo
        ShowHint = True
        TabOrder = 0
        OnKeyDown = editVolumeKeyDown
        FocusColor = clBlack
        FocusFontColor = clWhite
        NoFocusColor = clBlack
        NoFocusFontColor = clWhite
      end
    end
    object Panel12: TPanel
      Left = 132
      Top = 3
      Width = 30
      Height = 19
      BevelOuter = bvNone
      Color = clBlack
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = False
      TabOrder = 1
      object editPan: TEditNew
        Left = 3
        Top = 3
        Width = 34
        Height = 21
        Hint = 'Tempo'
        TabStop = False
        BorderStyle = bsNone
        Color = clBlack
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        PopupMenu = fmArrange.PopupTempo
        ShowHint = True
        TabOrder = 0
        OnDblClick = editBpmDblClick
        OnKeyDown = editBpmKeyDown
        OnKeyPress = editBpmKeyPress
        FocusColor = clBlack
        FocusFontColor = clWhite
        NoFocusColor = clBlack
        NoFocusFontColor = clWhite
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 8
    Top = 56
    object Edit1: TMenuItem
      Caption = '&Edit'
      GroupIndex = 5
      OnClick = Edit1Click
      object Undo1: TMenuItem
        Caption = '&Undo'
        ShortCut = 16474
        OnClick = Undo1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Selectall1: TMenuItem
        Caption = 'Select &all'
        ShortCut = 16449
        OnClick = Selectall1Click
      end
      object N3: TMenuItem
        Caption = '-'
        Enabled = False
      end
      object Songedit1: TMenuItem
        Caption = '&Song edit'
        ShortCut = 27
        OnClick = Songedit1Click
      end
    end
    object Part1: TMenuItem
      Caption = '&Part'
      GroupIndex = 5
      object Legato1: TMenuItem
        Caption = '&Legato'
        OnClick = Legato1Click
      end
      object Length2: TMenuItem
        Caption = 'L&ength'
        OnClick = Length2Click
      end
      object Quantize1: TMenuItem
        Caption = '&Quantize'
        OnClick = Quantize1Click
      end
    end
    object Waveform1: TMenuItem
      Caption = '&Samples'
      GroupIndex = 5
      OnClick = Waveform1Click
      object Add1: TMenuItem
        Caption = '&Add...'
        OnClick = Add1Click
      end
      object Delete1: TMenuItem
        Caption = '&Delete'
        OnClick = Delete1Click
      end
    end
    object Event1: TMenuItem
      Caption = '&Event'
      GroupIndex = 5
      object Delete3: TMenuItem
        Caption = '&Delete'
        ShortCut = 46
        OnClick = Delete3Click
      end
    end
    object Show1: TMenuItem
      Caption = '&Show'
      GroupIndex = 5
      object Toolbar1: TMenuItem
        Caption = 'T&oolbar'
        Enabled = False
      end
      object Editbar1: TMenuItem
        Caption = '&Editbar'
        Enabled = False
      end
      object Waves1: TMenuItem
        Caption = '&Samples'
        OnClick = Waves1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Transporter1: TMenuItem
        Caption = '&Transporter'
        OnClick = Transporter1Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 40
    Top = 56
  end
  object Popupres: TPopupMenu
    Left = 408
    object N641: TMenuItem
      Caption = '64'
      OnClick = N641Click
    end
    object N321: TMenuItem
      Caption = '32'
      OnClick = N321Click
    end
    object N162: TMenuItem
      Caption = '16'
      OnClick = N162Click
    end
    object N81: TMenuItem
      Caption = '8'
      OnClick = N81Click
    end
    object N42: TMenuItem
      Caption = '4'
      OnClick = N42Click
    end
    object N22: TMenuItem
      Caption = '2'
      OnClick = N22Click
    end
    object N64T1: TMenuItem
      Break = mbBarBreak
      Caption = '64T'
      Enabled = False
    end
    object N32T1: TMenuItem
      Caption = '32T'
      Enabled = False
    end
    object N16T1: TMenuItem
      Caption = '16T'
      Enabled = False
    end
    object N8T1: TMenuItem
      Caption = '8T'
      Enabled = False
    end
    object N4T1: TMenuItem
      Caption = '4T'
      Enabled = False
    end
    object N2T1: TMenuItem
      Caption = '2T'
      Enabled = False
    end
  end
  object PopupWaves: TPopupMenu
    OnPopup = PopupWavesPopup
    Left = 18
    Top = 168
    object Add2: TMenuItem
      Caption = 'Add...'
      OnClick = Add2Click
    end
    object Delete2: TMenuItem
      Caption = 'Delete'
      OnClick = Delete2Click
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Audition1: TMenuItem
      Caption = 'Audition'
      OnClick = Audition1Click
    end
    object Fullrelease1: TMenuItem
      Caption = 'Full release'
      Enabled = False
    end
  end
  object scrollTimer: TTimer
    Enabled = False
    Interval = 50
    OnTimer = scrollTimerTimer
    Left = 447
    Top = 166
  end
end