Capture d'écran et enregistrement dans un fichier avec touche imprecransystème

Description

Alors cette source permet d'enregistrer une capture d'ecran faite avec la touche du clavier directement dans un fichier. Vous pouvez enregistrer au format jpeg (par défaut) mais j'ai mis dans le projet les fonctions a appeler si vous voulez enregsitrer en zip !
Le code n'est pas optimiser et pas beaucoup commenter mais si vous êtes intéressez, je peux retravailler le code !
J'ai fait ce programme car je fais des tutoriels et j'en avais marre de devoir passer par un logiciel de retouche d'image pour suaver mes captures.

Source / Exemple :


' j'ai mis la fonction qui détecte l'appui d'une touche

'API pour tester l'état des touches du clavier d'apres les keycodes
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub tmrKCODE_Timer()
Dim b1 As Long, i As Long

' la petite procédure qui va bien !
For i = 0 To 255
    b1 = GetAsyncKeyState(i)
    If b1 < 0 Then
        lblKCSS = CStr(i)  'si 44, -> touche ImpEcranSys
        if lblKCSS = 44 then
              'récupération et traitement de l'image
        End if
        Exit For
    End If
Next i
End Sub

Conclusion :


J'ai classé mon projet en débutant car il n'y a pas de grosse difficulté mis à part peut etre les apis ! Sinon, j'ai utilisé la libraire gdi+ trouvé sur http://www.codyx.org/. Pouvez vous me dire si votre anti-virus considère ce programme comme un keylogger ou est ce qu'il passe car j'ai utilise le meme genre de technique pour surveiller l'appuis des touches !

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.