Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 04 22:25:28

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : COLLAGE SPéCIAL DANS EXCEL DEPUIS VB6 par lepico27

CREATION/SUPRESSION D'UN DOSSIER par orochy

RE : CONVERTION DES REQUêTTES ACCES2007 VERS SQL par mond14

COLLAGE SPéCIAL DANS EXCEL DEPUIS VB6 par lepico27

RE : CONVERTION DES REQUêTTES ACCES2007 VERS SQL par casy

+ de logiciels à télécharger

1 464 435 membres
335 nouveaux aujourd'hui
15 045 membres club

Trouver une ressource

Trouvez une ressource parmi 40 098 codes, 1 302 888 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

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 !

[VISUAL BASIC] [GRAPHISME] ENREGISTRER UNE PICTUREBOX (AVANT OU APRÈS MODIFICATION)

Information sur le tutorial

Catégorie :Tutoriaux Date de création : 06/01/2003 04:25:25 Vu : 7 369 fois

Auteur : fragmatyc

Ecrire un message privé

Note :

1,00 / 10

Commentaire sur cette source (8)

Ajouter un commentaire et/ou une note

Tutorial

Ya pas grand monde qui save comment faire ça faque voici les code:

CommonDialog1.Filter = "JPEG (*.jpg)|*.jpg" 'Type de fichier
CommonDialog1.ShowSave 'Afficher la fenetre Save as...
a$ = CommonDialog1.FileName 'Mettre la sauvegarde en 'variable

If a$ <> "" Then 'Si le vous avez entrez un nom alors...
SavePicture Picture1.Image, a$ 'Enregistrez l'image de la 'picture1
Else 'Sinon...
'rien
End If 'terminer le si.....

P.S.: Ajoutez: "Picture1.autoredraw = true" dans Form_load()!

Commentaires

Commentaire de ennixo le 20/05/2005 13:26:55

as-tu déjà ouvert l'un de tes fichiers enregistrés avec ta méthode dans le bloc-note ?
si oui tu aurais surement vu qu'il ne commence pas par ÿØÿà mais par BM et que par conséquent il ne s'agit pas d'un JPEG mais bien d'un Bitmap (y'a ka voir la taille du fichier). Et meme si la visioneuse Windows et surement d'autres programmes ouvrent bien ces fichiers, il ne sont et ne seront toujours que des fichiers Bitmap.

Commentaire de abbassi_omar le 28/02/2006 02:05:06

salut je veux savoir si quelqu'un peux m'indiquer comment changer la couleur d'une image quelquonque pour la rendre en noir et blanc et merci d'avant

Commentaire de zemetafyzik le 06/05/2006 14:37:49

je crois que paint le fait, ça s'appelle "niveau de gris"

Commentaire de aitinch le 26/07/2006 02:21:45

Merci bco pour votre code

Commentaire de karimvb120576 le 03/12/2006 20:32:01

Salut
je suis nouveau ici
j'aimerai bien savoir comment faire pour reussir un test IF dans le code sur le nom d'une image aprés l'avoir met dans l'outil picture.

merci

Commentaire de yoku57 le 10/12/2006 00:30:23

bonsoir tout le monde, désolé , mais je suis débutant, quelqu'un pourrais me dire comment appliqué ce code source dans VBS ...? merci

Commentaire de M4x0u le 14/01/2009 20:44:21

bonjour, tous le monde j'aimerais savoir si sa serais possible de m'aider dans mon dit probleme car mon probleme et bizarre j'ai une image qui affiche en meme temps que du text mais l'image qui est supposer de correspondre ne fonctionne pas il me met une autre image et il fait pareille pour tout les autres text alors que faire avec cela merci as l'avance M4x0u