Gambas ONE

Your the man Vuott. Works like a charm!

Here comes a sample code: Private myPlayer As New MediaPlayer As "Player" '============================================================================= Public Sub Form_Open() '--- Opens a mediaplayer window with live video stream --- myPlayer.URL = "v4l2:///dev/video0" myPlayer.Play() ' --- Make th...

Thank's a lot vuott. It worked to use paint directly on theImage. Dim theImage As Image = myPlayer.Video.Image theImage.Save(Application.Path &/ Format(Now, "yyyymmdd_hhnnss") & ".jpg" ThePictureBox.Image = theImage Paint.Begin(theImage) Paint.LineWidth = 1 Paint.Rectangle(10, 10, 100, 100) Paint.St...

I have a videofeed from a usb-microscope in a picturebox using mediaplayer. Works great (code copied from Cedron) Private myPlayer As New MediaPlayer As "Player" '============================================================================= Public Sub Form_Open() myPlayer.URL = "v4l2:///dev/video0" ...