Screen shot ![Resolved]

[Pirate]

How can I take a screen shot in VB.NET?

[phrozeman]

PRINTSCREEN

[phrozeman]

Public Function GetScreenCapture( _
   Optional ByVal FullScreen As Boolean = False) As Image
   ' Captures the current screen and returns as an Image
   ' object
   Dim objSK As SendKeys
   Dim imgCapture As Image
   If FullScreen = True Then
       ' Print Screen pressed twice here as some systems
       ' grab active window "accidentally" on first run
       objSK.SendWait("{PRTSC 2}")
   Else
       objSK.SendWait("%{PRTSC}")
   End If
   Dim objData As IDataObject = Clipboard.GetDataObject()
   Return objData.GetData(DataFormats.Bitmap)
End Function
 
'USAGE
GetScreenCapture(True).Save("c:\screengrab.bmp")
PictureBox1.Image = GetScreenCapture()

[Pirate]

What does this symbol mean (%) ???

[Pirate]

It did it !
thanx for your help

[RealNickyDude]

Originally posted by Pirate
How can I take a screen shot in VB.NET?

... or use SnagIt!

[Pirate]

no I just need to include this feature into my proj!

[phrozeman]

Originally posted by Pirate
What does this symbol mean (%) ???

That's used to make an screenshot from the current window... it's the same when u press ALT+PRINTSCREEN

[Pirate]

As I got this , it's like a shortcut key .If so , that would be great because I wanted to create a shortcut key !

[MrPolite]

umm any better way besides pressing the print key?

[Pirate]

shortcut keys !

[Pirate]

I mean hotkeys

[MrPolite]

Originally posted by Pirate
I mean hotkeys

oh hotkeys

[MrPolite]

what about them

[Pirate]

Originally posted by MrPolite
umm any better way besides pressing the print key?

It's another way than Print key

[MrPolite]

Originally posted by Pirate
It's another way than Print key

eeh? my question was is there any way NOT to clear the clipboard by doing this? anyways this is not a proper way of getting a screenshot. I guess there's a way using APIs, I can't remember

[MrPolite]

Originally posted by phrozeman
That's used to make an screenshot from the current window... it's the same when u press ALT+PRINTSCREEN

is there any ENUM that has all the values of the keys? it feels a little awkward this way

[Pirate]

I just like this way .Very easy to use .I got very complicated API code but it's very very complicated .

[MrPolite]

Originally posted by Pirate
I just like this way .Very easy to use .I got very complicated API code but it's very very complicated .

err it's ok, post it

[Pirate]

sorry I can't now .....lol

[hellswraith]

Originally posted by MrPolite
eeh? my question was is there any way NOT to clear the clipboard by doing this? anyways this is not a proper way of getting a screenshot. I guess there's a way using APIs, I can't remember

Sure, you save the clipboard contents to a variable first, then get the screenshot, then bring it into another bitmap variable. Now just restore the old content back to the clipboard, it happens so quick that it is like it never happened.

[Pirate]

Originally posted by hellswraith
Sure, you save the clipboard contents to a variable first, then get the screenshot, then bring it into another bitmap variable. Now just restore the old content back to the clipboard, it happens so quick that it is like it never happened.

Storing it to Clipboard , makes some delay .I will try your way now .

[Pirate]

hellswraith , How can I save the screen shot directly to bitmap ??Is this possible ?

[EyeTalion]

this saves the image to my clipboard...how do I print?

Public Function GetScreenCapture( _
   Optional ByVal FullScreen As Boolean = False) As Image
   ' Captures the current screen and returns as an Image
   ' object
   Dim objSK As SendKeys
   Dim imgCapture As Image
   If FullScreen = True Then
       ' Print Screen pressed twice here as some systems
       ' grab active window "accidentally" on first run
       objSK.SendWait("{PRTSC 2}")
   Else
       objSK.SendWait("%{PRTSC}")
   End If
   Dim objData As IDataObject = Clipboard.GetDataObject()
   Return objData.GetData(DataFormats.Bitmap)
End Function