unit1.dfm

miniPlayer.rar 小播放器源码

object Form1: TForm1
  Left = 419
  Top = 441
  Width = 411
  Height = 220
  Caption = #36855#20320#25773#25918#22120
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 80
    Width = 361
    Height = 33
    AutoSize = False
    Caption = 'Label1'
    Layout = tlCenter
  end
  object MediaPlayer1: TMediaPlayer
    Left = 8
    Top = 136
    Width = 225
    Height = 30
    VisibleButtons = [btPlay, btPause, btStop, btNext, btPrev, btStep, btBack, btEject]
    TabOrder = 0
  end
  object Button1: TButton
    Left = 280
    Top = 136
    Width = 75
    Height = 25
    Action = FileOpen1
    TabOrder = 1
  end
  object RadioGroup1: TRadioGroup
    Left = 8
    Top = 16
    Width = 329
    Height = 49
    Caption = #25773#25918#36873#25321
    Columns = 2
    Items.Strings = (
      #22810#23186#20307#25991#20214
      'CD'#20809#30424)
    TabOrder = 2
    OnClick = RadioGroup1Click
  end
  object ActionList1: TActionList
    Left = 360
    Top = 24
    object FileOpen1: TFileOpen
      Category = 'File'
      Caption = '&Open...'
      Hint = 'Open|Opens an existing file'
      ImageIndex = 7
      ShortCut = 16463
      OnAccept = FileOpen1Accept
    end
  end
end