Imports Leadtools
Imports Leadtools.MediaStreaming
Public _server As Server = Nothing
Public _result As Boolean = False
Public Sub CopyToExample()
Try
' create an instance of the server object
_server = New Leadtools.MediaStreaming.Server()
' retrieve a copy of the Live Streams
Dim Streams As LiveStreams = _server.GetLiveStreams()
' create live stream just to demonstrate using audio types index of
Dim stream As LiveStream = Streams.CreateLiveStream()
'Get the Audio Types
Dim AudioTypes As AudioTypes = stream.AudioTypes
' allocate a new array for the copied AudioTypes
Dim copiedAudioTypes As AudioType() = New AudioType(AudioTypes.Count - 1) {}
' copy them
AudioTypes.CopyTo(copiedAudioTypes, 0)
' set the result to what we expect
_result = (copiedAudioTypes.Length = AudioTypes.Count)
Catch e1 As Exception
_result = False
End Try
End Sub
using Leadtools;
using Leadtools.MediaStreaming;
public Server _server = null;
public bool _result = false;
public void CopyToExample()
{
try
{
// create an instance of the server object
_server = new Leadtools.MediaStreaming.Server();
// retrieve a copy of the Live Streams
LiveStreams Streams = _server.GetLiveStreams();
// create live stream just to demonstrate using audio types CopyTo
LiveStream stream = Streams.CreateLiveStream();
//Get the Audio Types
AudioTypes AudioTypes = stream.AudioTypes;
// allocate a new array for the copied AudioTypes
AudioType[] copiedAudioTypes = new AudioType[AudioTypes.Count];
// copy them
AudioTypes.CopyTo(copiedAudioTypes, 0);
// set the result to what we expect
_result = (copiedAudioTypes.Length == AudioTypes.Count);
}
catch (Exception)
{
_result = false;
}
}