object fmOptions: TfmOptions Left = 144 Top = 107 BorderIcons = [] BorderStyle = bsDialog Caption = 'Options' ClientHeight = 368 ClientWidth = 461 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False ShowHint = True OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 120 TextHeight = 16 object Label1: TLabel Left = 16 Top = 332 Width = 273 Height = 37 AutoSize = False Caption = 'Note: options marked with (+) will not take effect until the nex' + 't time you start Clarion.' WordWrap = True end object bOk: TButton Left = 300 Top = 334 Width = 73 Height = 29 Caption = 'O&kay' Default = True ModalResult = 1 TabOrder = 1 end object bCancel: TButton Left = 384 Top = 334 Width = 73 Height = 29 Caption = '&Cancel' ModalResult = 2 TabOrder = 2 end object PageControl: TPageControl Left = 4 Top = 4 Width = 453 Height = 317 ActivePage = tbReset MultiLine = True TabOrder = 0 object tbReset: TTabSheet Caption = 'MIDI reset' object gbMIDIReset: TGroupBox Left = 0 Top = 0 Width = 445 Height = 265 Align = alClient TabOrder = 0 object Label3: TLabel Left = 89 Top = 136 Width = 128 Height = 16 Caption = 'Custom reset MIDI file' end object Label7: TLabel Left = 64 Top = 16 Width = 315 Height = 32 Caption = 'Select a reset type that best suits your sound card, or select a' + ' custom MIDI file to be used to reset your card' WordWrap = True end object bCustom: TButton Left = 93 Top = 160 Width = 237 Height = 25 Enabled = False TabOrder = 1 OnClick = bCustomClick end object cbAutoReset: TCheckBox Left = 87 Top = 200 Width = 294 Height = 17 Caption = 'Automatically reset before playing each song' TabOrder = 2 end object bResetNow: TButton Left = 93 Top = 228 Width = 237 Height = 25 Caption = 'Reset MIDI now !' TabOrder = 3 OnClick = bResetNowClick end object rgReset: TRadioGroup Left = 80 Top = 56 Width = 297 Height = 73 Caption = 'Reset type' Columns = 2 Items.Strings = ( 'GM (General MIDI) ' 'GS (Roland)' 'XG (Yamaha)' 'Custom') TabOrder = 0 OnClick = rgResetClick end end end object TabSheet1: TTabSheet Caption = 'Startup and Save Options' object GroupBox1: TGroupBox Left = 0 Top = 0 Width = 445 Height = 265 Align = alClient TabOrder = 0 object GroupBox2: TGroupBox Left = 48 Top = 16 Width = 345 Height = 133 Caption = 'Startup Options' TabOrder = 0 object cbIgnoreCD: TCheckBox Left = 12 Top = 28 Width = 161 Height = 17 Caption = 'Ignore CD left in drive' TabOrder = 0 end object cbReopenFiles: TCheckBox Left = 12 Top = 76 Width = 249 Height = 17 Caption = 'Reopen previously opened play lists' TabOrder = 2 end object cbSleepOnStartUp: TCheckBox Left = 12 Top = 100 Width = 209 Height = 17 Caption = 'Always start up in Sleep mode' TabOrder = 3 end object cbOpenCDPLS: TCheckBox Left = 12 Top = 52 Width = 225 Height = 17 Caption = 'Open playlist linked to current CD' TabOrder = 1 end end object rgSave: TRadioGroup Left = 48 Top = 160 Width = 345 Height = 93 Caption = 'Save Options' Items.Strings = ( 'Automatically save modified play lists when closing' 'Discard changes (I will save manually)' 'Ask me') TabOrder = 1 end end end object tbVol: TTabSheet Caption = 'Volume Control' object gbVolumeCtl: TGroupBox Left = 0 Top = 0 Width = 445 Height = 265 Align = alClient TabOrder = 0 object Label4: TLabel Left = 78 Top = 24 Width = 271 Height = 64 Caption = 'By default, Clarion uses Windows'#39' volume control program (sndvol' + '32.exe). If your sound card comes with a different volume contr' + 'ol program, click the button below and select it.' WordWrap = True end object Label5: TLabel Left = 78 Top = 148 Width = 293 Height = 73 AutoSize = False Caption = 'Next, enter the volume control program'#39's title below (as it appe' + 'ars in its window'#39's caption bar). This is used by Clarion to ac' + 'tivate the program without launching additional instances of it.' WordWrap = True end object bVolumeCtl: TButton Left = 90 Top = 104 Width = 245 Height = 25 TabOrder = 0 OnClick = bVolumeCtlClick end object edVolumeCtlTitle: TEdit Left = 90 Top = 228 Width = 245 Height = 24 AutoSize = False TabOrder = 1 end end end object tbLoc: TTabSheet Caption = 'File Location' object gbLocation: TGroupBox Left = 0 Top = 0 Width = 445 Height = 265 Align = alClient TabOrder = 0 object Label2: TLabel Left = 82 Top = 36 Width = 281 Height = 80 Caption = 'By default, Clarion places *.cdl files in same the directory yo' + 'u installed it in. (*.cdl files store the track titles of your ' + 'CDs.) If you have moved these files to a different directory, t' + 'hen specify the new location by clicking the button below. (+)' WordWrap = True end object bCDLDir: TButton Left = 94 Top = 144 Width = 245 Height = 25 TabOrder = 0 OnClick = bCDLDirClick end end end object tbReg: TTabSheet Caption = 'Windows registry' object gbAssoc: TGroupBox Left = 0 Top = 0 Width = 445 Height = 265 Align = alClient TabOrder = 0 object Label6: TLabel Left = 85 Top = 16 Width = 275 Height = 32 Alignment = taCenter Caption = 'Specify whether you want to use Clarion as the default player fo' + 'r MIDI and / or CD' WordWrap = True end object bClarionCD: TButton Left = 109 Top = 68 Width = 245 Height = 25 Caption = 'Make Clarion the default CD player' ParentShowHint = False ShowHint = False TabOrder = 0 OnClick = Assoc end object bWinCD: TButton Left = 109 Top = 120 Width = 245 Height = 25 Caption = 'Use Window'#39's CD Player' ParentShowHint = False ShowHint = False TabOrder = 1 OnClick = Assoc end object bClarionMIDI: TButton Left = 109 Top = 172 Width = 245 Height = 25 Caption = 'Make Clarion the default MIDI player' ParentShowHint = False ShowHint = False TabOrder = 2 OnClick = Assoc end object bWinMIDI: TButton Left = 109 Top = 224 Width = 245 Height = 25 Caption = 'Use Window'#39's Media player' ParentShowHint = False ShowHint = False TabOrder = 3 OnClick = Assoc end end end object tbMisc: TTabSheet Caption = 'Misc' object gbMisc: TGroupBox Left = 0 Top = 0 Width = 445 Height = 265 Align = alClient TabOrder = 0 object lbFont: TLabel Left = 324 Top = 72 Width = 109 Height = 28 Cursor = 1 Alignment = taCenter AutoSize = False Caption = 'Current font' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False WordWrap = True OnClick = bFontClick end object Label9: TLabel Left = 20 Top = 34 Width = 41 Height = 16 AutoSize = False Caption = 'Delay' end object Label10: TLabel Left = 116 Top = 34 Width = 184 Height = 16 Caption = 'seconds between songs (0..60)' end object bFont: TButton Left = 336 Top = 112 Width = 85 Height = 25 Caption = 'Change font' TabOrder = 4 OnClick = bFontClick end object cbMultiline: TCheckBox Left = 20 Top = 69 Width = 281 Height = 24 Caption = 'Allow multiple rows of tabs in the play list (+)' TabOrder = 1 end object cbAllowDups: TCheckBox Left = 20 Top = 105 Width = 225 Height = 17 Caption = 'Allow duplicate entries in play lists' TabOrder = 2 end object rgHint: TRadioGroup Left = 80 Top = 164 Width = 281 Height = 89 Caption = 'Hint Display' Items.Strings = ( 'Show all hints (status bar and popup hints)' 'Show popup hints only' 'Don'#39't show any hint') TabOrder = 5 end object edDelay: TSpinEdit Left = 64 Top = 32 Width = 49 Height = 26 MaxValue = 300 MinValue = 0 TabOrder = 0 Value = 0 end object cbCloseCDPLS: TCheckBox Left = 20 Top = 136 Width = 257 Height = 17 Caption = 'Close linked playlist when ejecting CD' TabOrder = 3 end end end end end