BMP TO ICO - OU COMMENT CRÉER DES ICÔNES DYNAMIQUEMENT ET FACILEMENT

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 - 11 oct. 2005 à 13:01
surfzoid Messages postés 463 Date d'inscription vendredi 15 août 2003 Statut Membre Dernière intervention 21 avril 2010 - 24 janv. 2008 à 18:08

Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/34165-bmp-to-ico-ou-comment-creer-des-icones-dynamiquement-et-facilement

surfzoid Messages postés 463 Date d'inscription vendredi 15 août 2003 Statut Membre Dernière intervention 21 avril 2010
24 janv. 2008 à 18:08

Rien a redire, 10/10.
Petite idée d'une fonction sympa a implémenter, mettre un racourci ds le menu contextuel des fichier, si c'est un BMP (dans le shell), pour récupérer le nom du fichier dans les arguments du prog et créer le fichier icone a coté du BMP, juste avec un click droit sur le BMP.

debutant VB Messages postés 93 Date d'inscription lundi 3 juillet 2006 Statut Membre Dernière intervention 25 juin 2010
5 juil. 2006 à 11:06

Exactement ce que je cherchais, merci.

ROROLITO Messages postés 4 Date d'inscription lundi 4 août 2003 Statut Membre Dernière intervention 5 septembre 2007
1 mai 2006 à 19:13

Clair, net et précis
juste ce qui me fallait
Grand merci

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
23 févr. 2006 à 10:46

non (c'était ma première verif).
j'arrive en bidouillant (pas mal d'heures écoulées depuis) mais j'aurais voulu sans passer par d'autres DC intermédiares....

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
23 févr. 2006 à 08:36

pas un pbm avec ta propriété AutoRedraw ?

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
22 févr. 2006 à 20:25

salut Rey,
j'essaye d'adapter ta fonction...
en gros j'ai ma Pic qui fait 64*32
je la découpe en 2 partie égales (PaintPicture dans une autre PictureBox).
en mettant Objet.Picture, même en 64*32, pas de problème. mais en prenant le Objet.Image (utilisé pour ce cas), pas d'erreur mais l'icône est noire!!
à savoir que çà ne doit pas venir pas du ByRef ; module de classe avec objet StdPicture en propriété.

aurais-tu une idée?
++

clock Messages postés 6 Date d'inscription mercredi 13 octobre 2004 Statut Membre Dernière intervention 9 décembre 2007
25 oct. 2005 à 17:22

Super code Renfied et il marche du premier coup ! bravo

cs_SDan Messages postés 288 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 13 juin 2008
13 oct. 2005 à 10:36

En fait, c'est la seule version que j'ai et que j'utilise, de plus, quand j'ai suivi la petite formation à l'école, j'ai commencé avec la version 3.0 et ensuite, on est passé à la version 5.0. Ensuite grâce à des programmeurs, on m'a envoyé et installé la version VB 6.0 dll.

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
13 oct. 2005 à 10:30

Merci.

Je suis surpris de voir encore des gens qui se servent de VB 5.0 ...

cs_SDan Messages postés 288 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 13 juin 2008
13 oct. 2005 à 10:27

Bonjour à tous,

Programme très intéressant et utile surtout, de plus, fonctione parfaitement avec VB 5.0.

Un seul mot à dire BRAVO

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
11 oct. 2005 à 23:44

même image, fond noir disparu ;)
source intéressante, çà donne à réfléchir...
j'ai encore un peu de mal avec les CreateDC, mais çà va venir...
merci des modifs (si rapides).

PCPT

cs_Warning Messages postés 516 Date d'inscription samedi 3 février 2001 Statut Membre Dernière intervention 24 octobre 2006 2
11 oct. 2005 à 23:03

simple et efficace comme toujours ;) Bravo Renfield !

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
11 oct. 2005 à 15:11

cela vient du fait qu'elle fasse 45*45
Windows ne sais faire qu'une seule taille d'icone, quand il s'agit de resources.
(pas de soucis avec DrawIcon ou DrawIconEx)

j'ai completé ma fonction, pour pouvoir générer une icone en 32*32 (taille des icones sous Xp)

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
11 oct. 2005 à 14:41

:-\ l'icône créée a un fond noir (bmp 24bits 45*45 fond magenta XP)
PCPT

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
11 oct. 2005 à 14:20

Mise a jour effectuée.
J'ai donné accès à un objet IPictureDisp contenant l'icône créée...

Le SaveAs serait à réaliser avec quelques APIs, mais n'est pas l'objet de cette source. Je me suis contenté de greffer SavePicture, qui ne sais pas jouer avec les icones aux couleurs trop nombreuses...

PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
11 oct. 2005 à 13:01

salut Rey,
un petit bouton SaveAs? pour tester la compatibilité du format avec VB?

code propre en tout cas (évidence...)
++
PCPT

Discussions similaires

générer une grille de mots mêlés

SOS Convertir BMP en ICO

Algorithme Mot Caché

création d'une Application Android

mots meles

Votre réponse

Discussions similaires