object Form1: TForm1
  Left = 292
  Top = 144
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Player'
  ClientHeight = 209
  ClientWidth = 208
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PrintScale = poNone
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 208
    Height = 25
    Align = alTop
    TabOrder = 0
    object btnPause: TSpeedButton
      Left = 0
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Pause'
      Enabled = False
      Glyph.Data = {
        6A000000424D6A000000000000003E00000028000000080000000B0000000100
        0100000000002C0000000000000000000000020000000000000000000000FFFF
        FF00FF0000009900000099000000990000009900000099000000990000009900
        00009900000099000000FF000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = btnPauseClick
    end
    object btnPlay: TSpeedButton
      Left = 24
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Play'
      Enabled = False
      Glyph.Data = {
        6A000000424D6A000000000000003E00000028000000080000000B0000000100
        0100000000002C0000000000000000000000020000000000000000000000FFFF
        FF00FF000000BF0000009F000000870000008300000081000000830000008700
        00009F000000BF000000FF000000}
      ParentShowHint = False
      ShowHint = True
      OnClick = btnPlayClick
    end
    object btnStop: TSpeedButton
      Left = 48
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Stop'
      Enabled = False
      Glyph.Data = {
        96000000424D9600000000000000760000002800000008000000080000000100
        0400000000002000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFF000
        000FF000000FF000000FF000000FF000000FF000000FFFFFFFFF}
      ParentShowHint = False
      ShowHint = True
      OnClick = btnStopClick
    end
    object btnBack: TSpeedButton
      Left = 72
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Back'
      Enabled = False
      Glyph.Data = {
        6A000000424D6A000000000000003E000000280000000C0000000B0000000100
        0100000000002C0000000000000000000000020000000000000000000000FFFF
        FF00FFF00000BFD00000BF100000BC100000B0100000A0100000B0100000BC10
        0000BF100000BFD00000FFF00000}
      ParentShowHint = False
      ShowHint = True
      OnClick = btnBackClick
    end
    object btnNext: TSpeedButton
      Left = 96
      Top = 0
      Width = 25
      Height = 25
      Hint = 'Next'
      Enabled = False
      Glyph.Data = {
        6A000000424D6A000000000000003E000000280000000C0000000B0000000100
        0100000000002C0000000000000000000000020000000000000000000000FFFF
        FF00FFF00000BFD000008FD0000083D0000080D000008050000080D0000083D0
        00008FD00000BFD00000FFF00000}
      ParentShowHint = False
      ShowHint = True
      OnClick = btnNextClick
    end
    object Gauge1: TGauge
      Left = 122
      Top = 4
      Width = 84
      Height = 17
      Progress = 0
    end
  end
  object FileListBox1: TFileListBox
    Left = 0
    Top = 44
    Width = 208
    Height = 165
    Align = alBottom
    FileType = [ftReadOnly, ftNormal]
    ItemHeight = 16
    Mask = '*.WAV'
    ShowGlyphs = True
    TabOrder = 1
    OnChange = FileListBox1Change
  end
  object MediaPlayer1: TMediaPlayer
    Left = -32
    Top = 160
    Width = 253
    Height = 30
    Visible = False
    TabOrder = 2
  end
  object FilterComboBox1: TFilterComboBox
    Left = 104
    Top = 24
    Width = 105
    Height = 21
    FileList = FileListBox1
    Filter = 'All sound |*.WAV;*.MID;*.AVI|WAV|*.WAV|MIDI|*.MID|AVI|*.AVI'
    TabOrder = 3
  end
  object LMDBrowseEdit1: TLMDBrowseEdit
    Left = 0
    Top = 24
    Width = 104
    Height = 21
    Cursor = crIBeam
    Bevel.Mode = bmWindows
    Bevel.StandardStyle = lsSingleLowered
    Caret.BlinkRate = 530
    Caret.ImageIndex = 0
    Caret.ListIndex = 0
    TabOrder = 4
    OnAfterExit = LMDBrowseEdit1AfterExit
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 56
    Top = 80
  end
end
