Screnshots of specific are on a form?

[CoBHC]

I'm making a program that I need to make a screenshot of a specified area on the form. What I am making is a utility to make my 2d rpg game. All I need to know is how to code it so it will take the picture of the specified area then copy the picture to the clipboard.
Thanks for any help in advanced.

[isnoend07]

You can try copying the portion to a borderless form, then copying the form. I do this with a richtextbox and mshflexgrid. Using printwidow you do not have to show the form

http://www.vbforums.com/showthread.p...ht=printwindow

[CoBHC]

All right, that helps a lot, now all I need to know how to do is automatically do the Alt+Prt Sc.
Know how to add that into the code? Like would some kind of Sendkeys work?

[isnoend07]

All right, that helps a lot, now all I need to know how to do is automatically do the Alt+Prt Sc.
Know how to add that into the code? Like would some kind of Sendkeys work?

Call you sub with a button click

[CoBHC]

Call you sub with a button click

How do you do that?

[isnoend07]

How do you do that?

Private Sub Command1_Click()
Call YourSub
End Sub

[Edgemeal]

All right, that helps a lot, now all I need to know how to do is automatically do the Alt+Prt Sc.
Know how to add that into the code? Like would some kind of Sendkeys work?

If you have your captured image in a picturebox you can use the Clipboard.SetData command.

   ' copy image in picture1 to clipboard as bitmap
   Clipboard.Clear
   Clipboard.SetData Picture1.Image, vbCFBitmap

Most capturing that uses a picture box requires it to be set to AutoRedraw =True , then after the capture you .Refresh the pic box, then call the clipboard.setdata command.

[CoBHC]

I want it to automatically save the images if I click yes or no. I need to know exactly how to set the sub to capture the image.
Do I use a module and call PrintScreen()?

[isnoend07]

I want it to automatically save the images if I click yes or no. I need to know exactly how to set the sub to capture the image.
Do I use a module and call PrintScreen()?

Private Sub Command1_Click()
'as Edgemeal stated
Clipboard.Clear
Clipboard.SetData Picture1.Image, vbCFBitmap
End Sub
Change to you picturebox name
The picture will be on the clipboard

[CoBHC]

Private Sub Command1_Click()
'as Edgemeal stated
Clipboard.Clear
Clipboard.SetData Picture1.Image, vbCFBitmap
End Sub
Change to you picturebox name
The picture will be on the clipboard

Yeah, but I don't get it, will that actually take the screenshot???
You see, what I am aiming to do is actually press a button and save an image of a certain area on a form and then choose to save it to a folder I already made, I can handle the saving part, I just need to know the control to capture the screen with a button.

[isnoend07]

Yeah, but I don't get it, will that actually take the screenshot???
You see, what I am aiming to do is actually press a button and save an image of a certain area on a form and then choose to save it to a folder I already made, I can handle the saving part, I just need to know the control to capture the screen with a button.

It just gets easier:
Set autodraw to true
SavePicture Picture1, ("c:\mypic.bmp")

[CoBHC]

So if I place my picturebox over an area, it will capture a screenshot of that are on the form with that control?

[isnoend07]

So if I place my picturebox over an area, it will capture a screenshot of that are on the form with that control?

This will save what is in your picturebox to a file. Is this not what you want ?

Private Sub Command1_Click()
SavePicture Picture1, ("c:\mypic.bmp")
End Sub

[CoBHC]

This will save what is in your picturebox to a file. Is this not what you want ?

Private Sub Command1_Click()
SavePicture Picture1, ("c:\mypic.bmp")
End Sub

What I want is basically Alt + PrtSc in a command button. then choose to save the screenshot to a file.

[CoBHC]

Yeah, that's what I want, but I can't figure out what exact code in there captures it.