Geek 6/Geek-006.iso/audio/composicao/dflow170.exe/drumflow.exe/0/RCDATA/TSETTING1/TSETTING1.txt

Text File | 2000-10-23 | 7KB | 335 lines

object Setting1: TSetting1
  Left = 201
  Top = 121
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'DrumFlow Settings'
  ClientHeight = 270
  ClientWidth = 374
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = -4
    Top = 236
    Width = 381
    Height = 9
    Shape = bsTopLine
  end
  object Button1: TButton
    Left = 0
    Top = 244
    Width = 97
    Height = 25
    Caption = '&Ok'
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 100
    Top = 244
    Width = 97
    Height = 25
    Cancel = True
    Caption = '&Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object CheckBox3: TCheckBox
    Left = 8
    Top = 216
    Width = 233
    Height = 17
    Caption = 'Save setting when closing this dialog'
    TabOrder = 2
  end
  object PC1: TPageControl
    Left = 4
    Top = 4
    Width = 369
    Height = 209
    ActivePage = TS3
    TabOrder = 3
    object TS1: TTabSheet
      Caption = 'MIDI'
      object Label29: TLabel
        Left = 4
        Top = 132
        Width = 69
        Height = 13
        Caption = 'Drum channel:'
      end
      object Label28: TLabel
        Left = 4
        Top = 4
        Width = 353
        Height = 13
        AutoSize = False
        Caption = 'Select primary MIDI device for output:'
      end
      object Label1: TLabel
        Left = 4
        Top = 44
        Width = 340
        Height = 13
        Caption =
          'Select secondary MIDI device for output (used if primary device ' +
          'is busy):'
      end
      object Label2: TLabel
        Left = 4
        Top = 84
        Width = 160
        Height = 13
        Caption = 'Select MIDI sync device for input:'
      end
      object CB2: TComboBox
        Left = 80
        Top = 128
        Width = 37
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        Items.Strings = (
          '1'
          '2'
          '3'
          '4'
          '5'
          '6'
          '7'
          '8'
          '9'
          '10'
          '11'
          '12'
          '13'
          '14'
          '15'
          '16')
        TabOrder = 0
      end
      object ComboBox1: TComboBox
        Left = 4
        Top = 20
        Width = 353
        Height = 21
        Style = csDropDownList
        DropDownCount = 10
        ItemHeight = 0
        TabOrder = 1
      end
      object CheckBox5: TCheckBox
        Left = 244
        Top = 132
        Width = 113
        Height = 17
        Caption = 'Disable MIDI output'
        TabOrder = 2
      end
      object midiout2: TComboBox
        Left = 4
        Top = 60
        Width = 353
        Height = 21
        Style = csDropDownList
        DropDownCount = 10
        ItemHeight = 0
        TabOrder = 3
      end
      object midisync: TComboBox
        Left = 4
        Top = 100
        Width = 353
        Height = 21
        Style = csDropDownList
        ItemHeight = 0
        TabOrder = 4
      end
      object btn1: TButton
        Left = 4
        Top = 152
        Width = 121
        Height = 25
        Caption = 'MIDI drums settings...'
        TabOrder = 5
        OnClick = btn1Click
      end
    end
    object TS2: TTabSheet
      Caption = 'Display'
      object RG1: TRadioGroup
        Left = 4
        Top = 4
        Width = 181
        Height = 61
        Caption = ' Show drum number as: '
        ItemIndex = 0
        Items.Strings = (
          'Patch number (23, 47...)'
          'Note name (C3, A#6...)')
        TabOrder = 0
      end
      object backgrinfo: TRadioGroup
        Left = 4
        Top = 68
        Width = 353
        Height = 73
        Caption = ' Background bitmap: '
        ItemIndex = 0
        Items.Strings = (
          'Internal'
          'None'
          'User defined:')
        TabOrder = 1
      end
      object backpath: TEdit
        Left = 100
        Top = 116
        Width = 229
        Height = 21
        TabOrder = 2
      end
      object Button3: TButton
        Left = 332
        Top = 116
        Width = 21
        Height = 21
        Hint = 'Define your own background!'
        Caption = '...'
        TabOrder = 3
        OnClick = Button3Click
      end
    end
    object TS3: TTabSheet
      Caption = 'Other'
      object CheckBox1: TCheckBox
        Left = 4
        Top = 4
        Width = 137
        Height = 17
        Caption = 'Enable auto note off'
        State = cbChecked
        TabOrder = 0
      end
      object CheckBox2: TCheckBox
        Left = 4
        Top = 24
        Width = 241
        Height = 17
        Caption = 'Enable auto play when selecting drum in listbox'
        Color = clBtnFace
        ParentColor = False
        ParentShowHint = False
        ShowHint = False
        State = cbChecked
        TabOrder = 1
      end
      object cb4: TCheckBox
        Left = 4
        Top = 44
        Width = 253
        Height = 17
        Caption = 'Enable edit'#39'n'#39'play feature'
        State = cbChecked
        TabOrder = 2
      end
      object cbvsauto: TCheckBox
        Left = 4
        Top = 64
        Width = 353
        Height = 17
        Caption = 'Auto apply the shortcuts in '#39'Volume slide'#39' window'
        State = cbChecked
        TabOrder = 3
      end
    end
    object TS4: TTabSheet
      Caption = 'QS-Voices'
      object l3: TLabel
        Left = 4
        Top = 4
        Width = 164
        Height = 13
        Caption = 'QS-Voice SYSEX default directory:'
      end
      object QsDir: TEdit
        Left = 4
        Top = 20
        Width = 333
        Height = 21
        TabOrder = 0
      end
      object Button4: TButton
        Left = 340
        Top = 20
        Width = 21
        Height = 21
        Caption = '...'
        TabOrder = 1
        OnClick = Button4Click
      end
    end
    object TS5: TTabSheet
      Caption = 'MIDI Drums'
      object Label3: TLabel
        Left = 4
        Top = 4
        Width = 123
        Height = 13
        Caption = 'Select the drum kits bank:'
      end
      object Label4: TLabel
        Left = 4
        Top = 44
        Width = 303
        Height = 13
        Caption =
          'You can modify drumkits.ini file to add your own drum kits banks' +
          '.'
      end
      object cbdrumkits: TComboBox
        Left = 4
        Top = 20
        Width = 357
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 0
      end
      object dseb: TCheckBox
        Left = 4
        Top = 60
        Width = 353
        Height = 17
        Caption = 'Don'#39't show empty banks'
        TabOrder = 1
        Visible = False
      end
    end
  end
  object opd1: TOpenPictureDialog
    Filter =
      'All (*.bmp;*.ico;*.emf;*.wmf)|*.bmp;*.ico;*.emf;*.wmf|Bitmaps (*' +
      '.bmp)|*.bmp|Icons (*.ico)|*.ico|Enhanced Metafiles (*.emf)|*.emf' +
      '|Metafiles (*.wmf)|*.wmf'
    Left = 340
    Top = 240
  end
  object dirdlg: TOpenDialog
    Title = 'Select any file in your QS directory...'
    Left = 308
    Top = 240
  end
end