IWMEncEditDecisionData.Add

Windows Media Encoder SDK banner art

The Add method adds a name-value attribute to an EDL entry.

Syntax

IWMEncEditDecisionData.Add(strName, varValue)

Parameters

strName

[in]  String containing the attribute name (see the following table).

varValue

[in]  Variant containing the attribute value (see the following table).

Return Values

This method does not return a value.

Remarks

Use the WMEncEditDecisionList.Add method to create a new EDL entry, and then use this Add method to add the following attributes for an EDL entry.

strName varValue Description
MarkIn Long Indicates the beginning of a segment to encode. This attribute is required.
MarkOut Long Indicates the end of a segment to encode. This attribute is required.
TapeID String Identifies the video tape. Use this attribute when you encode from multiple video tapes.
Description String Describes the EDL entry.

Time for mark-in and mark-out values must be specified using the following formula:
TimeValue = ( ( ( ( hours * 60 ) + minutes ) * 60 + seconds ) * 1000 + milliseconds) * 10000

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

' Add attributes to the EDL entry specifying mark-in, mark-out,
' tape ID, and description information.
  EDData.Add "MarkIn", 262695
  EDData.Add "MarkOut", 267268
  EDData.Add "TapeID", "A"
  EDData.Add "Description", "Scene 1"

' Add another EDL entry.
  Set EDData = EDList.Add
  EDData.Add "MarkIn", 362695
  EDData.Add "MarkOut", 367268
  EDData.Add "TapeID", "B"
  EDData.Add "Description", "Scene 2"
  

Requirements

Reference: Windows Media Encoder

Library: wmenc.exe

See Also