object drumDlg: TdrumDlg
  Left = 202
  Top = 108
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'Drum track(s) and channel(s)'
  ClientHeight = 239
  ClientWidth = 304
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object CancelBtn: TBitBtn
    Left = 116
    Top = 206
    Width = 77
    Height = 27
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    Kind = bkCancel
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object HelpBtn: TBitBtn
    Left = 200
    Top = 206
    Width = 77
    Height = 27
    HelpContext = 1000
    Caption = 'Help'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    OnClick = HelpBtnClick
    Kind = bkHelp
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 289
    Height = 185
    TabOrder = 0
    object addButton: TButton
      Left = 64
      Top = 24
      Width = 77
      Height = 27
      Caption = 'Add'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = addButtonClick
    end
    object deleteButton: TButton
      Left = 152
      Top = 24
      Width = 77
      Height = 27
      Caption = 'Remove'
      Enabled = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = deleteButtonClick
    end
    object StringGrid1: TStringGrid
      Left = 8
      Top = 65
      Width = 274
      Height = 112
      ColCount = 2
      FixedCols = 0
      RowCount = 2
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goTabs]
      ParentFont = False
      ScrollBars = ssVertical
      TabOrder = 2
      OnClick = StringGrid1Click
      OnEnter = StringGrid1Enter
      OnExit = StringGrid1Exit
      OnKeyPress = StringGrid1KeyPress
      OnSelectCell = StringGrid1SelectCell
      ColWidths = (
        138
        131)
    end
  end
  object OKbutton: TBitBtn
    Left = 32
    Top = 206
    Width = 77
    Height = 27
    Caption = 'OK'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ModalResult = 1
    ParentFont = False
    TabOrder = 1
    OnClick = OKbuttonClick
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000000000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333377F3333333333000033334224333333333333
      337337F3333333330000333422224333333333333733337F3333333300003342
      222224333333333373333337F3333333000034222A22224333333337F337F333
      7F33333300003222A3A2224333333337F3737F337F33333300003A2A333A2224
      33333337F73337F337F33333000033A33333A222433333337333337F337F3333
      0000333333333A222433333333333337F337F33300003333333333A222433333
      333333337F337F33000033333333333A222433333333333337F337F300003333
      33333333A222433333333333337F337F00003333333333333A22433333333333
      3337F37F000033333333333333A223333333333333337F730000333333333333
      333A333333333333333337330000333333333333333333333333333333333333
      0000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
end