EnableScriptStream Property

Gets or sets a boolean value that represents whether the script stream is enabled.

Syntax

Visual Basic
C#
WinRT C#
WinRT JavaScript
C++

public bool EnableScriptStream {get; set;}

'Declaration
 
Public Property EnableScriptStream As Boolean

'Usage
 
Dim instance As WMScript
Dim value As Boolean
 
instance.EnableScriptStream = value
 
value = instance.EnableScriptStream

public bool EnableScriptStream {get; set;}

 get_EnableScriptStream();
 set_EnableScriptStream(value);

public:
property bool EnableScriptStream {
   bool get();
   void set (    bool value);
}

Property Value

A boolean value that represents whether the script stream is enabled.

Example

Visual Basic
C#
WinRT C#
WinRT JavaScript
Silverlight C#
Silverlight VB

Copy Code

Public _result As Boolean = False
      Public _form As New CaptureCtrlForm()
      Public _startTime As DateTime
      Private _capturectrl As CaptureCtrl
      Private _mux As WMScript
      Public Sub WriteScriptStreamExample()
         _capturectrl = _form.CaptureCtrl

         ' reference the capture control
         Dim outFile As String = Path.Combine(LEAD_VARS.MediaDir, "WriteScriptStream_Dest.wmv")

         Try
            _capturectrl.TargetFormat = TargetFormatType.WMVMux
            _capturectrl.TargetFile = outFile

            ' set an audio device, use the name of your device here
            If _capturectrl.VideoDevices("Logitech") Is Nothing Then
               Throw New Exception("No USB audio device available")
            End If

            _capturectrl.VideoDevices("Logitech").Selected = True

            If _capturectrl.IsModeAvailable(CaptureMode.Video) Then

               _capturectrl.FrameDelay = 0.033 ' 30 frames per second

               _capturectrl.TimeLimit = 10 ' just 10 seconds of capture time
               _capturectrl.UseTimeLimit = True

               ' call ReadyCapture, so the target object is added
               _capturectrl.ReadyCapture(CaptureMode.Video Or CaptureMode.InhibitRun)

               ' get the scripter object
               _mux = _capturectrl.WMScripter
               If _mux Is Nothing Then
                  Return
               End If

               ' enable the script stream
               _mux.EnableScriptStream = True

               ' subscribe to the complete event
               AddHandler _capturectrl.Complete, AddressOf CaptureCtrl_Complete

               ' subscribe to the error abort event
               AddHandler _capturectrl.ErrorAbort, AddressOf CaptureCtrl_ErrorAbort

               ' set the start time
               _startTime = DateTime.Now

               ' set a timer so we can write the Script commands every second
               _form.TestTimer.Interval = 1000
               AddHandler _form.TestTimer.Tick, AddressOf TestTimer_Tick
               _form.TestTimer.Start()

               ' start the capture process
               _capturectrl.StartCapture(CaptureMode.Video)

               ' 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()
               End While
            End If
         Catch generatedExceptionName As Exception
            Return
         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.
         While _capturectrl.State = CaptureState.Running
            Application.DoEvents()
         End While

         _result = True
      End Sub

      Public Sub TestTimer_Tick(ByVal sender As Object, ByVal e As EventArgs)
         ' stop the capture
         Try
            Dim elapsedTime As Double = (DateTime.Now - _startTime).TotalMilliseconds / 1000
            Dim sz As [String] = [String].Format("Sample caption script at {0} seconds", elapsedTime)
            _mux.WriteScriptStream("caption", sz, elapsedTime)
         Catch generatedExceptionName As Exception
            _result = False
            _capturectrl.StopCapture()
         End Try
      End Sub

      Public Sub CaptureCtrl_Complete(ByVal sender As Object, ByVal e As EventArgs)
         ' set result
         _result = True
         ' the capture has finished, don't write scripts anymore
         ' Note that since the capture has finished automatically, I don't need to call _mux.CloseScriptStream()
         _form.TestTimer.[Stop]()
      End Sub

      Public Sub CaptureCtrl_ErrorAbort(ByVal sender As Object, ByVal e As ErrorAbortEventArgs)
         ' set result
         _result = False
         ' the capture has finished, don't write scripts anymore
         ' Note that since the capture has finished automatically, I don't need to call _mux.CloseScriptStream()
         _form.TestTimer.[Stop]()
      End Sub

Public NotInheritable Class LEAD_VARS
   Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 175\Media";
End Class

public bool _result = false;
      public CaptureCtrlForm _form = new CaptureCtrlForm();
      public DateTime _startTime;
      CaptureCtrl _capturectrl;
      WMScript _mux;
      public void WriteScriptStreamExample()
      {
         _capturectrl = _form.CaptureCtrl;

         // reference the capture control
         string outFile = Path.Combine(LEAD_VARS.MediaDir,"WriteScriptStream_Dest.wmv");

         try
         {
            _capturectrl.TargetFormat = TargetFormatType.WMVMux;
            _capturectrl.TargetFile = outFile;

            // set an audio device, use the name of your device here
            if(_capturectrl.VideoDevices["Logitech"] == null)
               throw new Exception("No USB audio device available");

            _capturectrl.VideoDevices["Logitech"].Selected = true;

            if (_capturectrl.IsModeAvailable(CaptureMode.Video))
            {
               _capturectrl.FrameDelay = .033;  // 30 frames per second
               _capturectrl.TimeLimit = 10;     // just 10 seconds of capture time
               _capturectrl.UseTimeLimit = true;

               // call ReadyCapture, so the target object is added
               _capturectrl.ReadyCapture(CaptureMode.Video | CaptureMode.InhibitRun);

               // get the scripter object
               _mux = _capturectrl.WMScripter;
               if(_mux == null)
                  return;

               // enable the script stream
               _mux.EnableScriptStream = true;

               // subscribe to the complete event
               _capturectrl.Complete += new EventHandler(CaptureCtrl_Complete);

               // subscribe to the error abort event
               _capturectrl.ErrorAbort += new ErrorAbortEventHandler(CaptureCtrl_ErrorAbort);

               // set the start time
               _startTime = DateTime.Now;

               // set a timer so we can write the Script commands every second
               _form.TestTimer.Interval = 1000;
               _form.TestTimer.Tick += new EventHandler(TestTimer_Tick);
               _form.TestTimer.Start();

               // start the capture process
               _capturectrl.StartCapture(CaptureMode.Video);

               // 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();
            }
         }
         catch (Exception)
         {
            return;
         }

         // 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();

         _result = true;
      }

      public void TestTimer_Tick(object sender, EventArgs e)
      {
         // stop the capture
         try
         {
            double elapsedTime = (DateTime.Now - _startTime).TotalMilliseconds / 1000;
            String sz = String.Format("Sample caption script at {0} seconds", elapsedTime);
            _mux.WriteScriptStream("caption", sz, elapsedTime);
         }
         catch(Exception)
         {
            _result = false;
            _capturectrl.StopCapture();
         }
      }

      public void CaptureCtrl_Complete(object sender, EventArgs e)
      {
         // set result
         _result = true;
         // the capture has finished, do not write scripts anymore
         // Note that since the capture has finished automatically, I do not need to call _mux.CloseScriptStream()
         _form.TestTimer.Stop();
      }

      public void CaptureCtrl_ErrorAbort(object sender, ErrorAbortEventArgs e)
      {
         // set result
         _result = false;
         // the capture has finished, do not write scripts anymore
         // Note that since the capture has finished automatically, I do not need to call _mux.CloseScriptStream()
         _form.TestTimer.Stop();
      }

static class LEAD_VARS
{
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 175\Media";
}

Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

Reference

WMScript Class
WMScript Members