vwplay2.~dfm

本光盘是《Delphi 7应用教程》一书的配套光盘

object Form1: TForm1
  Left = 287
  Top = 160
  Width = 379
  Height = 292
  Caption = #35270#39057#25991#20214#39044#35272#31243#24207
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 19
  object MediaPlayer1: TMediaPlayer
    Left = 135
    Top = 240
    Width = 197
    Height = 25
    EnabledButtons = [btPlay, btPause, btStop, btNext, btPrev, btStep, btBack]
    VisibleButtons = [btPlay, btPause, btStop, btNext, btPrev, btStep, btBack]
    Visible = False
    TabOrder = 0
  end
  object ProgressBar1: TProgressBar
    Left = 7
    Top = 216
    Width = 354
    Height = 13
    TabOrder = 1
  end
  object Button1: TButton
    Left = 40
    Top = 216
    Width = 105
    Height = 25
    Caption = #36873#25321#21160#30011
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 274
    Top = 216
    Width = 61
    Height = 25
    Caption = #36864#20986
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = Button2Click
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 369
    Height = 209
    TabOrder = 4
    object MediaPlayer2: TMediaPlayer
      Left = 56
      Top = 48
      Width = 253
      Height = 20
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 136
    Top = 216
    Width = 129
    Height = 25
    Caption = #36873#25321#32972#26223#38899#20048
    TabOrder = 5
    OnClick = BitBtn1Click
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.avi|*.avi'
    InitialDir = 'c:\'
    Left = 336
    Top = 216
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 100
    OnTimer = Timer1Timer
    Left = 224
    Top = 232
  end
  object OpenDialog2: TOpenDialog
    Filter = '*.mid'
    Left = 320
    Top = 160
  end
end