RemoveAllHeaderScripts Method

Visual Basic
C#
C++/CLI

'Declaration
 
Public Sub RemoveAllHeaderScripts()

'Usage
 
Dim instance As WMScript
 
instance.RemoveAllHeaderScripts()

public void RemoveAllHeaderScripts()

public:
void RemoveAllHeaderScripts();

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

Copy Code

Imports Leadtools
Imports Leadtools.Multimedia
Imports LeadtoolsMultimediaExamples.Fixtures

Public _result As Boolean = False
Public _form As New ConvertCtrlForm()
Public Sub AddHeaderScriptExample()
   Dim convertctrl As ConvertCtrl = _form.ConvertCtrl
   Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source.avi")
   Dim outFile As String = Path.Combine(LEAD_VARS.MediaDir, "WMScript_AddHeaderScriptExample.wmv")

   Try
      convertctrl.TargetFormat = TargetFormatType.WMVMux
      convertctrl.SourceFile = inFile
      convertctrl.TargetFile = outFile
      Dim mux As WMScript = convertctrl.WMScripter
      If mux Is Nothing Then
         _result = False
         Return
      End If

      mux.EnableScriptStream = False
      mux.RemoveAllHeaderScripts()

      WriteScript(convertctrl, mux)

      ' run the convert
      convertctrl.StartConvert()
   Catch generatedExceptionName As Exception
      _result = False
      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 convertctrl.State = ConvertState.Running
      Application.DoEvents()
   End While

   ' set the result
   _result = True
End Sub

Public Sub WriteScript(ByVal convertctrl As ConvertCtrl, ByVal mux As WMScript)
   Dim duration As Double = convertctrl.Duration

   Dim t As Double = 0.0
   While t < duration
      Dim sz As [String] = [String].Format("Sample caption script at {0} seconds", t)
      mux.AddHeaderScript("caption", sz, t)
      t += 1.0
   End While
End Sub

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

using Leadtools;
using Leadtools.Multimedia;
using LeadtoolsMultimediaExamples.Fixtures;

public bool _result = false;
public ConvertCtrlForm _form = new ConvertCtrlForm();
public void AddHeaderScriptExample()
{
   ConvertCtrl convertctrl = _form.ConvertCtrl;
   string inFile = Path.Combine(LEAD_VARS.MediaDir,"ConvertCtrl_Source.avi");
   string outFile = Path.Combine(LEAD_VARS.MediaDir,"WMScript_AddHeaderScriptExample.wmv");

   try
   {
      convertctrl.TargetFormat = TargetFormatType.WMVMux;
      convertctrl.SourceFile = inFile;
      convertctrl.TargetFile = outFile;
      WMScript mux = convertctrl.WMScripter;
      if(mux == null)
      {
         _result = false;
         return;
      }

      mux.EnableScriptStream = false;
      mux.RemoveAllHeaderScripts();

      WriteScript(convertctrl, mux);

      // run the convert
      convertctrl.StartConvert();
   }
   catch (Exception)
   {
      _result = false;
      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 (convertctrl.State == ConvertState.Running)
       Application.DoEvents();

   // set the result
   _result = true;
}

public void WriteScript(ConvertCtrl convertctrl, WMScript mux)
{
   double duration = convertctrl.Duration;

   for(double t = 0.0; t < duration; t += 1.0)
   {
      String sz = String.Format("Sample caption script at {0} seconds", t);
      mux.AddHeaderScript("caption", sz, t);
   }
}

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

Target Platforms

Reference

WMScript Class
WMScript Members