Coordination Screenshot

[mamrom]

The following code takes a picture automatically when you click the button

   Public Class Form1
    Private Sub ConstructFromResourceSaveAsGif(ByVal e As PaintEventArgs)

    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim bounds As Rectangle
        Dim screenshot As System.Drawing.Bitmap
        Dim graph As Graphics
        bounds = Screen.PrimaryScreen.Bounds
        screenshot = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
        graph = Graphics.FromImage(screenshot)
        graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)        PictureBox1.Image = screenshot


    End Sub

End Class

The next part is responsible for Coordination image (where to where this photograph) So I want to take the Coordination from Form2, how I can do this?

graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)

[jmcilhinney]

I think you mean "coordinates" rather than "coordination". If so then you need to use the Bounds property of Form2 rather than of Screen.PrimaryScreen.

[mamrom]

yes,like hare in the video:
http://www.youtube.com/watch?v=SLJiSG5aQ3g
(5:20 - 5:50 mins)

u can give me example?

[mamrom]

Help..

[jmcilhinney]

I already told you what you need to do: use the Bounds property of the form. What exactly is the problem?

[mamrom]

want to do it in Form2, you can give me an example code?

[jmcilhinney]

You've already got example code. You posted it yourself. You just need to change it as I have already suggested.

use the Bounds property of Form2 rather than of Screen.PrimaryScreen

[mamrom]

I do not understand, what is the code?

graph.CopyFromScreen(form2.X, form2.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)

?

[Skatebone]

Did you write that code yourself? If so you should understand what jm means.

Here he means something like this I think but I didnt read your case.

        Dim bounds As Rectangle = Form2.Bounds
        Dim screenshot As System.Drawing.Bitmap = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
        Dim Graph As Graphics= Graphics.FromImage(screenshot)
        Graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)
	PictureBox1.Image = screenshot

[mamrom]

Did you write that code yourself? If so you should understand what jm means.

Here he means something like this I think but I didnt read your case.

        Dim bounds As Rectangle = Form2.Bounds
        Dim screenshot As System.Drawing.Bitmap = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
        Dim Graph As Graphics= Graphics.FromImage(screenshot)
        Graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)
	PictureBox1.Image = screenshot

Thanks but that's not accurate, it takes all the screen and not just the part I want (I want mark it with Form2 course)

[mamrom]

up..

[jmcilhinney]

You need to use the Bounds of the form you want. That code is using the default instance of Form2 to get the Bounds. Is it the default instance that you displayed in the first place? If you don;t know what a default instance is, follow the Blog link in my signature and read my post on the subject.

[mamrom]

I do not see, you can give me a link?

[jmcilhinney]

I already have.

the Blog link in my signature

[mamrom]

v. thx...