object FrmBackgroundSound: TFrmBackgroundSound
  Left = 217
  Top = 356
  BorderStyle = bsDialog
  Caption = 'Background sound'
  ClientHeight = 71
  ClientWidth = 424
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  TextHeight = 16
  object lblLoops: TLabel
    Left = 8
    Top = 40
    Width = 29
    Height = 13
    Caption = '&Loops'
    FocusControl = seLoops
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lblSoundFile: TLabel
    Left = 8
    Top = 8
    Width = 47
    Height = 13
    Caption = '&Sound file'
    FocusControl = EditSoundFile
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object EditSoundFile: TEdit
    Left = 64
    Top = 8
    Width = 257
    Height = 21
    Hint = 'Sound file'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
  end
  object btnOK: TButton
    Left = 232
    Top = 40
    Width = 89
    Height = 25
    Caption = 'OK'
    Default = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 4
  end
  object btnCancel: TButton
    Left = 328
    Top = 40
    Width = 89
    Height = 25
    Caption = 'Cancel'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 5
  end
  object cbInfiniteLoop: TCheckBox
    Left = 143
    Top = 42
    Width = 81
    Height = 17
    Hint = 'Should the sound repeat forever ?'
    Caption = ' &Infinite loop'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnClick = cbInfiniteLoopClick
  end
  object seLoops: TSpinEdit
    Left = 64
    Top = 40
    Width = 65
    Height = 22
    Hint = 'How often should the sound file replayed ?'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MaxValue = 100000
    MinValue = 0
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 2
    Value = 0
  end
  object btnBrowse: TBitBtn
    Left = 328
    Top = 7
    Width = 89
    Height = 22
    Hint = 'Browse for a sound file ?'
    Caption = '&Browse'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnClick = btnBrowseClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      77777777777777777777000000000007777700333333333077770B0333333333
      07770FB03333333330770BFB0333333333070FBFB000000000000BFBFBFBFB07
      77770FBFBFBFBF0777770BFB0000000777777000777777770007777777777777
      7007777777770777070777777777700077777777777777777777}
  end
  object DlgSoundFile: TOpenDialog
    DefaultExt = 'wav'
    FileEditStyle = fsEdit
    FileName = '*.wav'
    Filter = 'Wave Audio|*.wav|All files|*.*'
    Options = [ofHideReadOnly]
    Title = 'Select sound file'
    Left = 272
    Top = 64
  end
end