MPLATFORMLib Namespace > MWriterClass Class : SendersGetCount Method |
Here is example of how to obtain names of all senders' objects:
Dim senders As New MSendersClass() Dim nCount As Integer senders.SendersGetCount(nCount) Dim vidProps As M_VID_PROPS Dim AudProps As M_AUD_PROPS Dim strName As String For i As Integer = 0 To nCount - 1 senders.SendersGetByIndex(i, strName, vidProps, AudProps) Next
MSendersClass senders = new MSendersClass(); int nCount; senders.SendersGetCount(out nCount); M_VID_PROPS vidProps; M_AUD_PROPS AudProps; string strName; for (int i = 0; i < nCount; i++) { senders.SendersGetByIndex(i, out strName, out vidProps, out AudProps); }
var myName: string; mySenders: MSenders; myVid: M_VID_PROPS; myAud: M_AUD_PROPS; i, nCount: integer; begin mySenders:= CreateComObject(CLASS_MSenders) as MSenders; mySenders.SendersGetCount(nCount); for i:=0 to nCount-1 do mySenders.SendersGetByIndex(1, myName, myVid, myAud); end;