ColorEnable Property

Summary

Gets or sets the setting for the ColorEnable property.

Syntax
C#
VB
C++
public bool ColorEnable { get; set; } 
Public Property ColorEnable As Boolean 
public: 
property bool ColorEnable { 
   bool get(); 
   void set (    bool ); 
} 

Property Value

true if the color enable setting is on; false otherwise.

Remarks

Gets the setting for the ColorEnable property.

Example
C#
VB
using Leadtools; 
using Leadtools.Multimedia; 
using LeadtoolsMultimediaExamples.Fixtures; 
 
public bool _result = false; 
public CaptureCtrlForm _form = new CaptureCtrlForm(); 
public string _outFile = Path.Combine(LEAD_VARS.MediaDir, "VideoProcAmp_GetExample.avi"); 
 
public void GetExample() 
{ 
   // reference the capture control 
   CaptureCtrl capturectrl = _form.CaptureCtrl; 
 
   try 
   { 
      // select the first device with analog in it's name 
      // Replace "Analog" with your video capture device name 
      if (capturectrl.VideoDevices["Analog"] == null) 
         throw new Exception("No Analog video devices available!"); 
 
      capturectrl.VideoDevices["Analog"].Selected = true; 
 
      // set a video compressor 
      capturectrl.VideoCompressors.Mpeg2.Selected = true; 
 
      // set the target file 
      capturectrl.TargetFile = _outFile; 
 
      // reference the video proc amp  
      VideoProcAmp videoprocamp = capturectrl.VideoProcAmp; 
 
      if (videoprocamp != null) 
      { 
         // set the auto brightness property  
         videoprocamp.AutoBrightness = true; 
 
         // set to black and white 
         videoprocamp.ColorEnable = false; 
 
         // enable backlight compensation, if available 
         videoprocamp.BacklightCompensation = true; 
      } 
 
      // check for video capture available 
      if (capturectrl.IsModeAvailable(CaptureMode.Video)) 
      { 
         // capture 15 seconds of video 
         capturectrl.UseTimeLimit = true; 
         capturectrl.TimeLimit = 15; 
 
         // subscribe to the compete event 
         capturectrl.Complete += new EventHandler(CaptureCtrl_Complete); 
         // start the capture 
         capturectrl.StartCapture(CaptureMode.Video); 
      } 
   } 
   catch (Exception) 
   { 
      _result = false; 
   } 
 
   // we'll loop on the state and pump messages for this example. 
   // but you should not need to if running from a Windows Forms application. 
   while (capturectrl.State == CaptureState.Running) 
      Application.DoEvents(); 
} 
 
void CaptureCtrl_Complete(object sender, EventArgs e) 
{ 
   // set the result to what we expect 
   _result = File.Exists(_outFile); 
} 
 
static class LEAD_VARS 
{ 
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media"; 
} 
Imports Leadtools 
Imports Leadtools.Multimedia 
Imports LeadtoolsMultimediaExamples.Fixtures 
 
Public _result As Boolean = False 
Public _form As CaptureCtrlForm = New CaptureCtrlForm() 
Public _outFile As String = Path.Combine(LEAD_VARS.MediaDir, "VideoProcAmp_GetExample.avi") 
 
Public Sub GetExample() 
   ' reference the capture control 
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl 
 
   Try 
      ' select the first device with analog in it's name 
      ' Replace "Analog" with your video capture device name 
      If capturectrl.VideoDevices("Analog") Is Nothing Then 
         Throw New Exception("No Analog video devices available!") 
      End If 
 
      capturectrl.VideoDevices("Analog").Selected = True 
 
      ' set a video compressor 
      capturectrl.VideoCompressors.Mpeg2.Selected = True 
 
      ' set the target file 
      capturectrl.TargetFile = _outFile 
 
      ' reference the video proc amp  
      Dim videoprocamp As VideoProcAmp = capturectrl.VideoProcAmp 
 
      If Not videoprocamp Is Nothing Then 
         ' set the auto brightness property  
         videoprocamp.AutoBrightness = True 
 
         ' set to black and white 
         videoprocamp.ColorEnable = False 
 
         ' enable backlight compensation, if available 
         videoprocamp.BacklightCompensation = True 
      End If 
 
      ' check for video capture available 
      If capturectrl.IsModeAvailable(CaptureMode.Video) Then 
         ' capture 15 seconds of video 
         capturectrl.UseTimeLimit = True 
         capturectrl.TimeLimit = 15 
 
         ' subscribe to the compete event 
         AddHandler capturectrl.Complete, AddressOf CaptureCtrl_Complete 
         ' start the capture 
         capturectrl.StartCapture(CaptureMode.Video) 
      End If 
   Catch e1 As Exception 
      _result = False 
   End Try 
 
   ' we'll loop on the state and pump messages for this example. 
   ' but you should not need to if running from a Windows Forms application. 
   Do While capturectrl.State = CaptureState.Running 
      Application.DoEvents() 
   Loop 
End Sub 
 
Private Sub CaptureCtrl_Complete(ByVal sender As Object, ByVal e As EventArgs) 
   ' set the result to what we expect 
   _result = File.Exists(_outFile) 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media" 
End Class 

Requirements

Target Platforms

Help Version 20.0.2020.4.2
Products | Support | Contact Us | Intellectual Property Notices
© 1991-2020 LEAD Technologies, Inc. All Rights Reserved.

Leadtools.Multimedia Assembly