|
SetVideoVolume (DVR version only)
|
|
| Value [out,retval]
|
| The volume to be set, in percent.
|
| S_OK
|
| Success
|
| E_FAIL
|
| Failure.
|
| Private Sub Form_Load()
|
| HScroll1.Min=0
|
| HScroll1.Max=100
|
| ActiveDcam1.OpenVideo "C:\\video1.avi", True
|
| HScroll.Value=ActiveDcam1.GetVideoVolume
|
| ActiveDcam1.PlayVideo
|
| End Sub
|
|
|
| Private Sub HScroll1_Scroll()
|
| ActiveDcam1.SetVideoVolume HScroll1.Value
|
| End Sub
|
|
|