AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 06 09:56:01
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

CAPTURE D'ÉCRAN EN JPG


Information sur la source

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é: 9 465 / 6 816
Auteur : jack Site perso
Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Note :
8,27 / 10 - par 11 personnes
8,27 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
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

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de matrey le 10/11/2003 21:00:30

cool

signaler à un administrateur
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+

signaler à un administrateur
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

signaler à un administrateur
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 ;)

signaler à un administrateur
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

signaler à un administrateur
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

signaler à un administrateur
Commentaire de wolfcyber le 07/11/2004 21:38:26

Vraiment tres bien !!

signaler à un administrateur
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 :(

signaler à un administrateur
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

signaler à un administrateur
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 !

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

Interesse toi aux apis, c'est la seule solution

signaler à un administrateur
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

signaler à un administrateur
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 !

signaler à un administrateur
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 ;-)

signaler à un administrateur
Commentaire de zytry le 13/04/2005 16:02:32

Impeccable ! Merci !!

signaler à un administrateur
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

signaler à un administrateur
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 ;-)

signaler à un administrateur
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

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


HTC Touch HD
Entre 25€ et 605€


Visiter le guide achat

Photothèque Nouveau !

Photo sitges beachPhoto friends
Photo femme, plage, bien être, soleil, vacances, été, détente, repos 

Visiter la photothèque


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
Temps d'éxécution de la page : 0,562 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.