Hi Guys,
I'm trying to overlay an image on a video stream. How can i resize and position my image on the video? So far, here is my code:
Code:Private Sub CAPTURE(ByVal sender As Object, ByVal eventArgs As NewFrameEventArgs) If ButtonVIDEO.BackColor = Color.Black Then 'IF YOU ARE NOT RECORDING ...... BMP = DirectCast(eventArgs.Frame.Clone(), Bitmap) 'PUT THE DATA IN THE BITMAP PictureBox1.Image = DirectCast(eventArgs.Frame.Clone(), Bitmap) 'PRESENTS THEM AT THE PICTURE BOX Dim imagePath As String = "C:\Users\Public\Pictures\Sample Pictures\Penguins.jpg" PictureBox1.Image = Image.FromFile(imagePath) Else 'IF YOU ARE RECORDING ... BMP = DirectCast(eventArgs.Frame.Clone(), Bitmap) 'PUT THE DATA IN THE BITMAP PictureBox1.Image = DirectCast(eventArgs.Frame.Clone(), Bitmap) 'PRESENTS THEM AT THE PICTURE BOX ESCRITOR.WriteVideoFrame(PictureBox1.Image) 'KEEP THEM IN THE MEMORY End If End Sub




Reply With Quote
