object frmMainForm: TfrmMainForm
  Left = 820
  Top = 364
  Width = 1257
  Height = 886
  Caption = 'Datastead Software - TVideoGrabber demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 120
  TextHeight = 16
  object Label9: TLabel
    Left = 5
    Top = 308
    Width = 75
    Height = 16
    Caption = 'storage path'
  end
  object Label52: TLabel
    Left = 113
    Top = 5
    Width = 3
    Height = 16
  end
  object Label18: TLabel
    Left = 305
    Top = 318
    Width = 42
    Height = 16
    Caption = 'ZOOM:'
  end
  object Label105: TLabel
    Left = 266
    Top = 347
    Width = 87
    Height = 16
    Caption = 'zoom center X:'
  end
  object Label107: TLabel
    Left = 271
    Top = 364
    Width = 12
    Height = 16
    Caption = 'Y:'
  end
  object mmoLog: TMemo
    Left = 5
    Top = 414
    Width = 253
    Height = 395
    Anchors = [akLeft, akTop, akBottom]
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnKeyUp = mmoLogKeyUp
  end
  object edtoragePath: TEdit
    Left = 5
    Top = 322
    Width = 253
    Height = 24
    TabOrder = 1
    OnChange = edtoragePathChange
  end
  object edtFrameCount: TEdit
    Left = 5
    Top = 354
    Width = 253
    Height = 24
    Color = clSilver
    ReadOnly = True
    TabOrder = 2
  end
  object edtDVDateTime: TEdit
    Left = 5
    Top = 382
    Width = 253
    Height = 24
    Color = clSilver
    ReadOnly = True
    TabOrder = 3
  end
  object grbPlayerControl: TGroupBox
    Left = 5
    Top = 257
    Width = 1420
    Height = 51
    Anchors = [akLeft, akTop, akRight]
    Caption = 'player control'
    TabOrder = 4
    object btnPlayerBackwards: TSpeedButton
      Left = 15
      Top = 20
      Width = 34
      Height = 21
      Hint = 'play backwards'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F33333FF3337F3E0F33333033370E337F3333FF73337F3E0F333300333
        70E337F333FF773337F3E0F33300033370E337F333F7773337F3E0F330000333
        70E337F33377773337F3E0F33300033370E337F33337773337F3E0F333300333
        70E337F33333773337F3E0F33333033370E337F33333373337F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerBackwardsClick
    end
    object btnPlayerPause: TSpeedButton
      Left = 54
      Top = 20
      Width = 35
      Height = 21
      Hint = 'pause'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F33333333337F3E0F33333333370E337F333FF3FF337F3E0F330030033
        70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033
        70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033
        70E337F33773773337F3E0F33333333370E337F33333333337F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerPauseClick
    end
    object btnPlayerStop: TSpeedButton
      Left = 92
      Top = 20
      Width = 35
      Height = 21
      Hint = 'stop'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F33333333337F3E0F33333333370E337F333FFFFF337F3E0F330000033
        70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033
        70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033
        70E337F33777773337F3E0F33333333370E337F33333333337F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerStopClick
    end
    object btnPlayerStartPlaying: TSpeedButton
      Left = 132
      Top = 20
      Width = 34
      Height = 21
      Hint = 'play'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
        70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
        70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
        70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerStartPlayingClick
    end
    object btnPlayerRewind: TSpeedButton
      Left = 209
      Top = 20
      Width = 35
      Height = 21
      Hint = 'rewinds'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F33333333337F3E0F33333333370E337F3333F3FF337F3E0F333030033
        70E337F3337F77F337F3E0F33003003370E337F3377F77F337F3E0F300030033
        70E337F3777F77F337F3E0F33003003370E337F3377F77F337F3E0F333030033
        70E337F33373773337F3E0F33333333370E337F33333333337F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerRewindClick
    end
    object btnPlayerFastForward: TSpeedButton
      Left = 249
      Top = 20
      Width = 34
      Height = 21
      Hint = 'fast forwards'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F33333333337F3E0F33333333370E337F333FF3F3337F3E0F330030333
        70E337F3377F7FF337F3E0F33003003370E337F3377F77FF37F3E0F330030003
        70E337F3377F777337F3E0F33003003370E337F3377F773337F3E0F330030333
        70E337F33773733337F3E0F33333333370E337F33333333337F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerFastForwardClick
    end
    object btnPlayerFrameStep: TSpeedButton
      Left = 171
      Top = 20
      Width = 35
      Height = 21
      Hint = 'move to next frame step-by-step (when the clip is paused)'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
        00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
        70E337F33333333737F3E0F33333330370E337F33333333737F3E0F303333303
        70E337F33733333737F3E0F30333330370E337F33733333737F3E00000033303
        70E337F77777333737F3E0F30333030370E337F33733373737F3E0F303333003
        70E337F33733337737F3E0F33333330370E337F33333333737F3E0F333333333
        70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
        00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
      NumGlyphs = 2
      OnClick = btnPlayerFrameStepClick
    end
    object tbrPlayerProgress: TTrackBar
      Left = 295
      Top = 14
      Width = 1120
      Height = 27
      Anchors = [akLeft, akTop, akRight]
      Max = 1
      Min = 1
      Orientation = trHorizontal
      PageSize = 1
      Frequency = 1
      Position = 1
      SelEnd = 0
      SelStart = 0
      TabOrder = 0
      ThumbLength = 15
      TickMarks = tmBottomRight
      TickStyle = tsAuto
      OnChange = tbrPlayerProgressChange
    end
    object chkPlayerTrackbarSynchrone: TCheckBox
      Left = 945
      Top = 27
      Width = 179
      Height = 21
      Hint = 
        'if enabled, the clip is moved while the mouse is moving the trac' +
        'kbar, if disabled it is moved only when the mouse is released'
      Caption = 'player trackbar synchrone'
      TabOrder = 1
      OnClick = chkPlayerTrackbarSynchroneClick
    end
  end
  object VideoGrabber: TVideoGrabber
    Left = 295
    Top = 374
    Width = 474
    Height = 346
    Color = clGray
    FullRepaint = False
    OnResize = VideoGrabberResize
    AspectRatioToUse = -1
    AudioCompressor = 0
    AutoFileNameDateTimeFormat = 'yymmdd_hhmmss_zzz'
    AutoFilePrefix = 'vg'
    Cropping_Zoom = 1
    ImageOverlayEnabled = False
    ImageOverlay_AlphaBlend = False
    ImageOverlay_AlphaBlendValue = 180
    ImageOverlay_ChromaKey = False
    ImageOverlay_ChromaKeyLeewayPercent = 25
    ImageOverlay_ChromaKeyRGBColor = 0
    ImageOverlay_Height = -1
    ImageOverlay_LeftLocation = 10
    ImageOverlay_VideoAlignment = oa_LeftTop
    ImageOverlay_StretchToVideoSize = False
    ImageOverlay_TopLocation = 10
    ImageOverlay_Transparent = False
    ImageOverlay_TransparentColorValue = 0
    ImageOverlay_UseTransparentColor = False
    ImageOverlay_Width = -1
    ImageOverlay_TargetDisplay = -1
    LicenseString = 'N/A'
    MotionDetector_Grid = 
      '5555555555 5555555555 5555555555 5555555555 5555555555 555555555' +
      '5 5555555555 5555555555 5555555555 5555555555'
    PlayerSpeedRatio = 1
    PlayerTrackBar = tbrPlayerProgress
    Reencoding_StartTime = -1
    Reencoding_StartFrame = -1
    Reencoding_StopTime = -1
    Reencoding_StopFrame = -1
    TextOverlay_Enabled = False
    TextOverlay_Font.Charset = DEFAULT_CHARSET
    TextOverlay_Font.Color = clAqua
    TextOverlay_Font.Height = -20
    TextOverlay_Font.Name = 'Arial'
    TextOverlay_Font.Style = []
    TextOverlay_FontColor = clAqua
    TextOverlay_FontSize = 12
    TextOverlay_HighResFont = True
    TextOverlay_Left = 0
    TextOverlay_Top = 0
    TextOverlay_Right = -1
    TextOverlay_Orientation = to_Horizontal
    TextOverlay_Scrolling = False
    TextOverlay_ScrollingSpeed = 1
    TextOverlay_Shadow = True
    TextOverlay_ShadowColor = clBlack
    TextOverlay_ShadowDirection = cd_Center
    TextOverlay_BkColor = clWhite
    TextOverlay_Align = tf_Left
    TextOverlay_AlphaBlend = False
    TextOverlay_AlphaBlendValue = 180
    TextOverlay_GradientMode = gm_Disabled
    TextOverlay_GradientColor = clNavy
    TextOverlay_VideoAlignment = oa_LeftTop
    TextOverlay_String = 
      'Note: the date/time formats '#13#10'can be easily modified.'#13#10#13#10'system ' +
      'date/time: %sys_time[dd/mm/yy hh:nn:ss]%'#13#10'DV time code: %time_co' +
      'de%'#13#10'DV date/time: %dv_time[dd/mm/yy hh:nn:ss]%'#13#10'frame number: %' +
      'frame_count%'#13#10'time (full): %time_full%'#13#10'time (sec): %time_sec%'#13#10 +
      'time (ns): %time_100ns%'
    TextOverlay_TargetDisplay = -1
    TextOverlay_Transparent = True
    VideoCompression_Quality = 1
    VideoCompressor = 0
    VideoFromImages_TemporaryFile = 'SetOfBitmaps01.dat'
    VideoProcessing_RotationCustomAngle = 45.5
    VideoSource_FileOrURL_StartTime = -1
    VideoSource_FileOrURL_StopTime = -1
    OnAudioDeviceSelected = VideoGrabberAudioDeviceSelected
    OnClientConnection = VideoGrabberClientConnection
    OnCopyPreallocDataCompleted = VideoGrabberCopyPreallocDataCompleted
    OnCopyPreallocDataProgress = VideoGrabberCopyPreallocDataProgress
    OnCopyPreallocDataStarted = VideoGrabberCopyPreallocDataStarted
    OnCreatePreallocFileCompleted = VideoGrabberCreatePreallocFileCompleted
    OnCreatePreallocFileProgress = VideoGrabberCreatePreallocFileProgress
    OnCreatePreallocFileStarted = VideoGrabberCreatePreallocFileStarted
    OnDeviceArrivalOrRemoval = VideoGrabberDeviceArrivalOrRemoval
    OnDeviceLost = VideoGrabberDeviceLost
    OnDirectNetworkStreamingHostUrl = VideoGrabberDirectNetworkStreamingHostUrl
    OnDiskFull = VideoGrabberDiskFull
    OnDVDiscontinuity = VideoGrabberDVDiscontinuity
    OnDVCommandCompleted = VideoGrabberDVCommandCompleted
    OnFrameBitmap = VideoGrabberFrameBitmap
    OnFrameCaptureCompleted = VideoGrabberFrameCaptureCompleted
    OnFrameProgress2 = VideoGrabberFrameProgress2
    OnGraphBuilt = VideoGrabberGraphBuilt
    OnInactive = VideoGrabberInactive
    OnLog = VideoGrabberLog
    OnMotionDetected = VideoGrabberMotionDetected
    OnMotionNotDetected = VideoGrabberMotionNotDetected
    OnMouseDown = VideoGrabberMouseDown
    OnMouseMove = VideoGrabberMouseMove
    OnMouseUp = VideoGrabberMouseUp
    OnMultipurposeEncoderProgress = VideoGrabberMultiPurposeEncoderProgress
    OnPlayerBufferingData = VideoGrabberPlayerBufferingData
    OnPlayerEndOfPlaylist = VideoGrabberPlayerEndOfPlaylist
    OnPlayerEndOfStream = VideoGrabberPlayerEndOfStream
    OnPlayerOpened = VideoGrabberPlayerOpened
    OnPreviewStarted = VideoGrabberPreviewStarted
    OnRecordingCompleted = VideoGrabberRecordingCompleted
    OnRecordingPaused = VideoGrabberRecordingPaused
    OnRecordingReadyToStart = VideoGrabberRecordingReadyToStart
    OnRecordingStarted = VideoGrabberRecordingStarted
    OnReencodingCompleted = VideoGrabberReencodingCompleted
    OnReencodingProgress = VideoGrabberReencodingProgress
    OnReencodingStarted = VideoGrabberReencodingStarted
    OnReinitializing = VideoGrabberReinitializing
    OnResizeVideo = VideoGrabberResizeVideo
    OnVideoDeviceSelected = VideoGrabberVideoDeviceSelected
    OnVideoFromBitmapsNextFrameNeeded = VideoGrabberVideoFromBitmapsNextFrameNeeded
  end
  object pctMain: TPageControl
    Left = 7
    Top = 0
    Width = 1226
    Height = 257
    ActivePage = tbsVideoDevice
    MultiLine = True
    TabOrder = 6
    object tbsVideoDevice: TTabSheet
      Caption = 'video source'
      ImageIndex = 2
      object Label28: TLabel
        Left = 598
        Top = 0
        Width = 542
        Height = 16
        Caption = 
          'to select programmatically an item by name in a list, use the Fi' +
          'ndIndexInListByName function'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGray
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object rdgPreferredVideoSize: TRadioGroup
        Left = 722
        Top = 20
        Width = 254
        Height = 125
        Caption = 'preferred video sizes (examples)'
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          'device sizes'
          '88x60'
          '88x72'
          '180x120'
          '180x144'
          '320x240'
          '352x288'
          '640x480'
          '720x480'
          '720x576'
          '768x576')
        TabOrder = 0
        OnClick = rdgPreferredVideoSizeClick
      end
      object chkretchPreferredVideoSize: TCheckBox
        Left = 906
        Top = 122
        Width = 63
        Height = 21
        Alignment = taLeftJustify
        Caption = 'stretch'
        TabOrder = 1
        OnClick = chkretchPreferredVideoSizeClick
      end
      object grbVideoDeviceDialogs: TGroupBox
        Left = 985
        Top = 20
        Width = 139
        Height = 193
        Caption = 'video device dialogs'
        TabOrder = 2
        object btnDeviceDialog: TButton
          Left = 12
          Top = 25
          Width = 111
          Height = 23
          Caption = 'device'
          TabOrder = 0
          OnClick = btnDeviceDialogClick
        end
        object btnStreamDialog: TButton
          Left = 12
          Top = 52
          Width = 111
          Height = 23
          Caption = 'stream'
          TabOrder = 1
          OnClick = btnStreamDialogClick
        end
        object btnVideoQualityDialog: TButton
          Left = 12
          Top = 107
          Width = 111
          Height = 23
          Caption = 'video quality'
          TabOrder = 2
          OnClick = btnVideoQualityDialogClick
        end
        object btnCameraControlDialog: TButton
          Left = 12
          Top = 80
          Width = 111
          Height = 23
          Caption = 'camera control'
          TabOrder = 3
          OnClick = btnCameraControlDialogClick
        end
        object btnVideoControlDialog: TButton
          Left = 12
          Top = 135
          Width = 111
          Height = 24
          Caption = 'video control'
          TabOrder = 4
          OnClick = btnVideoControlDialogClick
        end
      end
      object grbVsVideoCaptureDevice: TGroupBox
        Left = 10
        Top = 52
        Width = 700
        Height = 93
        Hint = 
          'to select programmatically an item by its name in a list, use th' +
          'e FindIndexInListByName function'
        Caption = 'video source = video capture device'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
        object Label2: TLabel
          Left = 522
          Top = 7
          Width = 68
          Height = 16
          Caption = 'video input:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label19: TLabel
          Left = 522
          Top = 47
          Width = 135
          Height = 16
          Caption = 'analog video standard'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label81: TLabel
          Left = 246
          Top = 47
          Width = 249
          Height = 16
          Caption = 'video format (size and subtype combined)'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label104: TLabel
          Left = 49
          Top = 47
          Width = 156
          Height = 16
          Caption = 'video size / video subtype'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label4: TLabel
          Left = 217
          Top = 59
          Width = 23
          Height = 16
          Caption = 'OR'
        end
        object cboVideoInputs: TComboBox
          Left = 522
          Top = 23
          Width = 139
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 0
          OnChange = cboVideoInputsChange
        end
        object cboAnalogVideoStandard: TComboBox
          Left = 522
          Top = 63
          Width = 168
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 1
          OnChange = cboAnalogVideoStandardChange
        end
        object cboVideoDevices: TComboBox
          Left = 10
          Top = 20
          Width = 474
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 2
          Text = 'SELECT FIRST A VIDEO CAPTURE DEVICE'
          OnChange = cboVideoDevicesChange
        end
        object cboVideoFormats: TComboBox
          Left = 246
          Top = 63
          Width = 248
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 3
          OnChange = cboVideoFormatsChange
        end
        object cboVideoSubtypes: TComboBox
          Left = 113
          Top = 63
          Width = 100
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 4
          OnChange = cboVideoSubtypesChange
        end
        object cboVideoSizes: TComboBox
          Left = 10
          Top = 63
          Width = 100
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 5
          OnChange = cboVideoSizesChange
        end
      end
      object btnAutoRefreshPreview: TCheckBox
        Left = 546
        Top = 17
        Width = 169
        Height = 21
        Caption = 'Auto refresh preview'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = btnAutoRefreshPreviewClick
      end
      object grbVsFileOrUrl: TGroupBox
        Left = 10
        Top = 145
        Width = 543
        Height = 77
        Caption = 'video source = file or URL'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        object btnSelectFileOrUrl: TSpeedButton
          Left = 10
          Top = 17
          Width = 70
          Height = 26
          Caption = 'open'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            0400000000000001000000000000000000001000000010000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
            5555555555555555555555555555555555555555555555555555555555555555
            555555555555555555555555555555555555555FFFFFFFFFF555550000000000
            55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
            B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
            000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
            555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
            55555575FFF75555555555700007555555555557777555555555555555555555
            5555555555555555555555555555555555555555555555555555}
          NumGlyphs = 2
          ParentFont = False
          OnClick = btnSelectFileOrUrlClick
        end
        object Label100: TLabel
          Left = 441
          Top = 21
          Width = 29
          Height = 16
          Caption = 'user:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label101: TLabel
          Left = 411
          Top = 50
          Width = 62
          Height = 16
          Caption = 'password:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object edtVideoSourceFileOrUrl: TEdit
          Left = 89
          Top = 17
          Width = 336
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          Text = 'file, http://, mms://, rtsp://, udp://224.0.0.5:1234...'
          OnChange = edtVideoSourceFileOrUrlChange
        end
        object VideoSourceFileOrUrl_UserName: TEdit
          Left = 473
          Top = 16
          Width = 60
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnChange = VideoSourceFileOrUrl_UserNameChange
        end
        object VideoSourceFileOrUrl_Password: TEdit
          Left = 473
          Top = 46
          Width = 60
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnChange = VideoSourceFileOrUrl_PasswordChange
        end
      end
      object grbVideoSource: TGroupBox
        Left = 10
        Top = 0
        Width = 204
        Height = 53
        Caption = 'VIDEO SOURCE'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 6
        object cboVideoSource: TComboBox
          Left = 10
          Top = 20
          Width = 188
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          TabOrder = 0
          OnChange = cboVideoSourceChange
        end
      end
      object grbPreview: TGroupBox
        Left = 219
        Top = 0
        Width = 219
        Height = 53
        Caption = 'Preview'
        TabOrder = 7
        object btnStartPreview: TBitBtn
          Left = 7
          Top = 20
          Width = 50
          Height = 23
          Caption = 'start'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnClick = btnStartPreviewClick
        end
        object btnStopPreview: TButton
          Left = 162
          Top = 20
          Width = 50
          Height = 23
          Caption = 'stop'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 1
          OnClick = btnStopPreviewClick
        end
        object btnPausePreview: TButton
          Left = 59
          Top = 20
          Width = 49
          Height = 23
          Caption = 'pause'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnClick = btnPausePreviewClick
        end
        object btnResumePreview: TButton
          Left = 111
          Top = 20
          Width = 49
          Height = 23
          Caption = 'resume'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = btnResumePreviewClick
        end
      end
      object grbFrameRate: TGroupBox
        Left = 443
        Top = 0
        Width = 100
        Height = 53
        Caption = 'Frame rate'
        TabOrder = 8
        object edtFrameRate: TEdit
          Left = 5
          Top = 20
          Width = 41
          Height = 24
          TabOrder = 0
          Text = '0'
        end
        object btnFrameRate: TButton
          Left = 50
          Top = 20
          Width = 20
          Height = 26
          Caption = 'ok'
          TabOrder = 1
          OnClick = btnFrameRateClick
        end
        object btnAboutFrameRate: TButton
          Left = 75
          Top = 20
          Width = 17
          Height = 26
          Caption = '?'
          TabOrder = 2
          OnClick = btnAboutFrameRateClick
        end
      end
      object chkEnableSnapshotButton: TCheckBox
        Left = 546
        Top = 37
        Width = 175
        Height = 21
        Caption = 'webcam snapshot button'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        OnClick = chkEnableSnapshotButtonClick
      end
      object grbVsScreenRecording: TGroupBox
        Left = 561
        Top = 145
        Width = 415
        Height = 77
        Caption = 'video source = screen recording'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 10
        object Label35: TLabel
          Left = 118
          Top = 27
          Width = 292
          Height = 16
          Caption = 'use this window: (or an empty string for full screen)'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label90: TLabel
          Left = 10
          Top = 27
          Width = 95
          Height = 16
          Caption = 'monitor number:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object edtScreenRecordingWindow: TEdit
          Left = 118
          Top = 44
          Width = 267
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          Text = 'TVideoGrabber demo'
        end
        object btnScreenRecordingWindow: TButton
          Left = 384
          Top = 44
          Width = 22
          Height = 26
          Caption = 'ok'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = btnScreenRecordingWindowClick
        end
        object edtMonitorNumber: TEdit
          Left = 10
          Top = 44
          Width = 40
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          Text = '0'
          OnChange = edtMonitorNumberChange
        end
        object btnMonitorNumberInfo: TButton
          Left = 54
          Top = 44
          Width = 51
          Height = 26
          Caption = 'info?'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = btnMonitorNumberInfoClick
        end
        object chkScreenRecordingWithCursor: TCheckBox
          Left = 271
          Top = 7
          Width = 99
          Height = 24
          Caption = 'with cursor'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 4
          OnClick = chkScreenRecordingWithCursorClick
        end
      end
    end
    object tbsIPCameras: TTabSheet
      Caption = 'IP cameras'
      ImageIndex = 12
      OnShow = tbsIPCamerasShow
      object lblChooseIPCamera: TLabel
        Left = 0
        Top = 0
        Width = 531
        Height = 16
        Caption = 
          'first select VideoSource = vs_IPCamera in the Video Sources list' +
          ' of the  "video source" tab'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label91: TLabel
        Left = 11
        Top = 52
        Width = 30
        Height = 16
        Caption = 'URL:'
      end
      object Label92: TLabel
        Left = 537
        Top = 98
        Width = 110
        Height = 16
        Caption = 'conn. timeout  (ms)'
      end
      object Label93: TLabel
        Left = 669
        Top = 98
        Width = 123
        Height = 16
        Caption = 'receive timeout  (ms)'
      end
      object Label98: TLabel
        Left = 12
        Top = 105
        Width = 286
        Height = 16
        Caption = '(other recording settings in the "Recording" tab)'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsItalic]
        ParentFont = False
      end
      object Label94: TLabel
        Left = 329
        Top = 98
        Width = 26
        Height = 16
        Caption = 'user'
      end
      object Label95: TLabel
        Left = 421
        Top = 98
        Width = 59
        Height = 16
        Caption = 'password'
      end
      object edtIPCameraURL: TEdit
        Left = 50
        Top = 48
        Width = 743
        Height = 24
        TabOrder = 0
        Text = 
          'onvif://...  rtsp://...  http://....  rtmp://...   udp://...   r' +
          'tp://...   mms://...'
        OnChange = edtIPCameraURLChange
      end
      object btnIPCamStartPreview: TButton
        Left = 10
        Top = 77
        Width = 100
        Height = 21
        Caption = 'Start preview'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        OnClick = btnIPCamStartPreviewClick
      end
      object edtIPCamConnectionTimeout: TEdit
        Left = 537
        Top = 114
        Width = 88
        Height = 24
        TabOrder = 2
        Text = '60000'
        OnChange = edtIPCamConnectionTimeoutChange
      end
      object edtIPCamReceiveTimeout: TEdit
        Left = 669
        Top = 114
        Width = 88
        Height = 24
        TabOrder = 3
        Text = '5000'
        OnChange = edtIPCamReceiveTimeoutChange
      end
      object btnCurrentIPCameraURL: TButton
        Left = 636
        Top = 12
        Width = 61
        Height = 21
        Caption = 'test URL'
        TabOrder = 4
        OnClick = btnCurrentIPCameraURLClick
      end
      object chkOpenURLAsync: TCheckBox
        Left = 2
        Top = 26
        Width = 237
        Height = 21
        Caption = 'open the URL asynchonously'
        Checked = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        State = cbChecked
        TabOrder = 5
        OnClick = chkOpenURLAsyncClick
      end
      object btnIPCameraStop: TButton
        Left = 114
        Top = 77
        Width = 50
        Height = 21
        Caption = 'Stop'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = btnIPCameraStopClick
      end
      object btnIPCameraStarttMP4Recording: TButton
        Left = 170
        Top = 77
        Width = 150
        Height = 21
        Caption = 'Start MP4 recording'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 7
        OnClick = btnIPCameraStarttMP4RecordingClick
      end
      object RichEdit1: TRichEdit
        Left = 8
        Top = 144
        Width = 785
        Height = 81
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Lines.Strings = (
          
            'First install the Datastead RTSP/RTMP/HTTP/ONVIF DirectShow Sour' +
            'ce filter that can be downloaded at http://www.datastead.com/pro' +
            'ducts/rtsprtmpsrc.html'
          ''
          
            'The filter supports configuration parameters specified at the en' +
            'd of the URL and prefixed by a ">" or "!" character, e.g.:'
          
            'low delay: ">lowdelay=1" |  no buffer: ">buffer=0"  |  no latenc' +
            'y: ">vidsync=0"  |  E.G.: rtsp://192.168.5.25/live.sdp>lowdelay=' +
            '1>buffer=0>vidsync=0'
          ''
          
            'The complete list of the configuration parameters is available h' +
            'ere: http://datastead.com/index.php?option=com_content&id=101')
        ParentFont = False
        ReadOnly = True
        TabOrder = 8
      end
      object edtBacktimedRecordingSeconds: TEdit
        Left = 712
        Top = 74
        Width = 25
        Height = 24
        TabOrder = 9
        Text = '5'
      end
      object chkBacktimedRecordingSeconds: TCheckBox
        Left = 328
        Top = 77
        Width = 377
        Height = 17
        Caption = 'backtimed recording duration (pre-roll), in seconds:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 10
      end
      object edtIPCamUserName: TEdit
        Left = 329
        Top = 114
        Width = 88
        Height = 24
        TabOrder = 11
        OnChange = edtIPCamUserNameChange
      end
      object edtIPCamPassword: TEdit
        Left = 421
        Top = 114
        Width = 88
        Height = 24
        TabOrder = 12
        OnChange = edtIPCamPasswordChange
      end
      object chkUseExternalAudioforRTSP: TCheckBox
        Left = 252
        Top = 26
        Width = 309
        Height = 21
        Caption = 'use the selected audio device as audio source'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 13
        OnClick = chkUseExternalAudioforRTSPClick
      end
      object GroupBox9: TGroupBox
        Left = 800
        Top = 0
        Width = 417
        Height = 225
        Caption = 'PTZ'
        TabOrder = 14
        object Label114: TLabel
          Left = 298
          Top = 48
          Width = 71
          Height = 16
          Caption = 'speed ratio:'
        end
        object PageControl1: TPageControl
          Left = 8
          Top = 18
          Width = 281
          Height = 202
          ActivePage = TabSheet2
          TabOrder = 0
          object TabSheet2: TTabSheet
            Caption = 'Continuous'
            object Label108: TLabel
              Left = 8
              Top = 30
              Width = 42
              Height = 16
              Caption = 'pan/tilt:'
            end
            object Label109: TLabel
              Left = 8
              Top = 74
              Width = 36
              Height = 16
              Caption = 'zoom:'
            end
            object Label99: TLabel
              Left = 8
              Top = 109
              Width = 117
              Height = 16
              Caption = 'move duration (ms):'
            end
            object Label110: TLabel
              Left = 8
              Top = 131
              Width = 180
              Height = 16
              Caption = '(duration 0 = continuous move)'
            end
            object btnPTZTiltUp: TButton
              Left = 83
              Top = 4
              Width = 21
              Height = 21
              Caption = '^'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 0
              OnMouseDown = btnPTZTiltUpMouseDown
              OnMouseUp = PTZButtonsMouseUp
            end
            object btnPTZPanLeft: TButton
              Left = 60
              Top = 26
              Width = 21
              Height = 21
              Caption = '<'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 1
              OnMouseDown = btnPTZPanLeftMouseDown
              OnMouseUp = PTZButtonsMouseUp
            end
            object btnPTZPanRight: TButton
              Left = 106
              Top = 26
              Width = 21
              Height = 21
              Caption = '>'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 2
              OnMouseDown = btnPTZPanRightMouseDown
              OnMouseUp = PTZButtonsMouseUp
            end
            object btnPTZTiltDown: TButton
              Left = 83
              Top = 46
              Width = 21
              Height = 21
              Caption = 'v'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 3
              OnMouseDown = btnPTZTiltDownMouseDown
              OnMouseUp = PTZButtonsMouseUp
            end
            object btnPTZZoomOut: TButton
              Left = 74
              Top = 72
              Width = 21
              Height = 21
              Caption = '<'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 4
              OnMouseDown = btnPTZZoomOutMouseDown
              OnMouseUp = PTZButtonsMouseUp
            end
            object btnPTZZoomIn: TButton
              Left = 94
              Top = 72
              Width = 21
              Height = 21
              Caption = '>'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 5
              OnClick = btnPTZZoomInClick
              OnMouseUp = PTZButtonsMouseUp
            end
            object edtPTZDurationMs: TEdit
              Left = 136
              Top = 107
              Width = 41
              Height = 24
              TabOrder = 6
              Text = '0'
              OnChange = edtPTZDurationMsChange
            end
            object btnPTZHelpDuration: TButton
              Left = 184
              Top = 106
              Width = 25
              Height = 25
              Caption = '?'
              TabOrder = 7
              OnClick = btnPTZHelpDurationClick
            end
            object chkPTZMouseUpStop: TCheckBox
              Left = 8
              Top = 150
              Width = 249
              Height = 17
              Caption = 'if duration 0, mouse button up -> stop'
              Checked = True
              State = cbChecked
              TabOrder = 8
            end
          end
          object TabSheet3: TTabSheet
            Caption = 'Absolute'
            ImageIndex = 1
            object Label111: TLabel
              Left = 2
              Top = 46
              Width = 26
              Height = 16
              Caption = 'pan:'
            end
            object Label112: TLabel
              Left = 2
              Top = 122
              Width = 36
              Height = 16
              Caption = 'zoom:'
            end
            object Label113: TLabel
              Left = 186
              Top = 80
              Width = 15
              Height = 16
              Caption = 'tilt:'
            end
            object btnPTZSetTrackbarLimits: TButton
              Left = 0
              Top = 20
              Width = 177
              Height = 20
              Caption = 'retrieve camera position'
              TabOrder = 0
              OnClick = btnPTZSetTrackbarLimitsClick
            end
            object tbrPTZPan: TTrackBar
              Left = -4
              Top = 62
              Width = 189
              Height = 24
              Max = 100
              Min = -100
              Orientation = trHorizontal
              Frequency = 1
              Position = 0
              SelEnd = 0
              SelStart = 0
              TabOrder = 1
              ThumbLength = 16
              TickMarks = tmBottomRight
              TickStyle = tsAuto
              OnChange = tbrPTZPanChange
            end
            object tbrPTZZoom: TTrackBar
              Left = -4
              Top = 138
              Width = 189
              Height = 24
              Max = 50
              Orientation = trHorizontal
              Frequency = 1
              Position = 0
              SelEnd = 0
              SelStart = 0
              TabOrder = 2
              ThumbLength = 16
              TickMarks = tmBottomRight
              TickStyle = tsAuto
              OnChange = tbrPTZZoomChange
            end
            object tbrPTZTilt: TTrackBar
              Left = 208
              Top = 16
              Width = 24
              Height = 145
              Max = 100
              Min = -100
              Orientation = trVertical
              Frequency = 1
              Position = 0
              SelEnd = 0
              SelStart = 0
              TabOrder = 3
              ThumbLength = 16
              TickMarks = tmBottomRight
              TickStyle = tsAuto
              OnChange = tbrPTZTiltChange
            end
          end
          object TabSheet4: TTabSheet
            Caption = 'Relative'
            ImageIndex = 2
            object Label115: TLabel
              Left = 8
              Top = 126
              Width = 84
              Height = 16
              Caption = 'relative move:'
            end
            object Label117: TLabel
              Left = 8
              Top = 30
              Width = 42
              Height = 16
              Caption = 'pan/tilt:'
            end
            object Label118: TLabel
              Left = 8
              Top = 86
              Width = 36
              Height = 16
              Caption = 'zoom:'
            end
            object edtPTZRelativeMove: TEdit
              Left = 104
              Top = 124
              Width = 57
              Height = 24
              TabOrder = 0
              Text = '0,01'
              OnChange = edtPTZRelativeMoveChange
            end
            object btnRelativePanLeft: TButton
              Left = 60
              Top = 26
              Width = 21
              Height = 21
              Caption = '<'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 1
              OnClick = btnRelativePanLeftClick
            end
            object btnRelativeTiltUp: TButton
              Left = 83
              Top = 4
              Width = 21
              Height = 21
              Caption = '^'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 2
              OnClick = btnRelativeTiltUpClick
            end
            object btnRelativePanRight: TButton
              Left = 106
              Top = 26
              Width = 21
              Height = 21
              Caption = '>'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 3
              OnClick = btnRelativePanRightClick
            end
            object btnRelativeTiltDown: TButton
              Left = 83
              Top = 46
              Width = 21
              Height = 21
              Caption = 'v'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 4
              OnClick = btnRelativeTiltDownClick
            end
            object btnRelativeZoomOut: TButton
              Left = 74
              Top = 84
              Width = 21
              Height = 21
              Caption = '<'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 5
              OnClick = btnRelativeZoomOutClick
            end
            object btnRelativeZoomIn: TButton
              Left = 96
              Top = 84
              Width = 21
              Height = 21
              Caption = '>'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentFont = False
              TabOrder = 6
              OnClick = btnRelativeZoomInClick
            end
          end
        end
        object PTZStop: TButton
          Left = 320
          Top = 132
          Width = 73
          Height = 61
          Caption = 'stop'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -14
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 1
          OnClick = PTZStopClick
        end
        object tbrPTZSpeedRatio: TTrackBar
          Left = 296
          Top = 68
          Width = 105
          Height = 24
          Max = 100
          Orientation = trHorizontal
          Frequency = 1
          Position = 50
          SelEnd = 0
          SelStart = 0
          TabOrder = 2
          ThumbLength = 16
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrPTZSpeedRatioChange
        end
        object btnHelpPTZSpeedRatio: TButton
          Left = 376
          Top = 40
          Width = 25
          Height = 25
          Caption = '?'
          TabOrder = 3
          OnClick = btnHelpPTZSpeedRatioClick
        end
      end
    end
    object tbsAudio: TTabSheet
      Caption = 'audio'
      ImageIndex = 10
      object grbAudioCaptureDevice: TGroupBox
        Left = 10
        Top = 22
        Width = 395
        Height = 139
        Caption = 'Audio capture device'
        TabOrder = 0
        object Label26: TLabel
          Left = 10
          Top = 34
          Width = 68
          Height = 16
          Caption = 'audio input:'
        end
        object Label49: TLabel
          Left = 98
          Top = 76
          Width = 97
          Height = 16
          Caption = 'audio input level'
        end
        object Label36: TLabel
          Left = 79
          Top = 106
          Width = 117
          Height = 16
          Caption = 'audio input balance'
        end
        object cboAudioDevices: TComboBox
          Left = 89
          Top = 20
          Width = 296
          Height = 24
          ItemHeight = 0
          TabOrder = 0
          Text = 'SELECT AN AUDIO CAPTURE DEVICE'
          OnChange = cboAudioDevicesChange
        end
        object cboAudioInputs: TComboBox
          Left = 10
          Top = 49
          Width = 149
          Height = 24
          ItemHeight = 0
          TabOrder = 1
          OnChange = cboAudioInputsChange
        end
        object tbrAudioInputLevel: TTrackBar
          Left = 197
          Top = 74
          Width = 188
          Height = 31
          Max = 65535
          Orientation = trHorizontal
          Frequency = 900
          Position = 50000
          SelEnd = 0
          SelStart = 0
          TabOrder = 2
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrAudioInputLevelChange
        end
        object tbrAudioInputBalance: TTrackBar
          Left = 197
          Top = 103
          Width = 188
          Height = 31
          Max = 32767
          Min = -32768
          Orientation = trHorizontal
          Frequency = 900
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 3
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrAudioInputBalanceChange
        end
        object chkAudioInputMono: TCheckBox
          Left = 197
          Top = 52
          Width = 63
          Height = 21
          Caption = 'mono'
          TabOrder = 4
          OnClick = chkAudioInputMonoClick
        end
        object btnDlgAudioDevice: TButton
          Left = 295
          Top = 49
          Width = 90
          Height = 21
          Caption = 'device dialog'
          TabOrder = 5
          OnClick = btnDlgAudioDeviceClick
        end
      end
      object grbAudioRendering: TGroupBox
        Left = 817
        Top = 59
        Width = 307
        Height = 159
        Caption = 'audio renderer'
        TabOrder = 1
        object Label1: TLabel
          Left = 12
          Top = 57
          Width = 44
          Height = 16
          Caption = 'volume'
        end
        object Label17: TLabel
          Left = 12
          Top = 103
          Width = 49
          Height = 16
          Caption = 'balance'
        end
        object tbrAudioVolume: TTrackBar
          Left = 2
          Top = 71
          Width = 304
          Height = 31
          Max = 65535
          Orientation = trHorizontal
          Frequency = 400
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 0
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrAudioVolumeChange
        end
        object tbrAudioBalance: TTrackBar
          Left = 2
          Top = 118
          Width = 295
          Height = 31
          Max = 32767
          Min = -32768
          Orientation = trHorizontal
          Frequency = 800
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 1
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrAudioBalanceChange
        end
        object chkMuteAudioRendering: TCheckBox
          Left = 10
          Top = 27
          Width = 60
          Height = 21
          Caption = 'mute'
          TabOrder = 2
          OnClick = chkMuteAudioRenderingClick
        end
        object cboAudioRenderers: TComboBox
          Left = 69
          Top = 25
          Width = 234
          Height = 24
          ItemHeight = 0
          TabOrder = 3
          Text = 'default (AudioRenderer property = -1)'
          OnChange = cboAudioRenderersChange
        end
      end
      object rdgVUMeters: TRadioGroup
        Left = 414
        Top = 59
        Width = 247
        Height = 41
        Caption = 'VU Meters'
        Columns = 3
        Items.Strings = (
          'disabled'
          'analog'
          'bargraph')
        TabOrder = 2
        OnClick = rdgVUMetersClick
      end
      object pnLeftVUMeter: TPanel
        Left = 414
        Top = 108
        Width = 158
        Height = 110
        Caption = 'Left VU Meter'
        TabOrder = 3
      end
      object pnRightVUMeter: TPanel
        Left = 581
        Top = 108
        Width = 149
        Height = 110
        Caption = 'Right VU Meter'
        TabOrder = 4
      end
      object GroupBox2: TGroupBox
        Left = 414
        Top = 0
        Width = 710
        Height = 60
        Caption = 
          'AUDIO rendering / recording /streaming ONLY   (you can activate ' +
          'the streaming in the "network streaming" tab)'
        TabOrder = 5
        object Label30: TLabel
          Left = 532
          Top = 34
          Width = 163
          Height = 16
          Caption = 'video capture device, if any'
        end
        object btnStartAudioRendering: TButton
          Left = 10
          Top = 25
          Width = 100
          Height = 23
          Caption = 'start rendering'
          TabOrder = 0
          OnClick = btnStartAudioRenderingClick
        end
        object btnStartWAVRecording: TButton
          Left = 118
          Top = 25
          Width = 90
          Height = 23
          Caption = 'record WAV'
          TabOrder = 1
          OnClick = btnStartWAVRecordingClick
        end
        object btnStartMP3Recording: TButton
          Left = 217
          Top = 25
          Width = 89
          Height = 23
          Caption = 'record MP3'
          TabOrder = 2
          OnClick = btnStartMP3RecordingClick
        end
        object btnStopAudio: TButton
          Left = 423
          Top = 25
          Width = 80
          Height = 23
          Caption = 'stop'
          TabOrder = 3
          OnClick = btnStopAudioClick
        end
        object chkUseAudioOfVideoCaptureDevice: TCheckBox
          Left = 537
          Top = 15
          Width = 158
          Height = 21
          Caption = 'use the audio out of the'
          TabOrder = 4
          OnClick = chkUseAudioOfVideoCaptureDeviceClick
        end
        object btnStartASFRecording: TButton
          Left = 315
          Top = 25
          Width = 100
          Height = 23
          Caption = 'record to ASF'
          TabOrder = 5
          OnClick = btnStartASFRecordingClick
        end
      end
      object chkRenderAudioDevice: TCheckBox
        Left = 20
        Top = 0
        Width = 237
        Height = 21
        Caption = 'AUDIO DEVICE RENDERING'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 6
        OnClick = chkRenderAudioDeviceClick
      end
      object grbAudioSynchronization: TGroupBox
        Left = 10
        Top = 167
        Width = 395
        Height = 51
        Caption = 'Audio / Video Synchronization Adjustment'
        TabOrder = 7
        object chkAudioSyncAdjust: TCheckBox
          Left = 10
          Top = 23
          Width = 80
          Height = 21
          Caption = 'enabled'
          TabOrder = 0
          OnClick = chkAudioSyncAdjustClick
        end
        object tbrAudioSyncAdjust: TTrackBar
          Left = 98
          Top = 17
          Width = 238
          Height = 31
          Max = 100
          Orientation = trHorizontal
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 1
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrAudioSyncAdjustChange
        end
        object edtAudioSyncAdjust: TEdit
          Left = 335
          Top = 20
          Width = 50
          Height = 24
          Color = cl3DLight
          ReadOnly = True
          TabOrder = 2
          Text = '0'
        end
      end
      object chkExternalAudio: TCheckBox
        Left = 286
        Top = 0
        Width = 119
        Height = 21
        Caption = 'external audio'
        TabOrder = 8
        OnClick = chkExternalAudioClick
      end
      object btnBargraphOverlay: TButton
        Left = 670
        Top = 69
        Width = 139
        Height = 31
        Caption = 'bargraph overlay'
        TabOrder = 9
        OnClick = btnBargraphOverlayClick
      end
    end
    object tbsMPE: TTabSheet
      Caption = 'Multipurpose Encoder'
      ImageIndex = 12
      object pgcMPE: TPageControl
        Left = 0
        Top = 0
        Width = 1218
        Height = 226
        ActivePage = tshMPESettings
        Align = alClient
        TabOrder = 0
        object tshMPESettings: TTabSheet
          Caption = 'Settings'
          object GroupBox1: TGroupBox
            Left = 4
            Top = 62
            Width = 1123
            Height = 55
            Caption = 
              'STREAMING: enable it then start the preview in the "video source' +
              '" tab or recording in the "Recording" tab        (note: it super' +
              'sedes ALL the streaming settings of the "WM Streaming" tab)'
            TabOrder = 0
            object chkMPEStreaming: TCheckBox
              Left = 4
              Top = 21
              Width = 80
              Height = 21
              Caption = 'enable'
              TabOrder = 0
              OnClick = chkMPEStreamingClick
            end
            object edtMPEStreaming: TEdit
              Left = 69
              Top = 23
              Width = 1051
              Height = 24
              TabOrder = 1
              Text = 
                'RTSPPORT=12800 UDPPORT=12801 RTSPSESSION=camera1 ffmpegLGPL.exe ' +
                '-re -fflags nobuffer -flags low_delay -r 30 -vsync 1 -i %PIPE% -' +
                'c:v h264 -threads 8 -profile:v baseline -loopfilter 0 -b:v 4M -a' +
                'codec aac -ab 128k -ac 2 -f mpegts udp://127.0.0.1:'
              OnChange = edtMPEStreamingChange
            end
          end
          object grbMPErecord: TGroupBox
            Left = 4
            Top = 4
            Width = 1123
            Height = 55
            Caption = 
              'RECORDING: enable it then start the recording in the "Recording"' +
              ' tab         (note: it supersedes ALL the compression and codec ' +
              'settings of the "Recording" tab)'
            TabOrder = 1
            object chkMPERecording: TCheckBox
              Left = 4
              Top = 26
              Width = 80
              Height = 21
              Caption = 'enable'
              TabOrder = 0
              OnClick = chkMPERecordingClick
            end
            object edtMPERecording: TEdit
              Left = 69
              Top = 23
              Width = 1051
              Height = 24
              TabOrder = 1
              Text = 
                'ffmpegLGPL.exe -re -i %PIPE% -c:v h264 -threads 8 -profile:v bas' +
                'eline -loopfilter 0 -b:v 10M -an -f mp4 %FILENAME%'
              OnChange = edtMPERecordingChange
            end
          end
          object GroupBox6: TGroupBox
            Left = 4
            Top = 123
            Width = 1123
            Height = 55
            Caption = 
              'Direct transcoding: replace these sample file names by the real ' +
              'files to process, specify more FFmpeg settings if needed, then c' +
              'lick "Start MPE reencoding"'
            TabOrder = 2
            object edtMPEReencoding: TEdit
              Left = 4
              Top = 22
              Width = 883
              Height = 24
              TabOrder = 0
              Text = 
                'ffmpegLGPL.exe -i "c:\folder\ClipToReencode.avi" -f mp4 "c:\fold' +
                'er\ClipReencodedToMP4.mp4"'
              OnChange = edtMPEReencodingChange
            end
            object btnStartMPEReencoding: TButton
              Left = 895
              Top = 21
              Width = 139
              Height = 31
              Caption = 'start MPE reencoding'
              TabOrder = 1
              OnClick = btnStartMPEReencodingClick
            end
            object btnStopMPEReencoding: TButton
              Left = 1041
              Top = 21
              Width = 70
              Height = 31
              Caption = 'stop'
              TabOrder = 2
              OnClick = btnStopMPEReencodingClick
            end
          end
        end
        object tbsMPERecordingLog: TTabSheet
          Caption = 'Recording log'
          ImageIndex = 1
          object lblMPERecordingProgressInfo: TLabel
            Left = 0
            Top = 158
            Width = 84
            Height = 16
            Caption = 'progress info: '
          end
          object mmoMPERecordingLog: TMemo
            Left = 0
            Top = 0
            Width = 1129
            Height = 139
            Lines.Strings = (
              
                'The log and progress info is available only if SHOWCONSOLE has n' +
                'ot been specified'
              '')
            TabOrder = 0
          end
        end
        object tbsMPEStreamingLog: TTabSheet
          Caption = 'Streaming log'
          ImageIndex = 2
          object lblMPEStreamingProgressInfo: TLabel
            Left = 0
            Top = 158
            Width = 84
            Height = 16
            Caption = 'progress info: '
          end
          object mmoMPEStreamingLog: TMemo
            Left = 0
            Top = 0
            Width = 1129
            Height = 149
            Lines.Strings = (
              
                'The log and progress info is available only if SHOWCONSOLE has n' +
                'ot been specified'
              '')
            TabOrder = 0
          end
        end
        object tbsMPEReencodingLog: TTabSheet
          Caption = 'Reencoding Log'
          ImageIndex = 3
          object lblMPEReencodingProgressInfo: TLabel
            Left = 0
            Top = 158
            Width = 84
            Height = 16
            Caption = 'progress info: '
          end
          object mmoMPEReencodingLog: TMemo
            Left = 0
            Top = 0
            Width = 1129
            Height = 149
            Lines.Strings = (
              
                'The log and progress info is available only if SHOWCONSOLE has n' +
                'ot been specified')
            TabOrder = 0
          end
        end
      end
    end
    object tbsRecording: TTabSheet
      Caption = 'recording'
      ImageIndex = 5
      object Label5: TLabel
        Left = 7
        Top = 89
        Width = 77
        Height = 16
        Caption = 'audio format:'
      end
      object Label11: TLabel
        Left = 246
        Top = 175
        Width = 54
        Height = 16
        Caption = 'Mb (size)'
      end
      object Label6: TLabel
        Left = 892
        Top = -2
        Width = 126
        Height = 16
        Caption = 'video compressor'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label16: TLabel
        Left = 894
        Top = 62
        Width = 126
        Height = 16
        Caption = 'audio compressor'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label38: TLabel
        Left = 894
        Top = 128
        Width = 76
        Height = 16
        Caption = 'multiplexer'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object btnRenewRecordingFile: TButton
        Left = 335
        Top = 0
        Width = 159
        Height = 23
        Caption = 'new file during recording'
        Enabled = False
        TabOrder = 0
        OnClick = btnRenewRecordingFileClick
      end
      object btnStopRecording: TButton
        Left = 268
        Top = 0
        Width = 59
        Height = 23
        Caption = 'stop'
        TabOrder = 1
        OnClick = btnStopRecordingClick
      end
      object btnStartRecordingControlled: TBitBtn
        Left = 138
        Top = 0
        Width = 123
        Height = 23
        Caption = 'start (controlled)'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = btnStartRecordingControlledClick
      end
      object btnStartRecordingImmediately: TBitBtn
        Left = 7
        Top = 0
        Width = 123
        Height = 23
        Caption = 'start (immediately)'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = btnStartRecordingImmediatelyClick
      end
      object chkAudioRecording: TCheckBox
        Left = 7
        Top = 64
        Width = 138
        Height = 21
        Caption = 'audio recording'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnClick = chkAudioRecordingClick
      end
      object cboAudioFormats: TComboBox
        Left = 7
        Top = 106
        Width = 208
        Height = 24
        ItemHeight = 0
        TabOrder = 5
        OnChange = cboAudioFormatsChange
      end
      object chkPreserveNativeFormat: TCheckBox
        Left = 7
        Top = 34
        Width = 247
        Height = 21
        Caption = 'RECORD IN NATIVE FORMAT'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 6
        OnClick = chkPreserveNativeFormatClick
      end
      object btnNativeFormat: TButton
        Left = 187
        Top = 52
        Width = 41
        Height = 21
        Caption = 'info?'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 7
        OnClick = btnNativeFormatClick
      end
      object chkAVISaveToThisFile: TCheckBox
        Left = 7
        Top = 145
        Width = 317
        Height = 21
        Hint = 
          'if disabled, a file name is generated automatically, according t' +
          'o the "AutoFileName" property (shown in the "frame grabber" tab)'
        Caption = 'do not generate file names automatically, save to:'
        TabOrder = 8
        OnClick = chkAVISaveToThisFileClick
      end
      object edtRecordingFileName: TEdit
        Left = 325
        Top = 143
        Width = 129
        Height = 24
        TabOrder = 9
        Text = 'CaptureFile01.wmv'
        OnChange = edtRecordingFileNameChange
      end
      object chkPreallocFile: TCheckBox
        Left = 7
        Top = 175
        Width = 201
        Height = 21
        Caption = 'use preallocated capture file:'
        TabOrder = 10
        OnClick = chkPreallocFileClick
      end
      object edtPreallocSize: TEdit
        Left = 197
        Top = 172
        Width = 45
        Height = 24
        TabOrder = 11
        Text = '100'
        OnChange = edtPreallocSizeChange
      end
      object btnCreatePreallocFileNow: TButton
        Left = 308
        Top = 172
        Width = 166
        Height = 24
        Caption = 'create preallocated file now'
        TabOrder = 12
        OnClick = btnCreatePreallocFileNowClick
      end
      object rdgRecordingMethod: TRadioGroup
        Left = 502
        Top = 69
        Width = 257
        Height = 119
        Caption = 'recording method'
        Columns = 2
        Items.Strings = (
          'AVI'
          'ASF (wmv)'
          'send to DV'
          'MKV'
          'FLV'
          'MP4'
          'WebM (vp8)'
          'MPG'
          'Multiplexer (other)')
        TabOrder = 13
        OnClick = rdgRecordingMethodClick
      end
      object GroupBox5: TGroupBox
        Left = 256
        Top = 34
        Width = 238
        Height = 96
        Caption = 'Recording timer'
        TabOrder = 14
        object Label29: TLabel
          Left = 10
          Top = 69
          Width = 144
          Height = 16
          Caption = 'timer interval (seconds) :'
        end
        object grbRecordingTimer: TRadioGroup
          Left = 0
          Top = 0
          Width = 238
          Height = 60
          Caption = 'Recording Timer'
          Columns = 2
          ItemIndex = 0
          Items.Strings = (
            'disabled'
            'new file every...'
            'stop after ...'
            'start after ...')
          TabOrder = 0
          OnClick = grbRecordingTimerClick
        end
        object edtRecordingTimerInterval: TEdit
          Left = 167
          Top = 64
          Width = 61
          Height = 24
          TabOrder = 1
          Text = '20'
          OnChange = edtRecordingTimerIntervalChange
        end
      end
      object chkRecordingCanPause: TCheckBox
        Left = 507
        Top = 7
        Width = 166
        Height = 21
        Caption = 'recording can pause'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 15
        OnClick = chkRecordingCanPauseClick
      end
      object chkRecordingPauseCreatesNewFile: TCheckBox
        Left = 507
        Top = 27
        Width = 159
        Height = 21
        Caption = 'pause creates new file'
        TabOrder = 16
        OnClick = chkRecordingPauseCreatesNewFileClick
      end
      object chkRecordingOnMotion: TCheckBox
        Left = 507
        Top = 44
        Width = 228
        Height = 26
        Caption = 'pause/resume on motion detection'
        TabOrder = 17
        OnClick = chkRecordingOnMotionClick
      end
      object btnPauseRecording: TButton
        Left = 684
        Top = 0
        Width = 56
        Height = 21
        Caption = 'pause'
        TabOrder = 18
        OnClick = btnPauseRecordingClick
      end
      object btnResumeRecording: TButton
        Left = 684
        Top = 22
        Width = 56
        Height = 21
        Caption = 'resume'
        TabOrder = 19
        OnClick = btnResumeRecordingClick
      end
      object cboVideoCompressors: TComboBox
        Left = 892
        Top = 15
        Width = 234
        Height = 24
        ItemHeight = 0
        TabOrder = 20
        OnChange = cboVideoCompressorsChange
      end
      object btnVideoCompressorSettings: TButton
        Left = 892
        Top = 39
        Width = 79
        Height = 21
        Caption = 'Settings'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 21
        OnClick = btnVideoCompressorSettingsClick
      end
      object cboAudioCompressors: TComboBox
        Left = 892
        Top = 79
        Width = 234
        Height = 24
        ItemHeight = 0
        TabOrder = 22
        OnChange = cboAudioCompressorsChange
      end
      object btnAudioCompressorSettings: TButton
        Left = 894
        Top = 106
        Width = 78
        Height = 21
        Caption = 'Settings'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 23
        OnClick = btnAudioCompressorSettingsClick
      end
      object rdgCompressMode: TRadioGroup
        Left = 766
        Top = 22
        Width = 119
        Height = 74
        Caption = 'compression mode'
        ItemIndex = 0
        Items.Strings = (
          'no'
          'on the fly'
          'after capture')
        TabOrder = 24
        OnClick = rdgCompressModeClick
      end
      object rdgCompressType: TRadioGroup
        Left = 766
        Top = 96
        Width = 119
        Height = 71
        Caption = 'compression type'
        Items.Strings = (
          'video'
          'audio'
          'audio+video')
        TabOrder = 25
        OnClick = rdgCompressTypeClick
      end
      object btnSaveVideoCompressorSettings: TButton
        Left = 994
        Top = 39
        Width = 64
        Height = 21
        Caption = 'save'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 26
        OnClick = btnSaveVideoCompressorSettingsClick
      end
      object btnReloadVideoCompressorSettings: TButton
        Left = 1060
        Top = 39
        Width = 64
        Height = 21
        Caption = 'reload'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 27
        OnClick = btnReloadVideoCompressorSettingsClick
      end
      object btnSaveAudioCompressorSettings: TButton
        Left = 994
        Top = 106
        Width = 64
        Height = 21
        Caption = 'save'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 28
        OnClick = btnSaveAudioCompressorSettingsClick
      end
      object btnReloadAudioCompressorSettings: TButton
        Left = 1060
        Top = 106
        Width = 64
        Height = 21
        Caption = 'reload'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 29
        OnClick = btnReloadAudioCompressorSettingsClick
      end
      object cboMultiplexers: TComboBox
        Left = 892
        Top = 145
        Width = 234
        Height = 24
        ItemHeight = 0
        TabOrder = 30
        OnChange = cboMultiplexersChange
      end
      object BtnCodecExamples: TButton
        Left = 682
        Top = 196
        Width = 444
        Height = 27
        Caption = 'Examples of compatible codecs depending on the recording method'
        TabOrder = 31
        OnClick = BtnCodecExamplesClick
      end
      object Button1: TButton
        Left = 894
        Top = 172
        Width = 78
        Height = 21
        Caption = 'Settings'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 32
        OnClick = Button1Click
      end
    end
    object tbsASFStreaming: TTabSheet
      Caption = 'WM streaming'
      ImageIndex = 10
      object grbDirectASFStreaming: TGroupBox
        Left = 0
        Top = 94
        Width = 366
        Height = 60
        Caption = 'direct WMV network streaming: '
        TabOrder = 0
        object Label10: TLabel
          Left = 10
          Top = 27
          Width = 123
          Height = 16
          Caption = 'Port (0 = auto select):'
        end
        object Label24: TLabel
          Left = 217
          Top = 27
          Width = 64
          Height = 16
          Caption = 'Max users:'
        end
        object edtNetworkPort: TEdit
          Left = 138
          Top = 22
          Width = 60
          Height = 21
          TabOrder = 0
          OnChange = edtNetworkPortChange
        end
        object edtNetworkMaxUsers: TEdit
          Left = 286
          Top = 22
          Width = 60
          Height = 21
          TabOrder = 1
          OnChange = edtNetworkMaxUsersChange
        end
      end
      object grbASFStreamingToWMServer: TGroupBox
        Left = 0
        Top = 162
        Width = 828
        Height = 57
        Caption = 
          'Stream to a WM publishing point with authentication: (e.g. http:' +
          '//myserver.com:8080/mypublishingpoint)'
        TabOrder = 1
        object Label32: TLabel
          Left = 10
          Top = 26
          Width = 94
          Height = 16
          Caption = 'publishing URL:'
        end
        object Label65: TLabel
          Left = 497
          Top = 26
          Width = 63
          Height = 16
          Caption = 'username:'
        end
        object Label66: TLabel
          Left = 665
          Top = 26
          Width = 62
          Height = 16
          Caption = 'password:'
        end
        object edtPublishingPoint: TEdit
          Left = 108
          Top = 22
          Width = 376
          Height = 21
          TabOrder = 0
          OnChange = edtPublishingPointChange
        end
        object edtPublishingPointUsername: TEdit
          Left = 561
          Top = 22
          Width = 90
          Height = 21
          TabOrder = 1
          OnChange = edtPublishingPointUsernameChange
        end
        object edtPublishingPointPassword: TEdit
          Left = 729
          Top = 22
          Width = 89
          Height = 21
          TabOrder = 2
          OnChange = edtPublishingPointPasswordChange
        end
      end
      object rdgNetworkStreaming: TRadioGroup
        Left = 0
        Top = 0
        Width = 238
        Height = 90
        Caption = 'Network streaming: '
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemIndex = 0
        Items.Strings = (
          'disabled'
          'direct network streaming'
          'stream to a WM publishing point')
        ParentColor = False
        ParentFont = False
        TabOrder = 2
        OnClick = rdgNetworkStreamingClick
      end
      object rdgNetworkStreamingType: TRadioGroup
        Left = 246
        Top = 0
        Width = 120
        Height = 90
        Caption = 'Streaming type:'
        ItemIndex = 0
        Items.Strings = (
          'audio + video'
          'video'
          'audio')
        TabOrder = 3
        OnClick = rdgNetworkStreamingTypeClick
      end
      object grbASFSettings: TGroupBox
        Left = 374
        Top = 0
        Width = 760
        Height = 160
        Caption = 'WMV settings'
        TabOrder = 4
        object Label39: TLabel
          Left = 148
          Top = 10
          Width = 188
          Height = 16
          Caption = '(-1 = use default or profile value)'
          Color = clBtnFace
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clGray
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentColor = False
          ParentFont = False
        end
        object Label44: TLabel
          Left = 10
          Top = 44
          Width = 70
          Height = 16
          Caption = 'video width:'
        end
        object Label67: TLabel
          Left = 5
          Top = 74
          Width = 76
          Height = 16
          Caption = 'video height:'
        end
        object Label68: TLabel
          Left = 306
          Top = 33
          Width = 80
          Height = 16
          Caption = 'video bit rate:'
        end
        object Label69: TLabel
          Left = 276
          Top = 82
          Width = 113
          Height = 16
          Caption = 'key frame spacing:'
        end
        object Label70: TLabel
          Left = 309
          Top = 58
          Width = 79
          Height = 16
          Caption = 'video quality:'
        end
        object Label71: TLabel
          Left = 293
          Top = 107
          Width = 94
          Height = 16
          Caption = 'audio channels:'
        end
        object Label83: TLabel
          Left = 158
          Top = 112
          Width = 108
          Height = 16
          Caption = 'deinterlace mode:'
        end
        object edtASFVideoWidth: TEdit
          Left = 89
          Top = 39
          Width = 60
          Height = 21
          TabOrder = 0
          OnChange = edtASFVideoWidthChange
        end
        object edtASFVideoHeight: TEdit
          Left = 89
          Top = 69
          Width = 60
          Height = 21
          TabOrder = 1
          OnChange = edtASFVideoHeightChange
        end
        object edtASFVideoBitRate: TEdit
          Left = 394
          Top = 30
          Width = 49
          Height = 21
          TabOrder = 2
          OnChange = edtASFVideoBitRateChange
        end
        object edtASFVideoMaxKeyFrameSpacing: TEdit
          Left = 394
          Top = 79
          Width = 49
          Height = 21
          TabOrder = 3
          OnChange = edtASFVideoMaxKeyFrameSpacingChange
        end
        object edtASFVideoQuality: TEdit
          Left = 394
          Top = 54
          Width = 49
          Height = 21
          TabOrder = 4
          OnChange = edtASFVideoQualityChange
        end
        object edtASFAudioChannels: TEdit
          Left = 394
          Top = 103
          Width = 49
          Height = 21
          TabOrder = 5
          OnChange = edtASFAudioChannelsChange
        end
        object cmbASFDeinterlaceMode: TComboBox
          Left = 158
          Top = 130
          Width = 286
          Height = 24
          ItemHeight = 16
          TabOrder = 6
          OnChange = cmbASFDeinterlaceModeChange
          Items.Strings = (
            'adm_NotInterlaced'
            'adm_DeinterlaceNormal'
            'adm_DeinterlaceHalfSize'
            'adm_DeinterlaceHalfSizeDoubleRate'
            'adm_DeinterlaceInverseTelecine'
            'adm_DeinterlaceVerticalHalfSizeDoubleRate')
        end
        object chkASFFixedFrameRate: TCheckBox
          Left = 20
          Top = 110
          Width = 112
          Height = 20
          Caption = 'fixed frame rate'
          TabOrder = 7
          OnClick = chkASFFixedFrameRateClick
        end
        object rdgProfileVersion: TRadioGroup
          Left = 167
          Top = 32
          Width = 100
          Height = 70
          Caption = 'WMV version'
          Items.Strings = (
            'WMV 8'
            'WMV 9')
          TabOrder = 8
          OnClick = rdgProfileVersionClick
        end
        object GroupBox3: TGroupBox
          Left = 463
          Top = 10
          Width = 296
          Height = 53
          Caption = 'WM9 profiles'
          TabOrder = 9
          object btnSelectWMV9Profile: TSpeedButton
            Left = 10
            Top = 20
            Width = 50
            Height = 26
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              0400000000000001000000000000000000001000000010000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
              5555555555555555555555555555555555555555555555555555555555555555
              555555555555555555555555555555555555555FFFFFFFFFF555550000000000
              55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
              B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
              000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
              555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
              55555575FFF75555555555700007555555555557777555555555555555555555
              5555555555555555555555555555555555555555555555555555}
            NumGlyphs = 2
            OnClick = btnSelectWMV9ProfileClick
          end
          object edtWM9Profile: TEdit
            Left = 69
            Top = 20
            Width = 218
            Height = 21
            TabOrder = 0
            Text = '<- select a WMV9 profile...'
            OnChange = edtWM9ProfileChange
          end
        end
      end
      object btnViewDirectNetworkStreaming: TButton
        Left = 187
        Top = 41
        Width = 41
        Height = 19
        Caption = 'view'
        Enabled = False
        TabOrder = 5
        OnClick = btnViewDirectNetworkStreamingClick
      end
      object grbASFProfiles: TGroupBox
        Left = 837
        Top = 64
        Width = 297
        Height = 159
        Caption = 'WMV 8 Profiles'
        TabOrder = 6
        object Label34: TLabel
          Left = 10
          Top = 22
          Width = 220
          Height = 16
          Caption = 'index of current profile: (-1 = disabled)'
        end
        object lsbProfiles: TListBox
          Left = 10
          Top = 69
          Width = 277
          Height = 85
          ExtendedSelect = False
          ItemHeight = 16
          TabOrder = 0
          OnClick = lsbProfilesClick
        end
        object btnShowProfilesList: TButton
          Left = 10
          Top = 42
          Width = 159
          Height = 21
          Caption = 'show WMV8 profiles list'
          TabOrder = 1
          OnClick = btnShowProfilesListClick
        end
        object edtProfileIndex: TEdit
          Left = 236
          Top = 17
          Width = 41
          Height = 21
          TabOrder = 2
          Text = '-1'
          OnChange = edtProfileIndexChange
        end
      end
    end
    object tbsPlayer: TTabSheet
      Caption = 'player'
      ImageIndex = 1
      object btnOpenLastClipRecorded: TSpeedButton
        Left = 261
        Top = 54
        Width = 129
        Height = 24
        Caption = 'Last clip recorded'
        NumGlyphs = 2
        OnClick = btnOpenLastClipRecordedClick
      end
      object btnPlayerOpenFile: TSpeedButton
        Left = 10
        Top = 22
        Width = 119
        Height = 26
        Caption = 'Choose a clip'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555555555555555555555555555555555555555555555555555555555555
          555555555555555555555555555555555555555FFFFFFFFFF555550000000000
          55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
          B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
          000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
          555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
          55555575FFF75555555555700007555555555557777555555555555555555555
          5555555555555555555555555555555555555555555555555555}
        NumGlyphs = 2
        OnClick = btnPlayerOpenFileClick
      end
      object Label23: TLabel
        Left = 66
        Top = 175
        Width = 120
        Height = 16
        Caption = 'ff/rewind speed ratio'
      end
      object Label8: TLabel
        Left = 64
        Top = 142
        Width = 141
        Height = 16
        Caption = 'normal play speed ratio'
      end
      object Label40: TLabel
        Left = 0
        Top = 0
        Width = 115
        Height = 16
        Caption = 'Player functions.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label41: TLabel
        Left = 374
        Top = 2
        Width = 751
        Height = 16
        Caption = 
          'to use only the player and disable the live video functions, set' +
          ' VideoDevice = -1 and AudioDevice = -1 from the Object Inspector' +
          '.'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGray
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object btnPlayerOpenStreamingURL: TSpeedButton
        Left = 10
        Top = 54
        Width = 100
        Height = 24
        Caption = 'demo URL ?'
        NumGlyphs = 2
      end
      object btnOpenLastClipPlayed: TSpeedButton
        Left = 116
        Top = 54
        Width = 139
        Height = 24
        Caption = 'Open last clip played'
        NumGlyphs = 2
        OnClick = btnOpenLastClipPlayedClick
      end
      object Label77: TLabel
        Left = 335
        Top = 111
        Width = 41
        Height = 16
        Caption = 'start (*)'
      end
      object Label80: TLabel
        Left = 443
        Top = 111
        Width = 143
        Height = 16
        Caption = 'stop (*)       (* default = -1)'
      end
      object Label89: TLabel
        Left = 207
        Top = 183
        Width = 373
        Height = 16
        Caption = '(times are expressed in 100ns units, e.g. 3 seconds = 30000000)'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGray
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object btnOpenDVD: TSpeedButton
        Left = 428
        Top = 84
        Width = 105
        Height = 23
        Caption = 'open DVD'
        NumGlyphs = 2
        OnClick = btnOpenDVDClick
      end
      object btnCurrentDVDInfo: TSpeedButton
        Left = 537
        Top = 84
        Width = 124
        Height = 23
        Caption = 'current DVD info ?'
        NumGlyphs = 2
        OnClick = btnCurrentDVDInfoClick
      end
      object edtPlayerFastSeekSpeed: TEdit
        Left = 7
        Top = 170
        Width = 37
        Height = 24
        Color = clSilver
        ReadOnly = True
        TabOrder = 0
        Text = '1'
      end
      object edtPlayerSpeedRatio: TEdit
        Left = 7
        Top = 137
        Width = 53
        Height = 24
        TabOrder = 1
        Text = '1'
        OnChange = edtPlayerSpeedRatioChange
      end
      object updPlayerFastSeekSpeed: TUpDown
        Left = 44
        Top = 170
        Width = 16
        Height = 26
        Min = 1
        Position = 1
        TabOrder = 2
        Wrap = False
        OnClick = updPlayerFastSeekSpeedClick
      end
      object btnAutoPlay: TCheckBox
        Left = 172
        Top = 84
        Width = 130
        Height = 21
        Caption = 'auto start playing'
        TabOrder = 3
        OnClick = btnAutoPlayClick
      end
      object edtPlayerClip: TEdit
        Left = 138
        Top = 22
        Width = 375
        Height = 24
        TabOrder = 4
        Text = 'Choose a clip...'
      end
      object chkPlayerAudioRendering: TCheckBox
        Left = 5
        Top = 84
        Width = 164
        Height = 21
        Caption = 'render player audio'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        OnClick = chkPlayerAudioRenderingClick
      end
      object chkRefreshPausedDisplay: TCheckBox
        Left = 5
        Top = 202
        Width = 626
        Height = 21
        Caption = 
          'refresh periodically paused display when the frame grabber is en' +
          'abled (e.g. to apply graphic overlays)'
        TabOrder = 6
        OnClick = chkRefreshPausedDisplayClick
      end
      object btnOpenClip: TButton
        Left = 519
        Top = 22
        Width = 73
        Height = 26
        Caption = 'Open'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 7
        OnClick = btnOpenClipClick
      end
      object btnPlayerCloseClip: TButton
        Left = 599
        Top = 22
        Width = 62
        Height = 26
        Caption = 'Close'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 8
        OnClick = btnPlayerCloseClipClick
      end
      object btnGetClipDuration: TButton
        Left = 591
        Top = 54
        Width = 72
        Height = 24
        Caption = 'duration?'
        TabOrder = 9
        OnClick = btnGetClipDurationClick
      end
      object btnGeneralInfo: TButton
        Left = 396
        Top = 54
        Width = 93
        Height = 24
        Caption = 'general info?'
        TabOrder = 10
        OnClick = btnGeneralInfoClick
      end
      object btnHeaderInfo: TButton
        Left = 495
        Top = 54
        Width = 91
        Height = 24
        Caption = 'header info?'
        TabOrder = 11
        OnClick = btnHeaderInfoClick
      end
      object chkUseClock: TCheckBox
        Left = 172
        Top = 103
        Width = 85
        Height = 21
        Caption = 'use clock'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 12
        OnClick = chkUseClockClick
      end
      object grbPlayList: TGroupBox
        Left = 670
        Top = 25
        Width = 454
        Height = 195
        Caption = 'Playlist'
        TabOrder = 13
        object btnAddToPlaylist: TSpeedButton
          Left = 10
          Top = 21
          Width = 70
          Height = 23
          Caption = 'Add'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            0400000000000001000000000000000000001000000010000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
            5555555555555555555555555555555555555555555555555555555555555555
            555555555555555555555555555555555555555FFFFFFFFFF555550000000000
            55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
            B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
            000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
            555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
            55555575FFF75555555555700007555555555557777555555555555555555555
            5555555555555555555555555555555555555555555555555555}
          NumGlyphs = 2
          OnClick = btnAddToPlaylistClick
        end
        object chkPlaylistLoop: TCheckBox
          Left = 10
          Top = 59
          Width = 60
          Height = 21
          Caption = 'Loop'
          TabOrder = 0
          OnClick = chkPlaylistLoopClick
        end
        object btnPlaylistPlay: TButton
          Left = 84
          Top = 21
          Width = 53
          Height = 23
          Caption = 'Play'
          TabOrder = 1
          OnClick = btnPlaylistPlayClick
        end
        object btnPlaylistNext: TButton
          Left = 142
          Top = 21
          Width = 49
          Height = 23
          Caption = 'Next'
          TabOrder = 2
          OnClick = btnPlaylistNextClick
        end
        object btnPlaylistPrevious: TButton
          Left = 196
          Top = 21
          Width = 69
          Height = 23
          Caption = 'Previous'
          TabOrder = 3
          OnClick = btnPlaylistPreviousClick
        end
        object chkPlaylistRandom: TCheckBox
          Left = 10
          Top = 89
          Width = 80
          Height = 21
          Caption = 'Random'
          TabOrder = 4
          OnClick = chkPlaylistRandomClick
        end
        object btnPlaylistStop: TButton
          Left = 268
          Top = 21
          Width = 120
          Height = 23
          Caption = 'Stop after current'
          TabOrder = 5
          OnClick = btnPlaylistStopClick
        end
        object lstPlaylist: TListBox
          Left = 89
          Top = 49
          Width = 355
          Height = 139
          ItemHeight = 16
          TabOrder = 6
          OnClick = lstPlaylistClick
        end
        object btnClosePlaylist: TButton
          Left = 393
          Top = 21
          Width = 51
          Height = 23
          Caption = 'Close'
          TabOrder = 7
          OnClick = btnClosePlaylistClick
        end
      end
      object btnOpenAtFrames: TButton
        Left = 207
        Top = 128
        Width = 119
        Height = 26
        Caption = 'Open at frames ->'
        TabOrder = 14
        OnClick = btnOpenAtFramesClick
      end
      object btnOpenAtTimes: TButton
        Left = 207
        Top = 158
        Width = 119
        Height = 25
        Caption = 'Open at times ->'
        TabOrder = 15
        OnClick = btnOpenAtTimesClick
      end
      object edtartFrame: TEdit
        Left = 335
        Top = 128
        Width = 93
        Height = 24
        TabOrder = 16
      end
      object edtopFrame: TEdit
        Left = 443
        Top = 128
        Width = 94
        Height = 24
        TabOrder = 17
      end
      object edtartTime: TEdit
        Left = 335
        Top = 158
        Width = 93
        Height = 24
        TabOrder = 18
      end
      object edtopTime: TEdit
        Left = 443
        Top = 158
        Width = 94
        Height = 24
        TabOrder = 19
      end
      object chkKeepBounds: TCheckBox
        Left = 542
        Top = 138
        Width = 99
        Height = 21
        Caption = 'keep bounds'
        Checked = True
        State = cbChecked
        TabOrder = 20
      end
      object chkReopen: TCheckBox
        Left = 542
        Top = 160
        Width = 126
        Height = 21
        Caption = 'reopen if opened'
        TabOrder = 21
      end
      object chkPlayerLoop: TCheckBox
        Left = 5
        Top = 108
        Width = 164
        Height = 21
        Caption = 'loop (repeat indefinitely)'
        TabOrder = 22
        OnClick = chkPlayerLoopClick
      end
    end
    object tbsFrameGrabber: TTabSheet
      Caption = 'frame grabber'
      object Label42: TLabel
        Left = 0
        Top = 0
        Width = 108
        Height = 16
        Caption = 'Frame grabber.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label43: TLabel
        Left = 108
        Top = 0
        Width = 798
        Height = 16
        Caption = 
          'The frame grabber handles frame capture, frame overlay and video' +
          ' processing, so these features are not available when it is disa' +
          'bled. '
      end
      object Label72: TLabel
        Left = 788
        Top = 123
        Width = 81
        Height = 16
        Caption = 'capture width:'
      end
      object Label73: TLabel
        Left = 788
        Top = 170
        Width = 87
        Height = 16
        Caption = 'capture height:'
      end
      object rgdFrameGrabberFormat: TRadioGroup
        Left = 118
        Top = 20
        Width = 169
        Height = 99
        Caption = 'frame grabber format'
        Columns = 2
        Items.Strings = (
          'default'
          'RGB32'
          'RGB24'
          'RGB565'
          'RGB555'
          'RGB8')
        TabOrder = 0
        OnClick = rgdFrameGrabberFormatClick
      end
      object rgdFrameGrabber: TRadioGroup
        Left = 0
        Top = 20
        Width = 110
        Height = 119
        Caption = 'Frame grabber'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Items.Strings = (
          'both streams'
          'preview'
          'capture'
          'disabled')
        ParentFont = False
        TabOrder = 1
        OnClick = rgdFrameGrabberClick
      end
      object grbFileNames: TGroupBox
        Left = 0
        Top = 138
        Width = 287
        Height = 80
        Caption = 'file names are generated automatically on a'
        TabOrder = 2
        object Label46: TLabel
          Left = 162
          Top = 25
          Width = 117
          Height = 16
          Caption = 'prefix for file names:'
        end
        object rdgAutoFileName: TRadioGroup
          Left = 10
          Top = 15
          Width = 139
          Height = 61
          Items.Strings = (
            'sequential basis'
            'time basis')
          TabOrder = 0
          OnClick = rdgAutoFileNameClick
        end
        object edtAVIAutoFilePrefix: TEdit
          Left = 162
          Top = 44
          Width = 100
          Height = 24
          TabOrder = 1
          OnChange = edtAVIAutoFilePrefixChange
        end
      end
      object grbOneShot: TGroupBox
        Left = 298
        Top = 20
        Width = 481
        Height = 75
        Caption = 'one-shot frame capture to...'
        TabOrder = 3
        object edtUseThisFileName: TEdit
          Left = 384
          Top = 44
          Width = 80
          Height = 24
          Enabled = False
          TabOrder = 0
          Text = 'CapFile01'
        end
        object btnOneShotTBitmap: TButton
          Left = 10
          Top = 22
          Width = 74
          Height = 21
          Caption = 'TBitmap'
          TabOrder = 1
          OnClick = btnOneShotTBitmapClick
        end
        object btnOneShotBMPFile: TButton
          Left = 97
          Top = 22
          Width = 74
          Height = 21
          Caption = 'bmp file'
          TabOrder = 2
          OnClick = btnOneShotBMPFileClick
        end
        object btnOneShotJPEGFile: TButton
          Left = 185
          Top = 22
          Width = 73
          Height = 21
          Caption = 'jpeg file'
          TabOrder = 3
          OnClick = btnOneShotJPEGFileClick
        end
        object chkUseThisFileName: TCheckBox
          Left = 10
          Top = 49
          Width = 365
          Height = 21
          Caption = 'do not create the file name automatically, use this file name:'
          TabOrder = 4
          OnClick = chkUseThisFileNameClick
        end
        object btnOneShotClipboard: TButton
          Left = 273
          Top = 22
          Width = 74
          Height = 21
          Caption = 'clipboard'
          TabOrder = 5
          OnClick = btnOneShotClipboardClick
        end
      end
      object grbBurstMode: TGroupBox
        Left = 308
        Top = 95
        Width = 481
        Height = 120
        Caption = 'burst-mode frame capture to... '
        TabOrder = 4
        object Label14: TLabel
          Left = 74
          Top = 52
          Width = 292
          Height = 16
          Caption = 'frames to capture  (0 = capture frames indefinitely)'
        end
        object Label15: TLabel
          Left = 79
          Top = 95
          Width = 263
          Height = 16
          Caption = 'frames to skip between each frame captured'
        end
        object btnBurstModeBMPFile: TButton
          Left = 100
          Top = 22
          Width = 74
          Height = 21
          Caption = 'bmp file'
          TabOrder = 0
          OnClick = btnBurstModeBMPFileClick
        end
        object btnBurstModeJPEGFile: TButton
          Left = 188
          Top = 22
          Width = 74
          Height = 21
          Caption = 'jpeg file'
          TabOrder = 1
          OnClick = btnBurstModeJPEGFileClick
        end
        object edtBurstCount: TEdit
          Left = 10
          Top = 49
          Width = 55
          Height = 24
          TabOrder = 2
          Text = '3'
          OnChange = edtBurstCountChange
        end
        object edtBurstInterval: TEdit
          Left = 10
          Top = 90
          Width = 55
          Height = 24
          TabOrder = 3
          Text = '0'
          OnChange = edtBurstIntervalChange
        end
        object btnBurstModeStop: TButton
          Left = 367
          Top = 22
          Width = 74
          Height = 21
          Caption = 'stop'
          TabOrder = 4
          OnClick = btnBurstModeStopClick
        end
        object btnBurstModeTBitmap: TButton
          Left = 10
          Top = 22
          Width = 74
          Height = 21
          Caption = 'TBitmap'
          TabOrder = 5
          OnClick = btnBurstModeTBitmapClick
        end
        object btnBurstModeClipboard: TButton
          Left = 277
          Top = 22
          Width = 74
          Height = 21
          Caption = 'clipboard'
          TabOrder = 6
          OnClick = btnBurstModeClipboardClick
        end
        object chkModulo: TCheckBox
          Left = 71
          Top = 71
          Width = 403
          Height = 21
          Caption = 
            'modulo (when the count is reached, overwrite frame 1 and next...' +
            ')'
          TabOrder = 7
          OnClick = chkModuloClick
        end
      end
      object grbZoomSize: TGroupBox
        Left = 784
        Top = 20
        Width = 90
        Height = 102
        Caption = 'Zoom size'
        TabOrder = 5
        object Label12: TLabel
          Left = 15
          Top = 20
          Width = 27
          Height = 16
          Caption = 'size:'
        end
        object tbrCaptureZoomSize: TTrackBar
          Left = 10
          Top = 15
          Width = 31
          Height = 85
          Max = 300
          Orientation = trVertical
          Frequency = 1
          Position = 100
          SelEnd = 0
          SelStart = 0
          TabOrder = 0
          ThumbLength = 14
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrCaptureZoomSizeChange
        end
        object edtCaptureZoomSize: TEdit
          Left = 42
          Top = 44
          Width = 40
          Height = 24
          Color = clSilver
          ReadOnly = True
          TabOrder = 1
          Text = '100%'
        end
        object btnResetCaptureZoomSize: TButton
          Left = 46
          Top = 23
          Width = 30
          Height = 18
          Caption = 'rst'
          TabOrder = 2
          OnClick = btnResetCaptureZoomSizeClick
        end
      end
      object mmoFrameCaptureLog: TMemo
        Left = 879
        Top = 25
        Width = 252
        Height = 189
        Color = clSilver
        Lines.Strings = (
          '   log:')
        TabOrder = 6
      end
      object edtFrameCaptureWidth: TEdit
        Left = 788
        Top = 140
        Width = 80
        Height = 24
        TabOrder = 7
        OnChange = edtFrameCaptureWidthChange
      end
      object edtFrameCaptureHeight: TEdit
        Left = 788
        Top = 187
        Width = 80
        Height = 24
        TabOrder = 8
        OnChange = edtFrameCaptureHeightChange
      end
    end
    object TabSheet1: TTabSheet
      Caption = 'motion detection'
      ImageIndex = 11
      object Label53: TLabel
        Left = 0
        Top = 0
        Width = 115
        Height = 16
        Caption = 'Motion detection'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lblMotionDetectorRequiresFrameGrabber: TLabel
        Left = 138
        Top = 0
        Width = 218
        Height = 16
        Caption = 'The frame grabber must be enabled.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label54: TLabel
        Left = 0
        Top = 49
        Width = 106
        Height = 16
        Caption = 'detection method:'
      end
      object imgMotionDetected: TImage
        Left = 492
        Top = 5
        Width = 130
        Height = 105
      end
      object mmoSensitivityGrid: TMemo
        Left = 630
        Top = 5
        Width = 248
        Height = 214
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ScrollBars = ssBoth
        TabOrder = 0
        WordWrap = False
      end
      object mmoMotionGrid: TMemo
        Left = 886
        Top = 5
        Width = 248
        Height = 214
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        ScrollBars = ssBoth
        TabOrder = 1
        WordWrap = False
      end
      object chkMotionDetectionEnabled: TCheckBox
        Left = 0
        Top = 22
        Width = 218
        Height = 21
        Caption = 'ENABLE MOTION DETECTION'
        TabOrder = 2
        OnClick = chkMotionDetectionEnabledClick
      end
      object chkReduceVideoNoise: TCheckBox
        Left = 226
        Top = 22
        Width = 140
        Height = 21
        Caption = 'reduce video noise'
        TabOrder = 3
        OnClick = chkReduceVideoNoiseClick
      end
      object btnShowGridDialog: TButton
        Left = 382
        Top = 1
        Width = 102
        Height = 24
        Caption = 'show grid dialog'
        TabOrder = 4
        OnClick = btnShowGridDialogClick
      end
      object chkCompareRed: TCheckBox
        Left = 118
        Top = 47
        Width = 41
        Height = 21
        Caption = 'red'
        TabOrder = 5
        OnClick = chkCompareRedClick
      end
      object chkCompareGreen: TCheckBox
        Left = 167
        Top = 47
        Width = 61
        Height = 21
        Caption = 'green'
        TabOrder = 6
        OnClick = chkCompareGreenClick
      end
      object chkCompareBlue: TCheckBox
        Left = 236
        Top = 47
        Width = 51
        Height = 21
        Caption = 'blue'
        TabOrder = 7
        OnClick = chkCompareBlueClick
      end
      object chk_GreyScale: TCheckBox
        Left = 295
        Top = 47
        Width = 90
        Height = 21
        Caption = 'grey scale'
        TabOrder = 8
        OnClick = chk_GreyScaleClick
      end
      object grbMotionRatio: TGroupBox
        Left = 490
        Top = 113
        Width = 132
        Height = 52
        Caption = 'Global motion ratio'
        TabOrder = 9
        object shpMotionDetected: TShape
          Left = 16
          Top = 22
          Width = 18
          Height = 19
          Brush.Color = clScrollBar
          Shape = stCircle
        end
        object edtMotionRatio: TEdit
          Left = 42
          Top = 20
          Width = 79
          Height = 21
          Color = clSilver
          ReadOnly = True
          TabOrder = 0
        end
      end
      object grbXYMaxMotion: TGroupBox
        Left = 414
        Top = 167
        Width = 208
        Height = 52
        Caption = 'max motion location:'
        TabOrder = 10
        object edtMaxMotionXY: TEdit
          Left = 12
          Top = 20
          Width = 78
          Height = 21
          Color = clSilver
          ReadOnly = True
          TabOrder = 0
        end
        object edtMaxMotionCoord: TEdit
          Left = 96
          Top = 20
          Width = 102
          Height = 21
          Color = clSilver
          ReadOnly = True
          TabOrder = 1
        end
      end
      object grbCellsSensitivity: TGroupBox
        Left = 165
        Top = 139
        Width = 237
        Height = 80
        Caption = 'cells sensitivity  (0 based index)'
        TabOrder = 11
        object Label57: TLabel
          Left = 10
          Top = 20
          Width = 32
          Height = 16
          Caption = 'X cell'
        end
        object Label58: TLabel
          Left = 69
          Top = 20
          Width = 33
          Height = 16
          Caption = 'Y cell'
        end
        object Label59: TLabel
          Left = 128
          Top = 20
          Width = 95
          Height = 16
          Caption = 'sensitivity (0 .. 9)'
        end
        object edtXCell: TEdit
          Left = 10
          Top = 39
          Width = 37
          Height = 21
          TabOrder = 0
          Text = '2'
        end
        object updXCell: TUpDown
          Left = 47
          Top = 39
          Width = 18
          Height = 26
          Associate = edtXCell
          Min = 0
          Max = 1000
          Position = 2
          TabOrder = 1
          Wrap = False
        end
        object edtYCell: TEdit
          Left = 69
          Top = 39
          Width = 37
          Height = 21
          TabOrder = 2
          Text = '1'
        end
        object updYCell: TUpDown
          Left = 106
          Top = 39
          Width = 18
          Height = 26
          Associate = edtYCell
          Min = 0
          Max = 1000
          Position = 1
          TabOrder = 3
          Wrap = False
        end
        object edtCellSensitivity: TEdit
          Left = 128
          Top = 39
          Width = 37
          Height = 21
          TabOrder = 4
          Text = '6'
        end
        object updCellSensitivity: TUpDown
          Left = 165
          Top = 39
          Width = 18
          Height = 26
          Associate = edtCellSensitivity
          Min = 0
          Max = 9
          Position = 6
          TabOrder = 5
          Wrap = False
        end
        object btnSetCellsSensitivity: TButton
          Left = 187
          Top = 39
          Width = 41
          Height = 26
          Caption = 'SET'
          TabOrder = 6
          OnClick = btnSetCellsSensitivityClick
        end
      end
      object grbGridSize: TGroupBox
        Left = 0
        Top = 139
        Width = 159
        Height = 80
        Caption = 'grid size'
        TabOrder = 12
        object Label55: TLabel
          Left = 5
          Top = 20
          Width = 53
          Height = 16
          Caption = 'col count'
        end
        object Label56: TLabel
          Left = 66
          Top = 20
          Width = 56
          Height = 16
          Caption = 'row count'
        end
        object edtGridColCount: TEdit
          Left = 7
          Top = 39
          Width = 37
          Height = 21
          TabOrder = 0
          Text = '10'
        end
        object updGridColCount: TUpDown
          Left = 44
          Top = 39
          Width = 19
          Height = 26
          Associate = edtGridColCount
          Min = 0
          Position = 10
          TabOrder = 1
          Wrap = False
        end
        object edtGridRowCount: TEdit
          Left = 66
          Top = 39
          Width = 37
          Height = 21
          TabOrder = 2
          Text = '10'
        end
        object updGridRowCount: TUpDown
          Left = 103
          Top = 39
          Width = 19
          Height = 26
          Associate = edtGridRowCount
          Min = 0
          Position = 10
          TabOrder = 3
          Wrap = False
        end
        object btnApplyGridSize: TButton
          Left = 123
          Top = 39
          Width = 28
          Height = 26
          Caption = 'OK'
          TabOrder = 4
          OnClick = btnApplyGridSizeClick
        end
      end
      object grbGridString: TGroupBox
        Left = 0
        Top = 69
        Width = 484
        Height = 70
        Anchors = [akLeft, akTop, akRight]
        Caption = 'grid string'
        TabOrder = 13
        object Label51: TLabel
          Left = 74
          Top = 15
          Width = 76
          Height = 16
          Caption = 'sensitivity +/-'
        end
        object lblGridValid: TLabel
          Left = 34
          Top = 34
          Width = 29
          Height = 16
          Caption = 'valid'
        end
        object shpGridValid: TShape
          Left = 16
          Top = 33
          Width = 15
          Height = 17
          Brush.Color = clScrollBar
          Shape = stRoundRect
        end
        object edtGrid: TEdit
          Left = 89
          Top = 30
          Width = 385
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 0
          OnChange = edtGridChange
        end
        object updGlobalGridSensitivity: TUpDown
          Left = 74
          Top = 30
          Width = 15
          Height = 25
          Min = 0
          Max = 10000
          Position = 5000
          TabOrder = 1
          Wrap = False
          OnClick = updGlobalGridSensitivityClick
        end
      end
      object chkTriggered: TCheckBox
        Left = 404
        Top = 30
        Width = 80
        Height = 20
        Caption = 'triggered'
        TabOrder = 14
        OnClick = chkTriggeredClick
      end
      object btnTriggerNow: TButton
        Left = 404
        Top = 49
        Width = 80
        Height = 21
        Caption = 'trigger now'
        TabOrder = 15
        OnClick = btnTriggerNowClick
      end
    end
    object tbsFrameOverlay: TTabSheet
      Caption = 'overlays'
      ImageIndex = 8
      object lblFrameOverlayRequiresFrameGrabber: TLabel
        Left = 946
        Top = 10
        Width = 188
        Height = 16
        Caption = 'frame grabber must be enabled'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object btnPIPFromAnotherTVideoGrabber: TSpeedButton
        Left = 648
        Top = 196
        Width = 258
        Height = 25
        Caption = 'PIP from other TVideoGrabber (e.g. clip)'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555555555555555555555555555555555555555555555555555555555555
          555555555555555555555555555555555555555FFFFFFFFFF555550000000000
          55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
          B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
          000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
          555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
          55555575FFF75555555555700007555555555557777555555555555555555555
          5555555555555555555555555555555555555555555555555555}
        NumGlyphs = 2
        ParentFont = False
        OnClick = btnPIPFromAnotherTVideoGrabberClick
      end
      object grbFreeHand: TGroupBox
        Left = 943
        Top = 32
        Width = 192
        Height = 186
        Caption = 'FrameBitmap event drawing'
        TabOrder = 0
        object Label27: TLabel
          Left = 2
          Top = 20
          Width = 164
          Height = 26
          Caption = 'the sample code is located in the VideoGrabberFrameBitmap event'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -10
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsItalic]
          ParentFont = False
          WordWrap = True
        end
        object chkFreeHandEnabled: TCheckBox
          Left = 9
          Top = 135
          Width = 172
          Height = 16
          Caption = '"free hand" mouse draw'
          TabOrder = 0
          OnClick = chkFreeHandEnabledClick
        end
        object btnFreeHandErase: TButton
          Left = 9
          Top = 158
          Width = 169
          Height = 20
          Caption = 'Erase "free hand" drawing'
          TabOrder = 1
          OnClick = btnFreeHandEraseClick
        end
        object chkChangePixels: TCheckBox
          Left = 9
          Top = 112
          Width = 109
          Height = 21
          Caption = 'change pixels'
          TabOrder = 2
          OnClick = chkChangePixelsClick
        end
        object chkDrawGridOverFrames: TCheckBox
          Left = 9
          Top = 91
          Width = 89
          Height = 21
          Caption = 'draw grid'
          TabOrder = 3
          OnClick = chkDrawGridOverFramesClick
        end
        object chkDrawTarget: TCheckBox
          Left = 9
          Top = 69
          Width = 172
          Height = 21
          Caption = 'mouse-controlled target'
          TabOrder = 4
          OnClick = chkDrawGridOverFramesClick
        end
      end
      object grbTextOverlay: TGroupBox
        Left = 1
        Top = 0
        Width = 458
        Height = 222
        Caption = 
          'Text overlays   (to show while component is inactive, set Target' +
          'Display = -3)'
        TabOrder = 1
        object Label13: TLabel
          Left = 287
          Top = 68
          Width = 17
          Height = 16
          Caption = 'left'
        end
        object Label20: TLabel
          Left = 248
          Top = 68
          Width = 19
          Height = 16
          Caption = 'top'
        end
        object Label22: TLabel
          Left = 327
          Top = 68
          Width = 25
          Height = 16
          Caption = 'right'
        end
        object Label33: TLabel
          Left = 370
          Top = 89
          Width = 27
          Height = 16
          Caption = 'size:'
        end
        object Label37: TLabel
          Left = 98
          Top = 20
          Width = 100
          Height = 16
          Caption = 'target display:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label3: TLabel
          Left = 339
          Top = 198
          Width = 64
          Height = 16
          Caption = 'speed (+-):'
        end
        object Label106: TLabel
          Left = 354
          Top = 156
          Width = 77
          Height = 16
          Caption = 'coeff (0..255):'
        end
        object rdgTextOverlayAlign: TRadioGroup
          Left = 256
          Top = 114
          Width = 198
          Height = 39
          Caption = 'Text align'
          Columns = 3
          ItemIndex = 0
          Items.Strings = (
            'left'
            'center'
            'right')
          TabOrder = 3
          OnClick = rdgTextOverlayAlignClick
        end
        object chkTextOverlayEnabled: TCheckBox
          Left = 10
          Top = 20
          Width = 87
          Height = 21
          Caption = 'enabled'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnClick = chkTextOverlayEnabledClick
        end
        object chkTextOverlayTransparent: TCheckBox
          Left = 187
          Top = 47
          Width = 89
          Height = 21
          Caption = 'transparent'
          TabOrder = 2
          OnClick = chkTextOverlayTransparentClick
        end
        object mmoTextOverlayString: TMemo
          Left = 5
          Top = 128
          Width = 240
          Height = 90
          ScrollBars = ssVertical
          TabOrder = 1
          WordWrap = False
          OnChange = mmoTextOverlayStringChange
        end
        object edtTextOverlayTop: TEdit
          Left = 248
          Top = 90
          Width = 34
          Height = 24
          TabOrder = 4
          Text = '5'
          OnChange = edtTextOverlayTopChange
        end
        object edtTextOverlayLeft: TEdit
          Left = 287
          Top = 90
          Width = 35
          Height = 24
          TabOrder = 5
          Text = '5'
          OnChange = edtTextOverlayLeftChange
        end
        object edtTextOverlayRight: TEdit
          Left = 327
          Top = 90
          Width = 34
          Height = 24
          TabOrder = 6
          Text = '140'
          OnChange = edtTextOverlayRightChange
        end
        object chkTextOverlayShadow: TCheckBox
          Left = 286
          Top = 47
          Width = 72
          Height = 21
          Caption = 'shadow'
          TabOrder = 7
          OnClick = chkTextOverlayShadowClick
        end
        object updTextOverlaySize: TUpDown
          Left = 407
          Top = 88
          Width = 21
          Height = 21
          Min = 0
          Position = 0
          TabOrder = 8
          Wrap = False
          OnClick = updTextOverlaySizeClick
        end
        object rdgTextOverlaySelector: TRadioGroup
          Left = 5
          Top = 69
          Width = 237
          Height = 57
          Caption = 'overlay selector (0..n), 0 = default'
          Columns = 5
          ItemIndex = 0
          Items.Strings = (
            '0'
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7'
            '8'
            '9')
          TabOrder = 9
          OnClick = rdgTextOverlaySelectorClick
        end
        object btnTextOverlayColor: TButton
          Left = 268
          Top = 20
          Width = 37
          Height = 17
          Caption = 'color'
          TabOrder = 10
          OnClick = btnTextOverlayColorClick
        end
        object btnBkgndColor: TButton
          Left = 318
          Top = 20
          Width = 36
          Height = 17
          Caption = 'bkgn'
          TabOrder = 11
          OnClick = btnBkgndColorClick
        end
        object chkTextOverlayHighResFont: TCheckBox
          Left = 10
          Top = 39
          Width = 168
          Height = 21
          Caption = 'high resolution font'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 12
          OnClick = chkTextOverlayHighResFontClick
        end
        object edtTextOverlayTargetDisplay: TEdit
          Left = 201
          Top = 17
          Width = 30
          Height = 24
          TabOrder = 13
          Text = '0'
          OnChange = edtTextOverlayTargetDisplayChange
        end
        object btnTargetDisplayInfo: TButton
          Left = 234
          Top = 18
          Width = 28
          Height = 24
          Caption = '?'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 14
          OnClick = btnTargetDisplayInfoClick
        end
        object chkTextOverlayScrolling: TCheckBox
          Left = 256
          Top = 198
          Width = 74
          Height = 21
          Caption = 'scrolling'
          TabOrder = 15
          OnClick = chkTextOverlayScrollingClick
        end
        object edtTextOverlayScrollingSpeed: TEdit
          Left = 411
          Top = 196
          Width = 31
          Height = 24
          TabOrder = 16
          Text = '0'
          OnChange = edtTextOverlayScrollingSpeedChange
        end
        object chkOverlayOrientation: TRadioGroup
          Left = 364
          Top = 16
          Width = 90
          Height = 69
          Caption = 'orientation'
          ItemIndex = 0
          Items.Strings = (
            'horiz.'
            'vert.'
            'vert.inv.')
          TabOrder = 17
          OnClick = chkOverlayOrientationClick
        end
        object chkTextOverlayAlphablend: TCheckBox
          Left = 249
          Top = 161
          Width = 99
          Height = 21
          Caption = 'alpha blend'
          TabOrder = 18
          OnClick = chkTextOverlayAlphablendClick
        end
        object tbrTextOverlayAlphablendValue: TTrackBar
          Left = 344
          Top = 170
          Width = 100
          Height = 22
          Max = 255
          Orientation = trHorizontal
          Frequency = 1
          Position = 100
          SelEnd = 0
          SelStart = 0
          TabOrder = 19
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrTextOverlayAlphablendValueChange
        end
      end
      object chkAdjustOverlayAspectRatio: TCheckBox
        Left = 463
        Top = 199
        Width = 186
        Height = 21
        Caption = 'adjust overlay aspect ratio'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = chkAdjustOverlayAspectRatioClick
      end
      object grbBitmapOverlay: TGroupBox
        Left = 463
        Top = 2
        Width = 474
        Height = 189
        Caption = 
          'Image overlays   (to show while component is inactive, set Targe' +
          'tDisplay = -3)'
        TabOrder = 3
        object Label48: TLabel
          Left = 266
          Top = 57
          Width = 17
          Height = 16
          Caption = 'left'
        end
        object btnLoadImageOverlayFromFile: TSpeedButton
          Left = 10
          Top = 57
          Width = 159
          Height = 25
          Caption = 'select an image file...'
          Glyph.Data = {
            76010000424D7601000000000000760000002800000020000000100000000100
            0400000000000001000000000000000000001000000010000000000000000000
            800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
            5555555555555555555555555555555555555555555555555555555555555555
            555555555555555555555555555555555555555FFFFFFFFFF555550000000000
            55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
            B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
            000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
            555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
            55555575FFF75555555555700007555555555557777555555555555555555555
            5555555555555555555555555555555555555555555555555555}
          NumGlyphs = 2
          OnClick = btnLoadImageOverlayFromFileClick
        end
        object Label25: TLabel
          Left = 315
          Top = 57
          Width = 19
          Height = 16
          Caption = 'top'
        end
        object Label82: TLabel
          Left = 364
          Top = 57
          Width = 30
          Height = 16
          Caption = 'width'
        end
        object Label96: TLabel
          Left = 414
          Top = 57
          Width = 36
          Height = 16
          Caption = 'height'
        end
        object Label47: TLabel
          Left = 138
          Top = 86
          Width = 77
          Height = 16
          Caption = 'coeff (0..255):'
        end
        object Label102: TLabel
          Left = 212
          Top = 135
          Width = 170
          Height = 16
          Caption = 'chroma key RGB color (hex):'
        end
        object Label103: TLabel
          Left = 345
          Top = 108
          Width = 61
          Height = 16
          Caption = 'leeway %:'
        end
        object Label97: TLabel
          Left = 246
          Top = 162
          Width = 100
          Height = 16
          Caption = 'target display:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edtImageOverlayTransparentColorValue: TEdit
          Left = 140
          Top = 130
          Width = 68
          Height = 24
          TabOrder = 6
          Text = '0'
          OnChange = edtImageOverlayTransparentColorValueChange
        end
        object rdgImageOverlaySelector: TRadioGroup
          Left = 7
          Top = 16
          Width = 457
          Height = 42
          Caption = 
            '________________overlay selector (0..n), 0 = default____________' +
            '_____'
          Columns = 10
          ItemIndex = 0
          Items.Strings = (
            '0'
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7'
            '8'
            '9')
          TabOrder = 3
          OnClick = rdgImageOverlaySelectorClick
        end
        object edtChromaKeyLeewayPercent: TTrackBar
          Left = 404
          Top = 101
          Width = 66
          Height = 22
          Max = 100
          Orientation = trHorizontal
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 15
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = edtChromaKeyLeewayPercentChange
        end
        object chkImageOverlayEnabled: TCheckBox
          Left = 175
          Top = 59
          Width = 92
          Height = 21
          Caption = 'enabled'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnClick = chkImageOverlayEnabledClick
        end
        object edtImageOverlayLeft: TEdit
          Left = 266
          Top = 73
          Width = 40
          Height = 24
          TabOrder = 1
          Text = '50'
          OnChange = edtImageOverlayLeftChange
        end
        object edtImageOverlayTop: TEdit
          Left = 315
          Top = 73
          Width = 41
          Height = 24
          TabOrder = 2
          Text = '50'
          OnChange = edtImageOverlayTopChange
        end
        object chkImageOverlayTransparent: TCheckBox
          Left = 5
          Top = 106
          Width = 124
          Height = 21
          Caption = 'transparent'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 4
          OnClick = chkImageOverlayTransparentClick
        end
        object chkImageOverlayUseTransparentColor: TCheckBox
          Left = 5
          Top = 133
          Width = 124
          Height = 21
          Caption = 'transp.color (hex):'
          TabOrder = 5
          OnClick = chkImageOverlayUseTransparentColorClick
        end
        object btnImageOverlayPickupColor: TButton
          Left = 5
          Top = 160
          Width = 183
          Height = 21
          Caption = 'pick up the transparent color'
          TabOrder = 7
          OnClick = btnImageOverlayPickupColorClick
        end
        object btnImageOverlayPickupHelp: TButton
          Left = 190
          Top = 160
          Width = 30
          Height = 21
          Caption = '?'
          TabOrder = 8
          OnClick = btnImageOverlayPickupHelpClick
        end
        object edtImageOverlayWidth: TEdit
          Left = 364
          Top = 73
          Width = 41
          Height = 24
          Hint = '-1 = current image width'
          TabOrder = 9
          Text = '-1'
          OnChange = edtImageOverlayWidthChange
        end
        object edtImageOverlayHeight: TEdit
          Left = 414
          Top = 73
          Width = 40
          Height = 24
          Hint = '-1 = current image height'
          TabOrder = 10
          Text = '-1'
          OnChange = edtImageOverlayHeightChange
        end
        object chkImageOverlayAlphaBlend: TCheckBox
          Left = 25
          Top = 89
          Width = 99
          Height = 21
          Caption = 'alpha blend'
          TabOrder = 11
          OnClick = chkImageOverlayAlphaBlendClick
        end
        object chkImageOverlayAlphablendCoeff: TTrackBar
          Left = 128
          Top = 101
          Width = 100
          Height = 22
          Max = 255
          Orientation = trHorizontal
          Frequency = 1
          Position = 100
          SelEnd = 0
          SelStart = 0
          TabOrder = 12
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = chkImageOverlayAlphablendCoeffChange
        end
        object chkImageOverlayChromaKey: TCheckBox
          Left = 231
          Top = 106
          Width = 107
          Height = 21
          Caption = 'chroma key'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 13
          OnClick = chkImageOverlayChromaKeyClick
        end
        object edtChromaKeyColorValue: TEdit
          Left = 394
          Top = 130
          Width = 70
          Height = 24
          TabOrder = 14
          Text = '0'
          OnChange = edtChromaKeyColorValueChange
        end
        object edtImageOverlayTargetDisplay: TEdit
          Left = 348
          Top = 158
          Width = 31
          Height = 24
          TabOrder = 16
          Text = '0'
          OnChange = edtImageOverlayTargetDisplayChange
        end
        object btnImageOverlayInfo: TButton
          Left = 382
          Top = 159
          Width = 28
          Height = 23
          Caption = '?'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 17
        end
      end
      object btnPIPStop: TButton
        Left = 910
        Top = 196
        Width = 29
        Height = 25
        Caption = 'stop'
        TabOrder = 4
        OnClick = btnPIPStopClick
      end
    end
    object tbsVideoProcessing: TTabSheet
      Caption = 'video processing'
      ImageIndex = 9
      object grbCropping: TGroupBox
        Left = 798
        Top = 2
        Width = 326
        Height = 157
        Caption = 'Cropping'
        TabOrder = 0
        object Label85: TLabel
          Left = 252
          Top = 69
          Width = 35
          Height = 16
          Caption = 'Y pos'
        end
        object Label86: TLabel
          Left = 113
          Top = 15
          Width = 65
          Height = 16
          Caption = 'Area width:'
        end
        object Label87: TLabel
          Left = 108
          Top = 44
          Width = 71
          Height = 16
          Caption = 'Area height:'
        end
        object Label84: TLabel
          Left = 84
          Top = 118
          Width = 34
          Height = 16
          Caption = 'X pos'
        end
        object Label88: TLabel
          Left = 10
          Top = 69
          Width = 92
          Height = 16
          Caption = 'cropping zoom:'
        end
        object chkCroppingEnabled: TCheckBox
          Left = 10
          Top = 20
          Width = 90
          Height = 21
          Caption = 'enabled'
          TabOrder = 0
          OnClick = chkCroppingEnabledClick
        end
        object trkCroppingX: TTrackBar
          Left = 118
          Top = 111
          Width = 159
          Height = 31
          Orientation = trHorizontal
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 1
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = trkCroppingXChange
        end
        object trkCroppingY: TTrackBar
          Left = 286
          Top = 9
          Width = 30
          Height = 140
          Orientation = trVertical
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 2
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = trkCroppingYChange
        end
        object edtCroppingWidth: TEdit
          Left = 187
          Top = 10
          Width = 70
          Height = 24
          TabOrder = 3
          OnChange = edtCroppingWidthChange
        end
        object edtCroppingHeight: TEdit
          Left = 187
          Top = 39
          Width = 70
          Height = 24
          TabOrder = 4
          OnChange = edtCroppingHeightChange
        end
        object trkCroppingZoom: TTrackBar
          Left = 2
          Top = 89
          Width = 255
          Height = 21
          Max = 1000
          Orientation = trHorizontal
          Frequency = 1
          Position = 100
          SelEnd = 0
          SelStart = 0
          TabOrder = 5
          ThumbLength = 14
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = trkCroppingZoomChange
        end
        object chkCroppingOutbounds: TCheckBox
          Left = 10
          Top = 39
          Width = 90
          Height = 21
          Caption = 'out bounds'
          TabOrder = 6
          OnClick = chkCroppingOutboundsClick
        end
        object btnCroppingZoomReset: TButton
          Left = 10
          Top = 114
          Width = 50
          Height = 18
          Caption = 'reset'
          TabOrder = 7
          OnClick = btnCroppingZoomResetClick
        end
      end
      object grbVMR9Adjust: TGroupBox
        Left = 603
        Top = 2
        Width = 186
        Height = 157
        Hint = 
          'Conditions: VMR9 selected, frame grabber disabled or on the capt' +
          'ure stream, MPEG2 video source'
        Caption = 'VMR9 image adjustment'
        TabOrder = 1
        object Label7: TLabel
          Left = 49
          Top = 128
          Width = 119
          Height = 16
          Caption = 'bright. cont. sat.  hue'
        end
        object Label21: TLabel
          Left = 10
          Top = 49
          Width = 35
          Height = 16
          Caption = 'range'
        end
        object tbrVMR9Brightness: TTrackBar
          Left = 53
          Top = 20
          Width = 27
          Height = 110
          Max = 128
          Min = -128
          Orientation = trVertical
          Frequency = 5
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 0
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrVMR9BrightnessChange
        end
        object tbrVMR9Contrast: TTrackBar
          Left = 85
          Top = 20
          Width = 25
          Height = 110
          Max = 128
          Min = -128
          Orientation = trVertical
          Frequency = 5
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 1
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrVMR9ContrastChange
        end
        object tbrVMR9Saturation: TTrackBar
          Left = 116
          Top = 20
          Width = 23
          Height = 110
          Max = 64
          Min = -64
          Orientation = trVertical
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 2
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrVMR9SaturationChange
        end
        object tbrVMR9Hue: TTrackBar
          Left = 148
          Top = 20
          Width = 21
          Height = 110
          Max = 180
          Min = -180
          Orientation = trVertical
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 3
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrVMR9HueChange
        end
        object vmr9FixRange: TCheckBox
          Left = 10
          Top = 30
          Width = 40
          Height = 20
          Caption = 'fix'
          Checked = True
          State = cbChecked
          TabOrder = 4
          OnClick = vmr9FixRangeClick
        end
      end
      object grbSoftwareVideoProcessing: TGroupBox
        Left = 10
        Top = 2
        Width = 582
        Height = 213
        Caption = 'Software video processing   (requires the frame grabber enabled)'
        TabOrder = 2
        object Label31: TLabel
          Left = 443
          Top = 140
          Width = 122
          Height = 16
          Caption = 'bright. cont. sat.  hue.'
        end
        object Label50: TLabel
          Left = 448
          Top = 177
          Width = 69
          Height = 16
          Caption = 'pixellization'
        end
        object Label60: TLabel
          Left = 5
          Top = 160
          Width = 208
          Height = 16
          Caption = 'custom rotation angle (<= 360°),e.g.:'
        end
        object rdgVideoRotation: TRadioGroup
          Left = 10
          Top = 30
          Width = 267
          Height = 119
          Caption = 'Video rotation (in degrees)'
          Columns = 2
          ItemIndex = 0
          Items.Strings = (
            'no rotation'
            '90°'
            '180°'
            '270°'
            '0°  mirror'
            '90°  mirror'
            '180° mirror'
            '270° mirror'
            'custom angle'
            'cust. angle mirror')
          TabOrder = 0
          OnClick = rdgVideoRotationClick
        end
        object rdgDeinterlacing: TRadioGroup
          Left = 288
          Top = 20
          Width = 100
          Height = 139
          Caption = 'Deinterlacing'
          ItemIndex = 0
          Items.Strings = (
            'disabled'
            'half-size'
            'full size'
            'DScaler'
            'AVISynth'
            'FFDShow')
          TabOrder = 1
          OnClick = rdgDeinterlacingClick
        end
        object chkFlipVertical: TCheckBox
          Left = 347
          Top = 166
          Width = 73
          Height = 21
          Caption = 'flip vert.'
          TabOrder = 2
          OnClick = chkFlipVerticalClick
        end
        object chkFlipHorizontal: TCheckBox
          Left = 347
          Top = 187
          Width = 75
          Height = 21
          Caption = 'flip horz.'
          TabOrder = 3
          OnClick = chkFlipHorizontalClick
        end
        object chkGreyScale: TCheckBox
          Left = 258
          Top = 187
          Width = 83
          Height = 19
          Caption = 'greyscale'
          TabOrder = 4
          OnClick = chkGreyScaleClick
        end
        object chkInvertColors: TCheckBox
          Left = 258
          Top = 166
          Width = 84
          Height = 21
          Caption = 'inv.colors'
          TabOrder = 5
          OnClick = chkInvertColorsClick
        end
        object btnResetAll: TButton
          Left = 398
          Top = 98
          Width = 41
          Height = 31
          Caption = 'reset'
          TabOrder = 6
          OnClick = btnResetAllClick
        end
        object tbrBrightness: TTrackBar
          Left = 447
          Top = 10
          Width = 27
          Height = 133
          Max = 128
          Min = -128
          Orientation = trVertical
          Frequency = 5
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 7
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrBrightnessChange
        end
        object tbrConstrast: TTrackBar
          Left = 479
          Top = 10
          Width = 24
          Height = 133
          Max = 128
          Min = -128
          Orientation = trVertical
          Frequency = 5
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 8
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrConstrastChange
        end
        object tbrSaturation: TTrackBar
          Left = 510
          Top = 10
          Width = 23
          Height = 133
          Max = 64
          Min = -64
          Orientation = trVertical
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 9
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrSaturationChange
        end
        object tbrHue: TTrackBar
          Left = 542
          Top = 10
          Width = 30
          Height = 133
          Max = 180
          Min = -180
          Orientation = trVertical
          Frequency = 1
          Position = 0
          SelEnd = 0
          SelStart = 0
          TabOrder = 10
          ThumbLength = 18
          TickMarks = tmBoth
          TickStyle = tsNone
          OnChange = tbrHueChange
        end
        object edtPixellization: TEdit
          Left = 522
          Top = 172
          Width = 31
          Height = 24
          ReadOnly = True
          TabOrder = 11
          Text = '1'
        end
        object updPixellization: TUpDown
          Left = 553
          Top = 172
          Width = 18
          Height = 24
          Associate = edtPixellization
          Min = 1
          Position = 1
          TabOrder = 12
          Wrap = False
          OnClick = updPixellizationClick
        end
        object edtCustomRotationAngle: TEdit
          Left = 5
          Top = 175
          Width = 85
          Height = 24
          TabOrder = 13
          OnChange = edtCustomRotationAngleChange
        end
      end
      object rdgDetectVideoSignal: TRadioGroup
        Left = 601
        Top = 167
        Width = 523
        Height = 46
        Caption = 'Detect video signal (adjustable)'
        Columns = 3
        ItemIndex = 0
        Items.Strings = (
          'disabled'
          'no signal (dark screen)'
          'Connexant blue screen')
        TabOrder = 3
      end
    end
    object tbsDisplay: TTabSheet
      Caption = 'display'
      ImageIndex = 10
      object imgLogo: TImage
        Left = 165
        Top = 148
        Width = 112
        Height = 71
        Center = True
        Picture.Data = {
          [encoded data, 34112 characters]
          2C38F4A69A33486B39C94868FFD9}
        Stretch = True
      end
      object Label76: TLabel
        Left = 364
        Top = 138
        Width = 177
        Height = 16
        Caption = ' (SyncPreview = sp_disabled)'
      end
      object grbMainVideoWindow: TGroupBox
        Left = 561
        Top = 44
        Width = 573
        Height = 178
        Caption = 'display settings:'
        TabOrder = 0
        object Label74: TLabel
          Left = 158
          Top = 118
          Width = 104
          Height = 16
          Caption = 'pan-scan: (0..100)'
        end
        object edtAssignToMonitorLabel: TLabel
          Left = 354
          Top = 49
          Width = 152
          Height = 16
          Caption = 'assign to monitor number:'
        end
        object chkEmbedded: TCheckBox
          Left = 10
          Top = 39
          Width = 100
          Height = 21
          Caption = 'embedded'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 0
          OnClick = chkEmbeddedClick
        end
        object chkFullScreen: TCheckBox
          Left = 187
          Top = 30
          Width = 90
          Height = 20
          Caption = 'full screen'
          TabOrder = 1
          OnClick = chkFullScreenClick
        end
        object chkStayOnTop: TCheckBox
          Left = 354
          Top = 10
          Width = 90
          Height = 21
          Caption = 'stay on top'
          TabOrder = 2
          OnClick = chkStayOnTopClick
        end
        object chkUseVideoPort: TCheckBox
          Left = 453
          Top = 10
          Width = 109
          Height = 21
          Caption = 'use video port'
          TabOrder = 3
          OnClick = chkUseVideoPortClick
        end
        object chkMouseMovesWindow: TCheckBox
          Left = 187
          Top = 10
          Width = 159
          Height = 21
          Caption = 'mouse moves window'
          TabOrder = 4
          OnClick = chkMouseMovesWindowClick
        end
        object chkAutoSize: TCheckBox
          Left = 89
          Top = 20
          Width = 99
          Height = 21
          Caption = 'auto size'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 5
          OnClick = chkAutoSizeClick
        end
        object btnNewLocation2: TButton
          Left = 394
          Top = 118
          Width = 168
          Height = 22
          Caption = 'e.g. pos. 20,20 (640x480)'
          TabOrder = 6
          OnClick = btnNewLocation2Click
        end
        object rdgAspectRatio: TRadioGroup
          Left = 10
          Top = 71
          Width = 129
          Height = 98
          Caption = 'aspect ratio'
          Items.Strings = (
            'box'
            'no resize'
            'stretch'
            'pan-scan')
          TabOrder = 7
          OnClick = rdgAspectRatioClick
        end
        object chkVisible: TCheckBox
          Left = 10
          Top = 20
          Width = 70
          Height = 21
          Caption = 'visible'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          TabOrder = 8
          OnClick = chkVisibleClick
        end
        object tbrPanScan: TTrackBar
          Left = 158
          Top = 138
          Width = 168
          Height = 21
          Max = 100
          Orientation = trHorizontal
          Frequency = 1
          Position = 50
          SelEnd = 0
          SelStart = 0
          TabOrder = 9
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrPanScanChange
        end
        object btnTestPanScan: TButton
          Left = 394
          Top = 150
          Width = 119
          Height = 21
          Caption = 'test pan-scan (e.g.)'
          TabOrder = 10
          OnClick = btnTestPanScanClick
        end
        object chkAlphablend: TCheckBox
          Left = 158
          Top = 69
          Width = 178
          Height = 21
          Caption = 'alphablending: (0..255)'
          TabOrder = 11
          OnClick = chkAlphablendClick
        end
        object chkTranspColor: TCheckBox
          Left = 354
          Top = 84
          Width = 140
          Height = 21
          Caption = 'transp.color (hex):'
          TabOrder = 12
          OnClick = chkTranspColorClick
        end
        object tbrAlphablend: TTrackBar
          Left = 158
          Top = 89
          Width = 178
          Height = 21
          Max = 255
          Orientation = trHorizontal
          Frequency = 1
          Position = 180
          SelEnd = 0
          SelStart = 0
          TabOrder = 13
          ThumbLength = 15
          TickMarks = tmBottomRight
          TickStyle = tsAuto
          OnChange = tbrAlphablendChange
        end
        object edttranspColor: TEdit
          Left = 482
          Top = 81
          Width = 80
          Height = 21
          TabOrder = 14
          OnChange = edttranspColorChange
        end
        object edtAssignToMonitorNumber: TEdit
          Left = 507
          Top = 44
          Width = 41
          Height = 21
          TabOrder = 15
          Text = '0'
          OnChange = edtAssignToMonitorNumberChange
        end
      end
      object rdgVideoRenderer: TRadioGroup
        Left = 10
        Top = 0
        Width = 149
        Height = 203
        Caption = 'VIDEO RENDERER'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Items.Strings = (
          'Auto select'
          'EVR'
          'VMR9'
          'VMR7'
          'Standard'
          'Overlay'
          'Recording Priority'
          'None (saves cpu)')
        ParentFont = False
        TabOrder = 1
        OnClick = rdgVideoRendererClick
      end
      object chkVideoVisibleWhenStopped: TCheckBox
        Left = 165
        Top = 23
        Width = 172
        Height = 21
        Caption = 'don'#39't close video window'
        TabOrder = 2
        OnClick = chkVideoVisibleWhenStoppedClick
      end
      object chkChangeCursor: TCheckBox
        Left = 165
        Top = 63
        Width = 173
        Height = 21
        Caption = 'change cursor (e.g.cross)'
        TabOrder = 3
        OnClick = chkChangeCursorClick
      end
      object chkBorder: TCheckBox
        Left = 165
        Top = 84
        Width = 63
        Height = 21
        Caption = 'border'
        TabOrder = 4
        OnClick = chkBorderClick
      end
      object chkTransparency: TCheckBox
        Left = 165
        Top = 103
        Width = 102
        Height = 21
        Caption = 'transparency'
        TabOrder = 5
        OnClick = chkTransparencyClick
      end
      object chkSetLogo: TCheckBox
        Left = 165
        Top = 123
        Width = 139
        Height = 21
        Caption = 'show logo, e.g.:'
        TabOrder = 6
        OnClick = chkSetLogoClick
      end
      object chkAdjustPixelAspectRatio: TCheckBox
        Left = 165
        Top = 43
        Width = 169
        Height = 21
        Caption = 'adjust pixel aspect ratio'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 7
        OnClick = chkAdjustPixelAspectRatioClick
      end
      object chkBlackMagicDecklink: TCheckBox
        Left = 165
        Top = 2
        Width = 201
        Height = 21
        Caption = 'BlackMagic Decklink output'
        TabOrder = 8
        OnClick = chkBlackMagicDecklinkClick
      end
      object rdgDisplaySelected: TRadioGroup
        Left = 364
        Top = 0
        Width = 770
        Height = 41
        Caption = 'display # selected:'
        Columns = 10
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemIndex = 0
        Items.Strings = (
          '0'
          '1'
          '2'
          '3'
          '4'
          '5'
          '6'
          '7'
          '8'
          '9')
        ParentFont = False
        TabOrder = 9
        OnClick = rdgDisplaySelectedClick
      end
      object chkDisplayActive: TCheckBox
        Left = 364
        Top = 49
        Width = 189
        Height = 21
        Caption = 'DISPLAY ACTIVE ->'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 10
        OnClick = chkDisplayActiveClick
      end
      object chkZeroLatency: TCheckBox
        Left = 364
        Top = 118
        Width = 110
        Height = 21
        Caption = 'no latency'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 11
        OnClick = chkZeroLatencyClick
      end
    end
    object tbsClipReencoding: TTabSheet
      Caption = 'reencoding'
      ImageIndex = 6
      object btnSourceVideoClip: TSpeedButton
        Left = 106
        Top = 7
        Width = 181
        Height = 24
        Caption = 'source video clip:'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555555555555555555555555555555555555555555555555555555555555
          555555555555555555555555555555555555555FFFFFFFFFF555550000000000
          55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
          B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
          000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
          555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
          55555575FFF75555555555700007555555555557777555555555555555555555
          5555555555555555555555555555555555555555555555555555}
        NumGlyphs = 2
        OnClick = btnSourceVideoClipClick
      end
      object Label75: TLabel
        Left = 103
        Top = 37
        Width = 184
        Height = 16
        Caption = 'file name for the new video clip:'
      end
      object Label45: TLabel
        Left = 1
        Top = 55
        Width = 285
        Height = 16
        Caption = '(extension will be ".wmv" if WMV output enabled)'
      end
      object grbReencodingSettings: TGroupBox
        Left = 591
        Top = 5
        Width = 533
        Height = 154
        Caption = 'reencoding settings'
        TabOrder = 0
        object chkIncludeVideoStream: TCheckBox
          Left = 10
          Top = 48
          Width = 178
          Height = 21
          Caption = 'includes the video stream'
          TabOrder = 0
        end
        object chkIncludeAudioStream: TCheckBox
          Left = 207
          Top = 48
          Width = 178
          Height = 21
          Caption = 'includes the audio stream'
          TabOrder = 1
        end
        object chkUseCurrentVideoCompressor: TCheckBox
          Left = 10
          Top = 73
          Width = 405
          Height = 21
          Caption = 
            'use the current video compressor (selected in the "recording" ta' +
            'b)'
          TabOrder = 2
        end
        object chkUseCurrentAudioCompressor: TCheckBox
          Left = 10
          Top = 98
          Width = 424
          Height = 21
          Caption = 
            'use the current audio compressor (selected in the "recording" ta' +
            'b)'
          TabOrder = 3
        end
        object chkUseFrameGrabber: TCheckBox
          Left = 10
          Top = 123
          Width = 517
          Height = 21
          Caption = 
            'use the frame grabber (allows text overlay, graphics overlay, vi' +
            'deo processing, etc...)'
          TabOrder = 4
        end
        object chkWMVOutput: TCheckBox
          Left = 10
          Top = 22
          Width = 109
          Height = 21
          Caption = 'WMV output'
          TabOrder = 5
        end
      end
      object edtSourceVideoClip: TEdit
        Left = 295
        Top = 7
        Width = 287
        Height = 24
        TabOrder = 1
      end
      object edtDestinationVideoClip: TEdit
        Left = 295
        Top = 42
        Width = 287
        Height = 24
        TabOrder = 2
      end
      object grbStartStopTime: TGroupBox
        Left = 0
        Top = 79
        Width = 582
        Height = 144
        Caption = 
          'START / STOP   (OPTIONAL). Times are expressed in 100ns units, e' +
          '.g. 2 seconds = 20000000'
        TabOrder = 3
        object Label78: TLabel
          Left = 23
          Top = 84
          Width = 231
          Height = 16
          Caption = 'START position (-1 = beginning of clip):'
        end
        object Label79: TLabel
          Left = 63
          Top = 113
          Width = 186
          Height = 16
          Caption = 'STOP position (-1 = end of clip):'
        end
        object Label61: TLabel
          Left = 266
          Top = 30
          Width = 142
          Height = 16
          Caption = 'the TIME (in 100ns units)'
        end
        object Label62: TLabel
          Left = 446
          Top = 30
          Width = 130
          Height = 16
          Caption = 'the FRAME NUMBER'
        end
        object Label63: TLabel
          Left = 418
          Top = 30
          Width = 23
          Height = 16
          Caption = 'OR'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label64: TLabel
          Left = 197
          Top = 30
          Width = 64
          Height = 16
          Caption = 'SPECIFY'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -15
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object edtReencStartTime: TEdit
          Left = 266
          Top = 79
          Width = 149
          Height = 24
          TabOrder = 0
          Text = '-1'
        end
        object edtReencDuration: TEdit
          Left = 266
          Top = 49
          Width = 149
          Height = 24
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 1
        end
        object edtReencStopTime: TEdit
          Left = 266
          Top = 108
          Width = 149
          Height = 24
          TabOrder = 2
          Text = '-1'
        end
        object btnDuration: TButton
          Left = 5
          Top = 52
          Width = 242
          Height = 21
          Caption = 'source duration and/or frame count?'
          TabOrder = 3
          OnClick = btnDurationClick
        end
        object edtReencFrameCount: TEdit
          Left = 463
          Top = 49
          Width = 98
          Height = 24
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 4
        end
        object edtReencStartFrame: TEdit
          Left = 463
          Top = 79
          Width = 98
          Height = 24
          TabOrder = 5
          Text = '-1'
        end
        object edtReencStopFrame: TEdit
          Left = 463
          Top = 108
          Width = 98
          Height = 24
          TabOrder = 6
          Text = '-1'
        end
      end
      object btnStartReencoding: TButton
        Left = 876
        Top = 178
        Width = 100
        Height = 26
        Caption = 'Start'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
        OnClick = btnStartReencodingClick
      end
      object btnStopReencoding: TButton
        Left = 985
        Top = 178
        Width = 99
        Height = 26
        Caption = 'Stop'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -15
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 5
        OnClick = btnStopReencodingClick
      end
      object rdgReencodingMethod: TRadioGroup
        Left = 591
        Top = 165
        Width = 227
        Height = 53
        Caption = 'reencoding method'
        Columns = 2
        Items.Strings = (
          'AVI / MPEG '
          'ASF (wmv)')
        TabOrder = 6
      end
    end
  end
  object tbrZoomY: TTrackBar
    Left = 266
    Top = 384
    Width = 21
    Height = 346
    Max = 1
    Orientation = trVertical
    Frequency = 1
    Position = 0
    SelEnd = 0
    SelStart = 0
    TabOrder = 7
    ThumbLength = 10
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = tbrZoomYChange
  end
  object tbrZoomX: TTrackBar
    Left = 354
    Top = 345
    Width = 425
    Height = 21
    Max = 1
    Orientation = trHorizontal
    Frequency = 1
    Position = 0
    SelEnd = 0
    SelStart = 0
    TabOrder = 8
    ThumbLength = 10
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = tbrZoomXChange
  end
  object tbrZoom: TTrackBar
    Left = 354
    Top = 313
    Width = 583
    Height = 30
    Max = 20000
    Min = 1000
    Orientation = trHorizontal
    Frequency = 100
    Position = 1000
    SelEnd = 0
    SelStart = 0
    TabOrder = 9
    ThumbLength = 15
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = tbrZoomChange
  end
  object MainMenu1: TMainMenu
    Left = 1200
    Top = 8
    object mnuFile: TMenuItem
      Caption = 'File'
      object mnuExit: TMenuItem
        Caption = 'Exit'
        OnClick = mnuExitClick
      end
    end
    object mnuSendDVCommands: TMenuItem
      Caption = 'Send DV commands'
      object mnuDVPlay: TMenuItem
        Caption = 'Play'
        OnClick = SendVCRCommand
      end
      object mnuDVStop: TMenuItem
        Tag = 1
        Caption = 'Stop'
        OnClick = SendVCRCommand
      end
      object mnuDVFreeze: TMenuItem
        Tag = 2
        Caption = 'Freeze'
        OnClick = SendVCRCommand
      end
      object mnuDVThaw: TMenuItem
        Tag = 3
        Caption = 'Thaw'
        OnClick = SendVCRCommand
      end
      object mnuDVFF: TMenuItem
        Tag = 4
        Caption = 'FF'
        OnClick = SendVCRCommand
      end
      object mnuDVRew: TMenuItem
        Tag = 5
        Caption = 'Rew'
        OnClick = SendVCRCommand
      end
      object mnuDVRecord: TMenuItem
        Tag = 6
        Caption = 'Record'
        OnClick = SendVCRCommand
      end
      object mnuDVRecordfreeze: TMenuItem
        Tag = 7
        Caption = 'Record freeze'
        OnClick = SendVCRCommand
      end
      object mnuDVRecordStrobe: TMenuItem
        Tag = 8
        Caption = 'Record strobe'
      end
      object mnuDVStepFwd: TMenuItem
        Tag = 9
        Caption = 'Step Fwd'
        OnClick = SendVCRCommand
      end
      object mnuDVStepRev: TMenuItem
        Tag = 10
        Caption = 'Step Rev'
        OnClick = SendVCRCommand
      end
      object mnuDVModeShuttle: TMenuItem
        Tag = 11
        Caption = 'Mode shuttle'
        OnClick = SendVCRCommand
      end
      object mnuDVPlayfastestfwd: TMenuItem
        Tag = 12
        Caption = 'Play fastest fwd'
        OnClick = SendVCRCommand
      end
      object mnuDVPlayslowestfwd: TMenuItem
        Tag = 13
        Caption = 'Play slowest fwd'
        OnClick = SendVCRCommand
      end
      object mnuDVPlayfastestrev: TMenuItem
        Tag = 14
        Caption = 'Play fastest rev'
        OnClick = SendVCRCommand
      end
      object mnuDVPlayslowestrev: TMenuItem
        Tag = 15
        Caption = 'Play slowest rev'
        OnClick = SendVCRCommand
      end
    end
    object Options1: TMenuItem
      Caption = 'Options'
      object Resetvideocapturedevicesettings1: TMenuItem
        Caption = 'Reset video capture device settings'
        OnClick = Resetvideocapturedevicesettings1Click
      end
    end
    object mnuAbout: TMenuItem
      Caption = 'About'
      OnClick = mnuAboutClick
    end
  end
end
