Bom galera é o seguinte, eu fiz uma aplicação que pega 10 frames por segundo, e salva todos eles( em uma pasta, ou banco de dados) temporariamente.
Por enquanto, estou testando então estou usando o metodo de colocar em uma pasta, então eu gostaria de saber o seguinte, tem como eu pegar e fazer por exemplo:
picturebox1.image = imageanimator("c:/pastaComImagens")
picturebox1.image.save("teste.gif")
eu sei que este comando não funciona, mas da uma ideia do que eu quero fazer.
o codigo ate o momento e este:
Public Class Form1
Dim frames As Int64
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Timer1.Enabled = True
End Sub
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
frames = 0
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Try
SendKeys.SendWait("{prtsc}")
Clipboard.GetImage.Save("c:/users/usuario/Desktop/teste/imagem" & frames & ".jpg")
frames = frames + 1
Catch ex As Exception
End Try
End Sub
End Class
Ai quando eu clico no botao Mostrar video, ele pega essas imagens 1 por 1 e coloca na picturebox(10 por segundo) e fica como um video.
Mas eu quero que a aplicação salve todas as imagens como uma só, pode ser em .gif ou outro formato de video.
VLW
