In my project I should set RVCamera.VideoDeviceIndex and call RVCamera.SetCamVideoMode() just before RVCamera.PlayVideoStream.
The issue is that if I pass 0 to RVCamera.SetCamVideoMode() then video is not shown (and RVCameraGetImage() is not being called). If I pass any other value (> 0) then everything is ok.
This issue appeared in version 7. In version 6 there was no such a problem.
You can reproduce the issue by adding two lines in procedure TfrmMain.btnOnClick of the demo project "WebCamera":
Code: Select all
procedure TfrmMain.btnOnClick(Sender: TObject); begin RVCamera1.VideoDeviceIndex := cmbCamera.ItemIndex; RVCamera1.SetCamVideoMode(cmbVideoResolution.ItemIndex); RVCamera1.PlayVideoStream; end;