' This function will change the small resolution
' into the second highest resolution
Private Sub SetupDV(Capture As ltmmCaptureCtrl)
Dim res As ltmmDVResolution
res = Capture.DVDecoderResolution
If res = ltmmDVResolution_DC Then
Capture.DVDecoderResolution = ltmmDVResolution_Quarter
ElseIf res = ltmmDVResolution_Quarter Then
Capture.DVDecoderResolution = ltmmDVResolution_Half
ElseIf res = ltmmDVResolution_Half Then
Capture.DVDecoderResolution = ltmmDVResolution_Full
End If
End Sub