#include #include Hotkeyset("{PRINTSCREEN}");empeche la copie windows Opt("MustDeclareVars", 1) Opt("TrayIconDebug", 1) ; =============================================================================================================================== ; Description ...: Capturer un screen ; Author ........: Timothée Malossane (timmalos) ; Notes .........: A chaque appui sur la touche [Impr ecran] le screen est pris et l'explorateur se lance ; =============================================================================================================================== ; =============================================================================================================================== ; Global variables ; =============================================================================================================================== Global $hBitmap, $countfile[3],$dll If not FileExists(@MyDocumentsDir & '\Screens\Screen1') then DirCreate(@MyDocumentsDir & '\Screens') $dll = DllOpen("user32.dll") ; =============================================================================================================================== ; Main ; =============================================================================================================================== While 1 Sleep ( 250 ) If _IsPressed("2C", $dll) Then $countfile = DirGetSize ( @MyDocumentsDir & '\Screens' , 1 ) $hBitmap = _ScreenCapture_Capture(@MyDocumentsDir & '\Screens\Screen'& ($countfile[1] + 1) &'.jpg') ShellExecute("explorer.exe", @MyDocumentsDir & '\Screens') EndIf WEnd ; Capture screen ; =============================================================================================================================== ; End ; =============================================================================================================================== DllClose($dll)