MPLATFORMLib Namespace > IMScenes Interface : ScenesActiveSet Method |
Sub ScenesActiveSet( _ ByVal _bsSceneID As String, _ ByVal _bsParameters As String _ )
void ScenesActiveSet( string _bsSceneID, string _bsParameters )
procedure ScenesActiveSet( _bsSceneID: String; _bsParameters: String );
void ScenesActiveSet( BSTR* _bsSceneID, BSTR* _bsParameters )
Here is example of how to add a scene and set this scene as active in your mixer:
'initialize mixer Dim myMixer As MMixeerClass = New MMixerClass() myMixer.ObjectStart(Nothing) Dim pScene As IMElements myMixer.ScenesAdd("copy_active='true'", mySceneID, pScene) myMixer.ScenesActiveSet(mySceneID, "")
//initialize mixer MMixeerClass myMixer = new MMixerClass(); myMixer.ObjectStart(null); IMElements pScene; myMixer.ScenesAdd("copy_active='true'", out mySceneID, out pScene); myMixer.ScenesActiveSet(mySceneID, "");
var myMixer: MMixer; myScenes: IMScenes; myObject: IMObject; myScene: IMElements; mySceneID: widestring; begin myMixer:= CreateComObject(CLASS_MMixer) as MMixer; myObject:= myMixer as IMObject; myObject.ObjectStart(); myScenes := myMixer as IMScenes; myScenes.ScenesAdd('copy_active=true', mySceneID, myScene); myScenes.ScenesActiveSet(mySceneID, ''); end;