Захват двух камер одновременно с использованием библиотеки AForge и библиотеки VB.NET

Мне нужно обработать две USB-камеры с помощью VB.NET. Я использовал библиотеку AForge для этого. Проблема в том, что запускается только обработчик события camera2.

Как я могу активировать обе камеры?

Dim camera1
Dim camera2

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    Dim Cameras = New FilterInfoCollection(FilterCategory.VideoInputDevice)
    Dim camera1 = New VideoCaptureDevice(Cameras(0).MonikerString)
    Dim camera2 = New VideoCaptureDevice(Cameras(1).MonikerString)

    AddHandler camera1.NewFrame, AddressOf NewFrameHandler1
    AddHandler camera2.NewFrame, AddressOf NewFrameHandler2

    camera1.Start()
    camera2.Start()

End Sub

Private Sub NewFrameHandler1(sender As Object, eventArgs As NewFrameEventArgs)
    Console.WriteLine("Camera 1 captured")
End Sub

Private Sub NewFrameHandler2(sender As Object, eventArgs As NewFrameEventArgs)
    Console.WriteLine("Camera 2 captured")
End Sub

1 ответ

Я знаю, что поздно отвечать, но, возможно, это поможет кому-то, я столкнулся с той же проблемой, в моем случае я использовал концентратор USB для подключения нескольких USB-камер, я исправил эту проблему, поместив USB-камеры в два разных USB-устройства порты системы и все работает. Еще одна проблема, которую я обнаружил во время этого, - когда я добавляю 3 USB-камеры, камера с индексом 0 не работает.

Другие вопросы по тегам