Dim myMixer As New MMixerClass()
myMixer.ScenesActiveGet(mySceneID, myIndex, myScene)
Dim pChild As MElement
myScene.ElementsAdd("newElem", "video", "stream_idx=0 h=0.5 w=0.5 show=1", pChild, 2.0)
myScene.ElementsGetByID("newElem", myElement)
MMixerClass myMixer = new MMixerClass();
myMixer.ScenesActiveGet(out mySceneID, out myIndex, out myScene);
MElement pChild;
myScene.ElementsAdd("newElem", "video", "stream_idx=0 h=0.5 w=0.5 show=1", out pChild, 2.0);
myScene.ElementsGetByID("newElem", out myElement);
var
myMixer: MMixer;
myScenes: IMScenes;
myScene: IMElements;
mySceneID: string;
myIndex: integer;
myElement: MElement;
begin
myMixer:= CreateComObject(CLASS_MMixer) as MMixer;
myScenes := myMixer as IMScenes;
myScenes.ScenesActiveGet(mySceneID, myIndex, myScene);
myScene.ElementsAdd('newElem', 'video', tream_idx=0 h=0.5 w=0.5 show=1', myElement, 2.0);
myScene.ElementsGetByID('newElem', myElement);
end;