u_form2.dfm

很好地delphi书籍源码

object Form2: TForm2
  Left = 245
  Top = 164
  Width = 364
  Height = 188
  Caption = 'Form2'
  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 Animate1: TAnimate
    Left = 0
    Top = 29
    Width = 356
    Height = 132
    Align = alClient
    Transparent = False
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 356
    Height = 29
    ButtonHeight = 21
    ButtonWidth = 67
    Caption = 'ToolBar1'
    Flat = True
    ShowCaptions = True
    TabOrder = 1
    object OpenTB: TToolButton
      Left = 0
      Top = 0
      Caption = #36873#25321'AVI'
      ImageIndex = 0
      OnClick = OpenTBClick
    end
    object PlayTB: TToolButton
      Left = 67
      Top = 0
      Caption = #25773#25918#20840#37096
      ImageIndex = 2
      OnClick = PlayTBClick
    end
    object ForeTB: TToolButton
      Left = 134
      Top = 0
      Caption = #25773#25918#21069#21322#27573
      ImageIndex = 2
      OnClick = ForeTBClick
    end
    object AfterTB: TToolButton
      Left = 201
      Top = 0
      Caption = #25773#25918#21518#21322#27573
      ImageIndex = 3
      OnClick = AfterTBClick
    end
    object StopTB: TToolButton
      Left = 268
      Top = 0
      Caption = #20572#27490
      ImageIndex = 1
      OnClick = StopTBClick
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = '*.avi'
    Left = 304
    Top = 40
  end
end