Error processing SSI file
LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

Show in webframe

RemoveAllHeaderScripts Method






Removes all header scripts.
Syntax
public void RemoveAllHeaderScripts()
'Declaration
 
Public Sub RemoveAllHeaderScripts() 
'Usage
 
Dim instance As WMScript
 
instance.RemoveAllHeaderScripts()
public:
void RemoveAllHeaderScripts(); 
Example
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 19\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 19\Media";
}
Requirements

Target Platforms

See Also

Reference

WMScript Class
WMScript Members

Error processing SSI file
Leadtools.Multimedia requires a Multimedia or Multimedia Suite license and unlock key. For more information, refer to: LEADTOOLS Toolkit Features