begin process at 2010 03 22 02:30:11
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Graphique

 > CAPTURE D'ÉCRAN EN JPG

CAPTURE D'ÉCRAN EN JPG


 Information sur la source

Note :
8,27 / 10 - par 11 personnes
8,27 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Graphique Classé sous :jpg, capture, bmp, graphique, conversion Niveau :Débutant Date de création :10/11/2003 Date de mise à jour :10/11/2003 19:48:04 Vu / téléchargé :10 562 / 6 892

Auteur : jack

Ecrire un message privé
Site perso
Ce membre participe au partage de revenus publicitaires
Commentaire sur cette source (18)
Ajouter un commentaire et/ou une note


 Description

Salut à tous.
J'avais publié un module et une classe pour faire la transformation d'un fichier BMP en JPG. J'ai eu beaucoup de reproches ne n'avoir pas fait d'application pour le mettre en pratique ( http://www.vbfrance.com/code.aspx?ID=4308 )
Voilà qui est fait.
Je ne vous met pas la capture d'une modeste forme avec un bouton !
Quand vous aurez cliqué sur le bouton, les fichiers suivants seront créés :
Copie Ecran.BMP et Copie Ecran.JPG
Ensuite, le ShellExecute se chargera de lancer votre application associée à l'affichage des images de type JPG.



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture SYSTRAY + BALLOON - VARIANTE AVEC TEXTE DANS L'ICÔNE
Source avec Zip Source avec une capture DATE-HEURE DE LANCEMENT D'UN PROGRAMME
Source avec Zip Source avec une capture SYSTRAY + BALLOON EN UN SEUL CONTRÔLE UTILISATEUR
Source avec Zip Source avec une capture Source .NET (Dotnet) SMS GENERATOR
Source avec Zip TRANSPORTER UNE DB ACCESS DANS UN DOCUMENT WORD

 Sources de la même categorie

Source avec Zip Source .NET (Dotnet) COMPARAISON D'IMAGE par mafieulemouton
Source avec Zip Source avec une capture Source .NET (Dotnet) RECADRER_IMAGE par Le Pivert
Source avec Zip Source avec une capture Source .NET (Dotnet) EDITION DE CARACTÈRES MATRICIELS (POUR BITMAP, CF CODE 128) par Blodox
Source avec Zip Source avec une capture CRÉATION D'UN MASQUE GRAPHIQUE POUR MODIFIER LA COULEUR D'UN... par Dudule_73
Source avec Zip Source avec une capture Source .NET (Dotnet) GÉNÉRATEUR DE CODE 128 (CODE-BARRE) par Blodox

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture Source .NET (Dotnet) CAPTURE ET ENREGISTREMENT D'UNE IMAGE DEPUIS UNE WEBCAM par RENAUD34
Source avec Zip Source avec une capture 3NITY IMAGE STUDIO ACTIVEX SDK _ COMPOSANT DÉDIÉ À L'IMAGERI... par soldier8514
Source avec Zip Source avec une capture CONVERTIR BMP VERS JPG PAR API [MODULE DE CLASSE] par PCPT
Source avec Zip Source avec une capture MODULE DE CAPTURE D'ÉCRAN par Trappiste
Source avec Zip CAPTURE D'ÉCRAN AU FORMAT BMP / JPG AVEC RÉGLAGE DE LA QUALI... par soldier8514

Commentaires et avis

Commentaire de matrey le 10/11/2003 21:00:30

cool

Commentaire de rnosat le 11/11/2003 13:28:18

Hello jack !
bien ton prgr ...
mais ...
saurais tu faire un prog pour sauvegarder une img jpg a partir de la webcam ???
A+

Commentaire de Sirocooo le 12/11/2003 09:07:14

Tu dis : "J'ai eu beaucoup de reproches ne n'avoir pas fait d'application pour le mettre en pratique"...
Tu as eu UNE SEULE remarque et ce n'était pas un reproche... lol

Commentaire de carabidule le 17/12/2003 13:08:37

J'ai fait un petit programme avec le module pour passé de BMP à JPG c'est très utile :p

J'ai transformé Copie_Ecran(ByVal Fichier As String, _
                        ByVal Qualité As Integer)
en Copie_Ecran tout court

Et pour Call SaveJPG(Capture, Fichier & ".jpg", Qualité) en
Call SaveJPG(Capture, Fichier & ".jpg", Slider1)
-> G mi une slider pour choisir la qualité du jpg :)

Merci pour ton module ;)

Commentaire de Sibelle07 le 21/12/2003 14:18:36

Pas mal ce prog il est utile pour les conversions de formats il y aurait surement moyen de le faire pour d'autre format :-o

Note : 8/10

Commentaire de labout le 01/08/2004 12:27:00

Excuses moi pour le message sur la précédente source.
Je n'avais pas lu la description jusqu'au bout
L'exemple est parfait 10/10.
Meci

Commentaire de wolfcyber le 07/11/2004 21:38:26

Vraiment tres bien !!

Commentaire de zytrahus le 24/11/2004 19:01:25

Salut


Ton code marche plutôt pas mal, j'ai eu du mal à en trouver un qui soit bien commenté !

Tu ne saurais pas comment faire pour faire une capture de la fenetre active ? (c'est à dire de la fenetre ou le bouton "capturer l'ecran" est présent)

J'ai déchiffré ton code, mais hélas je ne vois pas comment faire :(

Commentaire de jack le 24/11/2004 19:13:41 administrateur CS

lu zytrahus
Oui, il suffit de trouver le handle de la fenêtre active et le fournir à l'application au lieu de celui du bureau.
Utilise les api genre GetForegroundWindow
Cherche sa définition dans "api-guide" gratuit dispo sur ce site : http://www.allapi.net

Commentaire de zytrahus le 24/11/2004 19:18:02

En fait la fenetre active, c'est la fenetre donc je veux la capture d'ecran (meme si parait bizarre lol)


je pensais que j'aurais acces plus facilement mais en fait ça n'a pas l'air plus simple !

Commentaire de jack le 24/11/2004 19:30:28 administrateur CS

Interesse toi aux apis, c'est la seule solution

Commentaire de zytrahus le 24/11/2004 19:42:57

en effet, j'ai trouvé sur MSDN, ça avance donc :

j'ai modifié ton code de cette manière :

hWnd = GetForegroundWindow()
hdc = GetDC(hWnd)
BitBlt frmCopieEcran.hdc, 0, 0, Me.Width, Me.Height, hdc, 0, 0, ScrCopy

le résultat est étrange, l'image commence bien en haut a gauche de la fenetre active (celle de ton programme), en revanche, malgré mes attributs Me.Width et Me.Height, l'image fait malgré tout la taille de la résolution de mon bureau. (elle prend tout le coin droit de mon image et elle complete avec du gris) c'est tres bizarre lol

Commentaire de jack le 24/11/2004 19:56:12 administrateur CS

re
Si seulement tu avais regardé les paramètres de BitBlt :
Tu aurais vu que les données correspondent aux dimensions, elle sont en pixels !
Donc, maintenant que tu as le handle, va falloir trouver la taille de la fenêtre en question : c'est une autre api nommée GetWindowRect.
Tout est dans "api-guide" : que ce soit cette dernière api que BitBlt --> Il y a des exemples en VB6 pour chaque api

Si tu as encore besoin d'infos, vient sur le chat (colonne de gauche de cette page) : il y aura tjrs qqun pour t'aider, mais la première aide pour les apis, c'est api-guide ! suffit de lire et de tester !

Commentaire de laurent207 le 23/12/2004 09:24:53

cool

c'est tu comment capturer aussi la souris avec la capture d'écran ?

sinon, bon programme (bien commenter, c domage que tu n'ai pas commenté les paramétres, mais ça va m'obliger à réfléchier un peu, lol), continu comme ça (euh la déclaration des variables se fait au début de chaque procédure ou fonction (là je pinaille) et pas n'importe où)

je te met 9/10 car on peut toujours s'améliorer ;-)

Commentaire de zytry le 13/04/2005 16:02:32

Impeccable ! Merci !!

Commentaire de Fwdavy le 18/08/2005 15:08:38

Help c'est possible d'avoir la source en vb 2005 ou vb.net, car j'ai essayé d'importer et j'ai pas mal d'erreur que j'arrive pas à résoudre. Avec de l'aide je peux actualiser cette source en vb 2005. Voici le rapport d'erreur :

Import de msvbvm60.dll c'est OK mais je ne trouve pas VarPtr.

Error RegSvr32 IJL11.DLL chargé mais le point d'entrée DLLregisterserver est introuvable.

La variable ANY par quoi je peux la changer (object?).

Warning 4 XML comment will be ignored. Conversion BMP - JPG_cls.vb 106 3 BMPversJPG
Error 5 'Public Event Load(sender As Object, e As System.EventArgs)'frmForme.vb 74 3 BMPversJPG

Error 6 'hdc' is not a member of 'BMPversJPG.frmCopieEcran'. frmForme.vb 79 10 BMPversJPG
Error 7 'Image' is not a member of 'BMPversJPG.frmCopieEcran'. frmForme.vb 82 3 BMPversJPG


Error 3 Name 'vbSrcCopy' is not declared. Conversion BMP - JPG_cls.vb 185 247 BMPversJPG
Error 13 Name 'vbFromUnicode' is not declared. Conversion BMP - JPG_bas.vb 125 72 BMPversJPG
Error 14 Name 'VarPtr' is not declared. Conversion BMP - JPG_bas.vb 129 11 BMPversJPG
Error 1 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_cls.vb 78 141 BMPversJPG
Error 2 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_cls.vb 24 89 BMPversJPG
Error 8 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_bas.vb 49 109 BMPversJPG
Error 9 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_bas.vb 49 88 BMPversJPG
Error 10 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_bas.vb 46 70 BMPversJPG
Error 11 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_bas.vb 44 69 BMPversJPG
Error 12 'As Any' is not supported in 'Declare' statements. Conversion BMP - JPG_bas.vb 42 69 BMPversJPG

Commentaire de dozern le 04/08/2006 19:40:57

Super code : simple et propre, ça nous change des "Hello world" qui se multiplient sur le site ;-)

Commentaire de tilp le 10/01/2008 05:45:52 10/10

2008 commence bien ! Code excellent... La première bonne trouvaille de l'année ... que j'ai adapté dans mon code et me permet de prendre une capture maintenant de n'importe quelle partie de l'écran ! Vraiment excellent !

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

conversion jpg->bmp [ par Horfee ] j'aimerais savoir comment convertir un fichier jpg en bmp simplement : sans devoir reecrire tout un algorithme de decompression!!! Convertion Bmp=>Jpg San Dll [ par legion91 ] Ya til un moyen de convertir un bmp(ou une image ou picturebox)en jpg sans avoir un dll (type ijl11.dll), un module ou autre serai la bienvenue.merci Conversion BMP vers JPEG [ par tiger33 ] BjrDesole si la reponse existe deja sur le site mais je n'ai pas su la trouver avec le moteur de rechercheVoila j'ai une image dans une picture boxA m background image : BMP ? GIF ? JPG ? [ par scortex84 ] Bonjour,je souhaite embélir un peu mes applications VB.NET en mettant des images de fond. Rien de bien compliqué, un simple dégradé.Le problème vient fichiers (.ico, .jpg, .bmp, .gif) [ par blissdumpweed ] J'au une question surement très conne mais une question quand même :Lorsque dans mes forms j'ajoute des images dans des pictures box ou simplement des Convertir des Bmp en Jpg [ par pichseb ] Comment convertir des images bmp en jpg en visual basic.Avec ou sans dll, cela m'importe peu...Merci...@+onthenet Perte de couleurs conversion JPG->BMP [ par madcow41 ] Salut,Je dévellope une appli qui change le wallpaper de Windows avec des JPG récupérés sur le net.Apparement on ne peut appliquer à Windows que des im Conversion Jpg en PS [ par Joul ] bonjour,je cherche à convertir une image Jpg en Ps. j'ai trouvé un petit utilitaire(Jpeg2Ps.exe) qui fonctionne en ligne de commande mais je n'arrive conversion bmp en jpeg [ par anfo ] Bonjour!De quelle façon peut-on convertir (en masse) des images bmp en jpeg?Anne Infos des BMP...mais en JPG [ par neo12 ]


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 3,744 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales