StreamsRemove Method (IMStreams)

VB.Net
C#
Delphi
C++

Sub StreamsRemove( _
   ByVal _pStream As MItem, _
   ByVal _dblTimeForChange As Double _
)

void StreamsRemove( 
   MItem _pStream,
   double _dblTimeForChange
)

procedure StreamsRemove( 
    _pStream: MItem;
    _dblTimeForChange: Double
);

void StreamsRemove( 
   MItem* _pStream,
   double _dblTimeForChange
)

Parameters

_pStream: stream object
_dblTimeForChange: time interval for changes in seconds

Here is example of how to remove all streams from mixer:

Visual Basic
C#
Delphi

'initialize a mixer
Dim m_objMixer As New MMixerClass()
m_objMixer.ObjectStart(Nothing)
m_objMixer.FilePlayStart()
'add streams to the mixer
Dim pItem As MItem
m_objMixer.StreamsAdd("", Nothing, "C:\myFile.wmv", "", pItem, 1.0)
m_objMixer.StreamsAdd("", Nothing, "C:\myFile1.wmv", "", pItem, 1.0)
m_objMixer.StreamsAdd("", Nothing, "C:\myFile2.wmv", "", pItem, 1.0)
'remove all files
Dim nFiles As Integer = 0
m_objMixer.StreamsGetCount(nFiles)
For i As Integer = 0 To nFiles - 1
Dim myItem As MItem
Dim strStreamID As String
m_objMixer.StreamsGetByIndex(i, strStreamID, myItem)
myMixer.StreamsRemove(myItem, 2.0);
Next

//initialize a mixer
MMixerClass m_objMixer = new MMixerClass();
m_objMixer.ObjectStart(null);
m_objMixer.FilePlayStart();
//add streams to the mixer
MItem pItem;
m_objMixer.StreamsAdd("", null, @"C:\myFile.wmv", "", out pItem, 1.00);
m_objMixer.StreamsAdd("", null, @"C:\myFile1.wmv", "", out pItem, 1.00);
m_objMixer.StreamsAdd("", null, @"C:\myFile2.wmv", "", out pItem, 1.00);
//remove all files
int nFiles = 0;
m_objMixer.StreamsGetCount(out nFiles);
for (int i = 0; i < nFiles; i++)
{
MItem myItem;
string strStreamID;
m_objMixer.StreamsGetByIndex(i, out strStreamID, out myItem);
myMixer.StreamsRemove(myItem, 2.0);
}

var
myItem: MItem;
myMixer: MMixer;
myFile: IMfile;
myObject: IMObject;
myStreams: IMstreams;
i, nCount: integer;
myStreamID: widestring;
begin
//initialize a mixer
myMixer:= CreateComObject(CLASS_MMixer) as MMixer;
myStreams:= myMixer as IMStreams;
myFile:= myMixer as IMFile;
myObject:= myMixer as IMobject;
myObject.ObjectStart(nil);
myFile.FilePlayStart();
//add stream to the mixer
myStreams.StreamsAdd('', nil, 'C:\myFile.wmv', '', myItem, 2.0);
myStreams.StreamsAdd('', nil, 'C:\myFile1.wmv', '', myItem, 2.0);
myStreams.StreamsAdd('', nil, 'C:\myFile2.wmv', '', myItem, 2.0);
myStreams.StreamsGetCount(nCount);
for i:=0 to nCount-1 do
begin
myStreams.StreamsGetByIndex(1, myStreamID, myItem);
myStreams.StreamsRemove(myItem, 2.0);
end;
end;

Reference

IMStreams Interface
IMStreams Members