Discussion :

[HULK]

Ce code permets d'effectuer en quelques lignes de code des print screen de la fenetre active ou de l'ecran entier en simulant l'activation des touches du clavier.

Le resultat est affiché dans deux PictureBox.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
 ' POUR LA FENETRE ACTIVE
 SendKeys.SendWait("{PRTSC}")
 Dim window As Bitmap
 window = CType(Clipboard.GetDataObject().GetData("Bitmap"), Bitmap)
 PictureBox1.Image = window
 
 ' ICI POUR LE SCREEN ENTIER
 SendKeys.SendWait("+{PRTSC}")
 Dim screen As Bitmap
 screen = CType(Clipboard.GetDataObject().GetData("Bitmap"), Bitmap)
 PictureBox2.Image = screen

[nico-pyright(c)]

j'ai déjà vu ca quelque part

je me pose une question, ce ne serait pas mieux d'utiliser CopyFromScreen ? c'est plus permissif tout de meme et evite de faire appel à un fonctionnement externe ... et si le clavier est hooké ?

[HULK]

bah c'est une solution parmis d'autre, tu as surement déjà vu ce code dans les exemples de code de VS 2005 ou les cours du docteur plassere sur le site de developpez.