umain.~dfm

基于xvid 视频的捕获压缩传输

object videoform: Tvideoform
  Left = 308
  Top = 183
  Width = 365
  Height = 338
  Caption = 'videoform'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object VideoWindow: TVideoWindow
    Left = 24
    Top = 8
    Width = 297
    Height = 241
    FilterGraph = FilterGraph
    VMROptions.Mode = vmrWindowed
    Color = clBlack
  end
  object SnapShot: TButton
    Left = 56
    Top = 264
    Width = 75
    Height = 25
    Caption = #36830#25509
    TabOrder = 1
    OnClick = SnapShotClick
  end
  object Button1: TButton
    Left = 152
    Top = 264
    Width = 75
    Height = 25
    Caption = #20256#36755
    TabOrder = 2
    OnClick = Button1Click
  end
  object FilterGraph: TFilterGraph
    Mode = gmCapture
    GraphEdit = False
    LinearVolume = True
    Left = 176
    Top = 32
  end
  object Filter: TFilter
    BaseFilter.data = {00000000}
    FilterGraph = FilterGraph
    Left = 136
    Top = 32
  end
  object SampleGrabber: TSampleGrabber
    OnBuffer = SampleGrabberBuffer
    FilterGraph = FilterGraph
    MediaType.data = {
      7669647300001000800000AA00389B717DEB36E44F52CE119F530020AF0BA770
      FFFFFFFF0000000001000000809F580556C3CE11BF0100AA0055595A00000000
      0000000000000000}
    Left = 96
    Top = 32
  end
  object idtcpclnt1: TIdTCPClient
    MaxLineAction = maException
    ReadTimeout = 0
    Port = 0
    Left = 96
    Top = 152
  end
end