' This function displays the currently associated WM
' Profile for the specified capture object
Private Sub DisplaySelectedProfileName(Capture As ltmmCaptureCtrl)
Dim CurrentProfile As ltmmWMProfile
Set CurrentProfile = Capture.WMProfile
If Not CurrentProfile Then
MsgBox CurrentProfile.Name + " Is the
currently selected", vbInformation, "Settings"
Else
MsgBox "There are currently no profiles associated with this capture object"
End If
End Sub