Capture d'écran entier ou sélection, sauvegarde avec GDI+

Présentation
Capture d'écran entier ou sélection, sauvegarde avec GDI+

Il existe une multitude de programme de capture d'écran, avec celui-ci, vous disposerez du source pour le modifier à votre convenance, en récupérer quelque procédure et/ou comprendre le mécanisme de sauvegarde d'image en 5 formats différents (BMP, GIF, JPG, PNG et TIF) grâce à l'utilisation de GDI+.
Téléchargement
0  0 
Téléchargé 28 fois Voir les 3 commentaires
Détails
Catégories : GID+
Avatar de Francis MILLET
Rédacteur / Modérateur
Voir tous les téléchargements de l'auteur
Licence : Non renseignée
Date de mise en ligne : 14 novembre 2010




Avatar de ProgElecT ProgElecT - Rédacteur/Modérateur https://www.developpez.com
le 07/06/2008 à 18:02
Capture d’écran entier ou sélection, sauvegarde avec GDI+

Je sais qu’il existe une multitude de programme de capture d’écran, avec celui-ci, vous disposerez du source pour le modifier à votre convenance, en récupérer quelque procédure et/ou comprendre le mécanisme de sauvegarde d’image en 5 formats différents (BMP, GIF, JPG, PNG et TIF) grâce à l’utilisation de GDI+.

Au démarrage

Après une capture

Après une capture en mode prévisualisation avant impression


Vos critiques …… sont toujours les bien venues.

CaptEcran.zip (53.3Ko)

Motif de l’édit: actualisation du lien de téléchargement pour dernière version, pour informations, voir mon dernier message.
Avatar de Delbeke Delbeke - Membre expert https://www.developpez.com
le 08/06/2008 à 11:56
Beau boulot. Cà marche très bien.
Petit regret quand même, il n'est pas possible de prendre un screen shot sur une appli ayant le focus, ou alors j'ai raté quelque chose.
Avatar de ProgElecT ProgElecT - Rédacteur/Modérateur https://www.developpez.com
le 27/08/2008 à 16:41
Ayant changé d'ordinateur, je passe tous mes projets à la moulinette, et corrige les problémes qui surviennent sous VISTA .
Le programme de capture (le Form frmMenuCapt) reste souvant affiché dans la recupération de l'image du burreau.
Dans la procedure Cmd_Click(Index As Integer) de frmMenuCapt, ajouter
Code : Sélectionner tout
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Cmd_Click(Index As Integer)
Select Case Index
 Case 0 'Lancer la capture écran
  Me.WindowState = vbNormal: DoEvents
  Me.Visible = False: DoEvents
 
 '***********************************
  '****** partie ajoutée ******************
  T = Timer + 0.25 'ajuster eventuellement suivant l'OS et la vitesse de l'UC
  Do While Timer < T: DoEvents: Loop
  '**** Fin partie ajoutée ******************
  '************************************

  Me.Width = 4005 + CorrectionV: Me.Height = 1485 + CorrectionH: DoEvents
  'dessine sur frmCapture, tout se qui est visible a l'écran, sauf frmMenuCapt
  BitBlt frmCapture.hdc, 0&, 0&, Screen.Width, Screen.Height, GetDC(GetDesktopWindow()), 0, 0, vbSrcCopy
  DoEvents
  frmCapture.ShapeSelect.Visible = False
  frmCapture.Show
 '..............................

 
Developpez.com décline toute responsabilité quant à l'utilisation des différents éléments téléchargés.