[alsalamoni]

(04-03-20, 01:26 PM)nasro.betz كتب : السلام عليكم
استخدم حاليا webcam لالتقاط صور ثم حفظها في الكمبيوتر ولكني لدي داتاقريد أود اظهار الصور الملتقطة فيها بعد الضغط على زر الالتقاط 

i used a webcam to capture pictures and save it to my computer now i would like to show every picture tooked in a column in my DATAGRIDVIEW i added a new column to my datagrid, but i did not find a way to show them i want when i click capture button == > save it directly in my computer at the same time show it to my datagridview

كود :

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

   DataGridView1.DataSource = vbEmpty
   DataGridView1.Columns.Clear()

   Dim table As New DataTable

   table.Columns.Add("Picture_name", GetType(String))
   table.Columns.Add("Gewicht", GetType(String))
   btnWeiter.Enabled = False

   Dim img As New DataGridViewImageColumn()

   table.Columns.Add("picture")
   img.HeaderText = "picture"
   Img.Name = "img"
End sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

   Try
     PictureBox1.Image = Capture.QueryFrame.ToBitmap()
   Catch ex As Exception
     Capture = New Emgu.CV.Capture
   End Try

 End Sub
 ' start the webcam
 Private Sub startWebcam_Click(sender As Object, e As EventArgs) Handles startWebcam.Click
   Timer1.Start()

 End Sub

 Private pakNum As Integer = 0


 Private Sub captWebcam_Click(sender As Object, e As EventArgs) Handles captWebcam.Click

   Timer1.Stop()

   'Save the picture

   pakNum += 1
   PictureBox1.Image.Save("D:\WEBCAM\Img" & strBarcode & "-" & pakNum.ToString("00") & ".JPEG", Imaging.ImageFormat.Jpeg)
   capture.Dispose()

   startWebcam.Visible = False

   Timer1.Start()
 End Sub

كود :

table.Columns.Add("picture",gettype(byte()))