unit1.dfm

delphi写的对学习delphi初级入门的数据编程很有用。是用用来查找硬盘mp3文件

object frmPlayList: TfrmPlayList
  Left = 192
  Top = 114
  Align = alClient
  BorderStyle = bsNone
  Caption = 'frmPlayList'
  ClientHeight = 43
  ClientWidth = 430
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 160
    Top = 120
    Width = 33
    Height = 16
    Caption = 'Add'
    TabOrder = 0
    Visible = False
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 178
    Top = 232
    Width = 75
    Height = 25
    Caption = 'Delete'
    TabOrder = 1
    Visible = False
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 260
    Top = 232
    Width = 75
    Height = 25
    Caption = 'Clear'
    TabOrder = 2
    Visible = False
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 263
    Top = 23
    Width = 33
    Height = 16
    Caption = '<'
    TabOrder = 3
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 303
    Top = 23
    Width = 33
    Height = 16
    Caption = '>'
    TabOrder = 4
    OnClick = Button5Click
  end
  object ListBox_PlayFiles: TListBox
    Left = 304
    Top = 48
    Width = 273
    Height = 177
    ImeName = #32043#20809#21326#23431#25340#38899#36755#20837#27861'V6'
    ItemHeight = 13
    TabOrder = 5
    Visible = False
    OnDblClick = ListBox_PlayFilesDblClick
  end
  object MediaPlayer: TMediaPlayer
    Left = 152
    Top = 312
    Width = 253
    Height = 30
    Visible = False
    TabOrder = 6
  end
  object RzTrackBar1: TRzTrackBar
    Left = 0
    Top = 0
    Width = 427
    Height = 24
    HighlightColor = clBtnFace
    HotTrackColor = clBtnFace
    Position = 0
    ThumbStyle = tsXPPointer
    TickColor = clBtnFace
    TickStyle = tkOwnerDraw
    TrackColor = clBackground
    TrackOffset = 10
    TrackFrame = fsGroove
    TrackFrameColor = clFuchsia
    Color = clBtnFace
    ParentColor = False
    TabOrder = 7
    OnClick = RzTrackBar1Click
    OnMouseDown = RzTrackBar1MouseDown
    OnMouseUp = RzTrackBar1MouseUp
  end
  object Button6: TButton
    Left = 343
    Top = 23
    Width = 33
    Height = 16
    Caption = '<<'
    TabOrder = 8
    OnClick = Button6Click
  end
  object Button7: TButton
    Left = 383
    Top = 23
    Width = 33
    Height = 16
    Caption = '>>'
    TabOrder = 9
    OnClick = Button7Click
  end
  object Button8: TButton
    Left = 143
    Top = 23
    Width = 33
    Height = 16
    Caption = 'play'
    TabOrder = 10
    OnClick = Button8Click
  end
  object Button9: TButton
    Left = 223
    Top = 23
    Width = 33
    Height = 16
    Caption = 'stop'
    TabOrder = 11
    OnClick = Button9Click
  end
  object Button10: TButton
    Left = 183
    Top = 23
    Width = 33
    Height = 16
    Caption = '| |'
    TabOrder = 12
    OnClick = Button10Click
  end
  object RzDBTrackBar1: TRzDBTrackBar
    Left = 35
    Top = 21
    Width = 104
    Height = 19
    Max = 1000
    Min = 10
    Position = 10
    ThumbStyle = tsXPPointer
    TickColor = clBtnFace
    TickStyle = tkOwnerDraw
    TrackColor = clMenuHighlight
    TrackOffset = 8
    TrackFrame = fsFlat
    TrackFrameColor = clBtnFace
    TrackWidth = 7
    OnChange = RzDBTrackBar1Change
    TabOrder = 13
  end
  object OpenDlg_PlayList: TOpenDialog
    Left = 480
    Top = 80
  end
  object SaveDlg_PlayList: TSaveDialog
    Left = 504
    Top = 120
  end
  object AutoPlayTimer: TTimer
    Interval = 500
    OnTimer = AutoPlayTimerTimer
    Left = 448
    Top = 88
  end
end