Как подключить несколько камер

Question

Я пытаюсь подключить несколько веб-камер одновременно, но появляется диалоговое окно "Источник видео" для выбора веб-камеры. Есть ли способ обойти это? Могу ли я передать информацию веб-камеры явно?

Вот код, который вызывает проблему

Dim infoReturn As VariantType
infoReturn = SendMessage(hHwnd, WM_CAP_DRIVER_CONNECT, iDevice, 0)
If SendMessage(hHwnd, WM_CAP_DRIVER_CONNECT, iDevice, 0) Then
  'Set the preview scale
  Call SendMessage(hHwnd, WM_CAP_SET_SCALE, True, 0)

WM_CAP_DRIVER_CONNECT это сообщение, которое показывает диалог.

любая помощь будет оценена.

Спасибо

Answer 1

Вы посылаете WM_CAP_DRIVER_CONNECT дважды вам не нужно. Это древний API для Windows для Windows, и у вас нет гибкости для переопределения поведения по умолчанию, а также у вас нет поддержки для всего спектра источников видеозахвата с ним.

Возможно, вам лучше обратить внимание на переход на более новые API (DriectShow/Media Foundation).