' This function checks if the Lens effect filter is available
' and turns off the effect area (cropping feature)
‘ Remember to add refernce in VB for the Misc.FX tlb
Private Sub TurnOffLensCropping(Capture As ltmmCaptureCtrl)
Dim Proc As LMVLens
' call the Capture object to retrieve the video processors
Set Proc = Capture.GetSubObjectDispatch (ltmmCapture_Object_SelVideoProcessor)
If Not Proc Then
Proc.EffectAreaEnabled = False
End If
End Sub