WMEncEditDecisionList.Count

  • Article
Windows Media Encoder SDK banner art

The Count property retrieves the number of entries in the current EDL.

Syntax

Long = WMEncEditDecisionList.Count

Parameters

This property takes no parameters.

Property Value

A Long that indicates the number of entries.

Remarks

This property is read-only.

To control digital devices programmatically, you must add the Windows Media Encoder Device Control reference to the project. For more information, see Programming in Visual Basic.

Example Code

' Create a WMEncoder object.
  Dim Encoder As WMEncoder
  Set Encoder = New WMEncoder

' Add the device as the audio source and the video source.
  Dim SrcGrpColl As IWMEncSourceGroupCollection
  Dim SrcGrp As IWMEncSourceGroup2
  Dim SrcAud As IWMEncSource
  Dim SrcVid As IWMEncVideoSource
  Set SrcGrpColl = Encoder.SourceGroupCollection
  Set SrcGrp = SrcGrpColl.Add("SG_1")
  Set SrcAud = SrcGrp.AddSource(WMENC_AUDIO)
  Set SrcVid = SrcGrp.AddSource(WMENC_VIDEO)
  ' Replace the following name with the name of your device.
  SrcAud.SetInput ("Device://Device resource name")
  SrcVid.SetInput ("Device://Device resource name")

' Configure the output and profile.

' Retrieve the device control collection, then add a device to it.
  Dim DCColl As IWMEncDeviceControlCollection
  Set DCColl = SrcGrp.DeviceControlCollection
  Dim DControl As IWMEncDeviceControl
  Set DControl = DCColl.Add
  ' Replace the following name with the name of your device.
  DControl.SetInput ("DeviceControl://Device resource name")

' Initialize the encoding session.
  Encoder.PrepareToEncode True

' Get the plug-in from the device.
  Dim DCPlugin As IWMEncDeviceControlPlugin
  Set DCPlugin = DControl.GetDeviceControlPlugin

' Retrieve a WMEncEditDecisionList object from the device
' control plug-in.
  Dim EDList As WMEncEditDecisionList
  Set EDList = DCPlugin.EditDecisionList

' Create an EDL entry.
  Dim EDData As IWMEncEditDecisionData
  Set EDData = EDList.Add

' Retrieve the number of entries in the EDL.
  Dim lCount As Long
  lCount = EDList.Count

Requirements

Reference: Windows Media Encoder

Library: wmenc.exe

See Also