unitno2.~dfm

来自「智能监控delphi源码, 操作说明 1. 在两台微机上分别运行文件夹中的可」· ~DFM 代码 · 共 92 行

object FormNo2: TFormNo2
  Left = 222
  Top = 150
  Width = 350
  Height = 430
  Caption = '2#'#25668#20687#22836#30417#25511#31383#21475
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Shape2: TShape
    Left = 325
    Top = 40
    Width = 15
    Height = 15
    Brush.Color = clBtnFace
    Pen.Style = psClear
    Shape = stCircle
  end
  object grp1: TGroupBox
    Left = 21
    Top = 20
    Width = 300
    Height = 320
    Caption = '2#'#25668#20687#22836
    TabOrder = 0
    object VideoCap2: TVideoCap
      Left = 0
      Top = 0
      Width = 300
      Height = 320
      color = clBlack
      DriverOpen = False
      DriverIndex = -1
      VideoOverlay = False
      VideoPreview = False
      PreviewScaleToWindow = False
      PreviewScaleProportional = False
      PreviewRate = 30
      MicroSecPerFrame = 66667
      FrameRate = 15
      VideoFileName = 'Video.avi'
      SingleImageFile = 'Capture.bmp'
      CapTimeLimit = 0
      CapIndexSize = 0
      CapToFile = True
      BufferFileSize = 0
    end
  end
  object btnStartGet2: TButton
    Left = 73
    Top = 355
    Width = 75
    Height = 25
    Caption = #24320#22987#24405#20687' '
    TabOrder = 1
    OnClick = btnStartGet2Click
  end
  object btnStopMoniter2: TButton
    Left = 193
    Top = 355
    Width = 75
    Height = 25
    Caption = #25171#24320#30417#25511
    TabOrder = 2
    OnClick = btnStopMoniter2Click
  end
  object tmr1: TTimer
    Enabled = False
    Left = 40
    Top = 352
  end
  object tmr2: TTimer
    Left = 272
    Top = 352
  end
  object Timer2: TTimer
    Enabled = False
    Interval = 500
    OnTimer = Timer2Timer
    Left = 312
    Top = 64
  end
end