TIRAR PRINTSCREEN

REIDARK 25/02/2012 16:24:33
#395645
Opa galera, tudo bem?
Procurei por algum tutorial na internet, mas só achei sobre o VB6.
Então, eu queria criar um botão que quando o usuario apertasse ele tiraria um PrintScreen (Foto) da Tela dele OU apenas do meu programa.
E depois que ele apertasse esse botão, aparecia aquela caixa pergutnando aonde ele queria salvar.

E é mais ou menos isso, valeu galera :D
PEGUDO 25/02/2012 17:54:13
#395648
No Clique do botão:
[txt-color=#0000f0]Dim[/txt-color] Figura [txt-color=#0000f0]As Bitmap[/txt-color]

SendKeys.SendWait([txt-color=#e80000][Ô]%{Prtsc}[Ô][/txt-color])
Figura = Clipboard.GetImage

[txt-color=#0000f0]If[/txt-color] SaveDialog1.ShowDialog = Windows.Forms.DialogResult.OK [txt-color=#0000f0]Then[/txt-color]
    Figura.Save([txt-color=#0000f0]My[/txt-color].Computer.FileSystem.SpecialDirectories.MyDocuments & [txt-color=#e80000][Ô]\FiguraSalva.jpg[Ô][/txt-color], System.Drawing.Imaging.ImageFormat.Jpeg)
[txt-color=#0000f0]Else[/txt-color]
    Figura = [txt-color=#0000f0]Nothing
End If[/txt-color]

Clipboard.Clear()

Lembre-se de que este exemplo precisa de uma SaveDialog chamada SaveDialog1 ou troque pelo nome da sua SaveDialog
REIDARK 25/02/2012 18:38:40
#395649
Opa cara, tentei aqui.

Mas deu um erro nessa linha: Figura.Save(My.Computer.FileSystem.SpecialDirectories.MyDocuments & [Ô]\FiguraSalva.jpg[Ô], System.Drawing.Imaging.ImageFormat.Jpeg)

Eu executo normal, clico no meu botão de tirar print, mas quando vou salvar ele da esse erro.
PEGUDO 26/02/2012 08:54:41
#395665
Cara
Troca este trecho: 
[txt-color=#0000f0]Dim[/txt-color] Figura [txt-color=#0000f0]As Bitmap[/txt-color]
por este 
[txt-color=#0000f0]Dim[/txt-color] Figura [txt-color=#0000f0]As New Bitmap[/txt-color](128, 128)

Se quiser uma figura menor, troque o 128 por um nº menor
Tópico encerrado , respostas não são mais permitidas
Voltar