PC World Komputer 1998 January/Pcwk0198.iso/Zadarmo/CLARION/CLARION.EXE/0/RCDATA/TFMOPTIONS/TFMOPTIONS.txt

Text File | 1997-10-06 | 11.1 KB | 441 lines

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