unit9.dfm

基于delphi媒体播放器的源代码 很全面

object Form9: TForm9
  Left = 310
  Top = 126
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #25171#24320#30446#24405
  ClientHeight = 200
  ClientWidth = 392
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object DirectoryListBox1: TDirectoryListBox
    Left = 48
    Top = 56
    Width = 297
    Height = 97
    FileList = FileListBox1
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 16
    TabOrder = 0
  end
  object DriveComboBox1: TDriveComboBox
    Left = 48
    Top = 24
    Width = 297
    Height = 19
    DirList = DirectoryListBox1
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 1
  end
  object BitBtn1: TBitBtn
    Left = 296
    Top = 160
    Width = 49
    Height = 22
    Caption = #30830#23450
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn1Click
  end
  object FileListBox1: TFileListBox
    Left = 64
    Top = 160
    Width = 145
    Height = 33
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 13
    TabOrder = 3
    Visible = False
  end
end