object fmOptions: TfmOptions Left = 136 Top = 75 HelpContext = 3 BorderStyle = bsDialog Caption = 'Options' ClientHeight = 277 ClientWidth = 372 Color = clSilver Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsItalic] Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object RotateLabel1: TRotateLabel Left = 285 Top = 246 Width = 80 Height = 29 Cursor = crHandPoint Hint = 'Click for help' Escapement = 5 TextStyle = tsRecessed Caption = 'Options' Font.Charset = DEFAULT_CHARSET Font.Color = clSilver Font.Height = -21 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True Transparent = True OnClick = RotateLabel1Click end object PageControl1: TPage95Control Left = 80 Top = 8 Width = 281 Height = 241 ActivePage = TabMidi ButtonStyle = True FlatButtons = True FlatSeperators = False Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] HotTrack = True TabInactiveColor = clSilver TabInactiveFont.Charset = ANSI_CHARSET TabInactiveFont.Color = clBlack TabInactiveFont.Height = -11 TabInactiveFont.Name = 'Arial' TabInactiveFont.Style = [] ParentFont = False TabOrder = 0 OnChange = PageControl1Change object TabFile: TTab95Sheet Caption = 'File' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsItalic] GripAlign = gaLeft ImageIndex = -1 StaticPageIndex = -1 ParentFont = False TabVisible = True object Label8: TLabel Left = 16 Top = 88 Width = 71 Height = 14 Caption = 'Song directory' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object SpeedButton8: TSpeedButton Left = 224 Top = 104 Width = 17 Height = 17 Hint = 'Show/hide directory' Caption = '...' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True OnClick = SpeedButton8Click end object chkAutoplay: TCheckBox Left = 16 Top = 40 Width = 193 Height = 17 Caption = 'Start playback on start-up' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 0 OnClick = chkAutoplayClick end object chkAautoload: TCheckBox Left = 16 Top = 16 Width = 201 Height = 17 Caption = 'Open last saved song on start-up' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = chkAautoloadClick end object editPath: TEdit Left = 16 Top = 104 Width = 201 Height = 22 Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 end object DirectoryListBox1: TDirectoryListBox Left = 16 Top = 104 Width = 201 Height = 105 Cursor = crHandPoint Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ItemHeight = 16 ParentFont = False TabOrder = 3 Visible = False OnChange = DirectoryListBox1Change end object chkConvert: TCheckBox Left = 16 Top = 64 Width = 233 Height = 17 Caption = 'Split MIDI files format 0 on MIDI channels' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 4 OnClick = chkConvertClick end end object TabBeep: TTab95Sheet Caption = 'Beep' GripAlign = gaLeft ImageIndex = -1 StaticPageIndex = -1 TabVisible = True object Label1: TLabel Left = 120 Top = 73 Width = 13 Height = 14 Caption = 'Ch' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 184 Top = 73 Width = 22 Height = 14 Caption = 'Note' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 32 Top = 101 Width = 32 Height = 14 Caption = 'Output' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label3: TLabel Left = 32 Top = 172 Width = 28 Height = 14 Caption = 'Beats' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Bevel1: TBevel Left = 16 Top = 128 Width = 233 Height = 3 Style = bsRaised end object chkActive: TCheckBox Left = 16 Top = 16 Width = 57 Height = 17 Caption = 'Active' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 0 OnClick = chkActiveClick end object chkPrecount: TCheckBox Left = 16 Top = 141 Width = 70 Height = 17 Caption = 'Precount' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 1 OnClick = chkPrecountClick end object chkInternal: TCheckBox Left = 32 Top = 44 Width = 81 Height = 17 Hint = 'Use internal metronom' Caption = 'PC speaker' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = chkInternalClick end object chkMidiBeep: TCheckBox Left = 32 Top = 72 Width = 49 Height = 17 Hint = 'Use metronom thru midi' Caption = 'MIDI' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True State = cbChecked TabOrder = 3 OnClick = chkMidiBeepClick end object editCh: TEdit Left = 139 Top = 70 Width = 23 Height = 21 Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 Text = '1' OnChange = editChChange OnKeyPress = editChKeyPress end object editNote: TEdit Left = 219 Top = 70 Width = 28 Height = 21 Hint = 'Input note with midi-keyboard' Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 5 Text = 'C#1' end object comboDev: TComboBox Left = 80 Top = 97 Width = 169 Height = 21 Style = csDropDownList Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 6 OnChange = comboDevChange end object editBeats: TEditNew Left = 72 Top = 168 Width = 25 Height = 21 Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 2 ParentFont = False TabOrder = 7 Text = '4' OnChange = editBeatsChange OnExit = editBeatsExit OnKeyPress = editBeatsKeyPress FocusColor = clBlack FocusFontColor = clWhite NoFocusColor = clBlack NoFocusFontColor = clWhite end object RadioButton1: TRadioButton Left = 120 Top = 44 Width = 49 Height = 17 Caption = 'Low' Checked = True Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 8 TabStop = True end object RadioButton2: TRadioButton Left = 184 Top = 44 Width = 49 Height = 17 Caption = 'High' Enabled = False Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 9 end end object TabMidi: TTab95Sheet Caption = 'MIDI' GripAlign = gaLeft ImageIndex = -1 StaticPageIndex = -1 TabVisible = True object SpeedButton7: TSpeedButton Left = 192 Top = 127 Width = 49 Height = 22 Caption = 'Apply' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton7Click end object Label5: TLabel Left = 16 Top = 108 Width = 133 Height = 14 Caption = 'Use this output on all tracks' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label4: TLabel Left = 16 Top = 52 Width = 67 Height = 14 Caption = 'Default output' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 16 Top = 4 Width = 44 Height = 14 Caption = 'Midi input' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object comboTrackOutput: TComboBox Left = 16 Top = 128 Width = 169 Height = 21 Hint = 'Default output on start-up' Style = csDropDownList Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 OnChange = comboDevDefaultChange end object comboDevDefault: TComboBox Left = 16 Top = 72 Width = 169 Height = 21 Hint = 'Default output on start-up' Style = csDropDownList Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 OnChange = comboDevDefaultChange end object comboInput: TComboBox Left = 16 Top = 24 Width = 169 Height = 21 Hint = 'Midi input device' Style = csDropDownList Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 OnChange = comboInputChange end object LedMeter: TCheckBox Left = 16 Top = 163 Width = 217 Height = 17 Caption = 'Show MIDI output led'#39's in tracks window' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 3 end end object TabGlobal: TTab95Sheet Caption = 'Tempo' GripAlign = gaLeft ImageIndex = -1 StaticPageIndex = -1 TabVisible = True object Label7: TLabel Left = 16 Top = 6 Width = 73 Height = 14 Caption = 'Tempo settings' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 16 Top = 126 Width = 257 Height = 28 AutoSize = False Caption = '� Right click on bpm in "Song edit" or "Part edit" to select one' + ' of the tempo settings' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True WordWrap = True end object Label12: TLabel Left = 16 Top = 158 Width = 257 Height = 27 AutoSize = False Caption = '� Double click to select the top tempo item' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False Transparent = True WordWrap = True end object memoTempo: TMemo Left = 16 Top = 24 Width = 113 Height = 89 BorderStyle = bsNone Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False ScrollBars = ssVertical TabOrder = 0 OnExit = memoTempoExit OnKeyPress = memoTempoKeyPress end end object TabLayout: TTab95Sheet Caption = 'Layout' GripAlign = gaLeft ImageIndex = -1 StaticPageIndex = -1 TabVisible = True object chkFlat: TCheckBox Left = 16 Top = 8 Width = 137 Height = 17 Caption = 'Flat buttons on toolbars' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 0 OnClick = chkFlatClick end object chkAnim: TCheckBox Left = 16 Top = 32 Width = 201 Height = 17 Caption = 'Show part contents while dragging' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = chkAnimClick end object chkLocation: TCheckBox Left = 16 Top = 56 Width = 217 Height = 17 Caption = 'Show location names in meter window' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 2 OnClick = chkLocationClick end end end object Panel1: TPanel Left = 0 Top = 0 Width = 70 Height = 277 Align = alLeft BevelOuter = bvNone FullRepaint = False Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clSilver Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 object labelText: TLabel Left = 8 Top = 58 Width = 57 Height = 175 AutoSize = False Caption = 'Select options for autosave and open last saved song at program ' + 'start' Color = clNavy Font.Charset = ANSI_CHARSET Font.Color = 8454143 Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True WordWrap = True end object btnClose: tnybutton Left = 7 Top = 6 Width = 57 Height = 25 Cursor = crHandPoint Cancel = True Caption = '&Close' Default = True Font.Charset = ANSI_CHARSET Font.Color = clSilver Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = btnCloseClick end end object TimerAutoSave: TTimer Interval = 300000 Left = 212 Top = 320 end object OpenPictureDialog1: TOpenPictureDialog Filter = 'All (*.dib;*.bmp;*.ico;*.emf;*.wmf)|*.dib;*.bmp;*.ico;*.emf;*.wm' + 'f|Device Independent Bitmap (*.dib)|*.dib|Bitmaps (*.bmp)|*.bmp|' + 'Icons (*.ico)|*.ico|Enhanced Metafiles (*.emf)|*.emf|Metafiles (' + '*.wmf)|*.wmf' Left = 244 Top = 320 end object ColorDialog1: TColorDialog Ctl3D = True Left = 176 Top = 320 end object Timer1: TTimer Enabled = False Interval = 10 OnTimer = Timer1Timer Left = 128 Top = 320 end end