Hello everyone,
I have a program that automatically print screen every second an save the image using a timer. Its working well, my problem is that its eating may disk space 1 file = 120KB. Is there a way to do this which will not require much disk space... maybe a video, gif anything.
Please help.. Thanks in advance
REVISION
I use this function to get the desktop image (found this on the Internet)
Private Function CaptureScreen(ByVal locX As Integer, ByVal locY As Integer, ByVal width As Integer, ByVal height As Integer) As Bitmap
Dim NewImage As New Bitmap(width, height)
Dim g As Graphics = Graphics.FromImage(NewImage)
g.CopyFromScreen(locX, locY, 0, 0, NewImage.Size)
Return NewImage
End Function
In my Timer (1000 second interval)
If Not IO.Directory.Exists("C:\Folder\") Then IO.Directory.CreateDirectory("C:\Folder\")
Dim bit As Bitmap = CaptureScreen(0, 0, Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.Bounds.Height)
bit.Save("C:\Folder\" & Format(Now, "yyyyMMdd hhmmss") & ".jpg", Imaging.ImageFormat.Jpeg)