Как воспроизвести видео с IP-камеры в режиме с ожиданием

В этом примере показано, как воспроизводить видео с IP-камеры в режиме с ожиданием: компонент ожидает завершения каждой операции. Этот режим проще, но не рекомендуется: приложение зависает на время ожидания.

Пример

1. Поместите RVCamera1:TRVCamera и RVCamView1:TRVCamView на форму. Присвойте RVCamView1.VideoSource = RVCamera1.

2. Если вам нужен отдельный компонент для управления движением камеры, разместите компонент RVCamControl1: TRVCamControl на форме. Присвойте RVCamera1.CameraControl = RVCamControl1.

3. Присвойте компоненту RVCamera1 следующие свойства: адрес камеры, имя пользователя и пароль. Например:

•CameraHost = 'novatron.dyndns.tv',

•CameraPort = 8888

•UserName= 'demo15'

•UserPassword = 'demo15'

•DeviceType = rvdtIPCamera

4. Присвойте RVCamera1.CommandMode = rvsmWait.

5. Добавьте в TForm1.FormCreate:

if RVCamera1.SearchCamera then

RVCamera1.PlayVideoStream;

Примечание: этот пример использует поиск камеры. Если камера имеет тип, специально поддерживаемый компонентом, это даст возможность управлять ей. В простейшем же случае для показа видео достаточно присвоить свойство URL и вызвать метод PlayVideoStream.