MPLATFORMLib Namespace > IMScenes Interface : ScenesActiveGet Method |
Sub ScenesActiveGet( _ ByRef _pbsSceneID As String, _ ByRef _pnIndex As Integer, _ ByRef _ppScene As IMElements _ )
void ScenesActiveGet( out string _pbsSceneID, out int _pnIndex, out IMElements _ppScene )
procedure ScenesActiveGet( Out _pbsSceneID: String; Out _pnIndex: Integer; Out _ppScene: IMElements );
void ScenesActiveGet( [PARAMFLAG::Out] BSTR* _pbsSceneID, [PARAMFLAG::Out] int _pnIndex, [PARAMFLAG::Out] IMElements* _ppScene )
Here is example of how to get active mixer scene:
'initialize mixer Dim myMixer As MMixeerClass = New MMixerClass() myMixer.ObjectStart(Nothing) Dim mySceneID As String Dim myIndex As Integer Dim myScene As IMElements myMixer.ScenesActiveGet(mySceneID, myIndex, myScene)
//initialize mixer MMixeerClass myMixer = new MMixerClass(); myMixer.ObjectStart(null); string mySceneID; int myIndex; IMElements myScene; myMixer.ScenesActiveGet(out mySceneID, out myIndex, out myScene);
var myMixer: MMixer; myScenes: IMScenes; myObject: IMObject; myScene: IMElements; mySceneID: widestring; myIndex: integer; begin myMixer:= CreateComObject(CLASS_MMixer) as MMixer; myObject:= myMixer as IMObject; myObject.ObjectStart(); myScenes := myMixer as IMScenes; myScenes.ScenesActiveGet(mySceneID, myIndex, myScene); end;