Icones

Sygale
Bonjour actuellement, j'extrait des icônes d'un .exe ou .dll avec les APIs suivantes :

'Extrait les icones et donne le nombre d'icones
Declare Function ExtractIconEx Lib "shell32.dll" Alias "ExtractIconExA" (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long
'Dessine les icones
Declare Function DrawIconEx Lib "user32" (ByVal hdc As Long, ByVal xLeft As Long, ByVal yTop As Long, ByVal hIcon As Long, ByVal cxWidth As Long, ByVal cyWidth As Long, ByVal istepIfAniCur As Long, ByVal hbrFlickerFreeDraw As Long, ByVal diFlags As Long) As Long

Ensuite une fois l'icones voulu est affichée dans une Picture box j'utilise la fonction

SavePicture de VB afin de sauvegarder l'icone sur le Disque dure, mais cette fonction remplace les partie transparente de l'icone en gris.

KK1 sait comment faire pour sauvegarder l'icones avec ses partie transparentes ????

Merci d'avance

Normale les picturebox transforme en BMP pour l'enregistrement, regarde dans les API il y en a une qui sauvegarde directement en Icones :)

A++

Crazyht :)


-------------------------------
Réponse au message :
-------------------------------

Sygale
Bonjour actuellement, j'extrait des icônes d'un .exe ou .dll avec les APIs suivantes :

'Extrait les icones et donne le nombre d'icones
Declare Function ExtractIconEx Lib "shell32.dll" Alias "ExtractIconExA" (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long
'Dessine les icones
Declare Function DrawIconEx Lib "user32" (ByVal hdc As Long, ByVal xLeft As Long, ByVal yTop As Long, ByVal hIcon As Long, ByVal cxWidth As Long, ByVal cyWidth As Long, ByVal istepIfAniCur As Long, ByVal hbrFlickerFreeDraw As Long, ByVal diFlags As Long) As Long

Ensuite une fois l'icones voulu est affichée dans une Picture box j'utilise la fonction

SavePicture de VB afin de sauvegarder l'icone sur le Disque dure, mais cette fonction remplace les partie transparente de l'icone en gris.

KK1 sait comment faire pour sauvegarder l'icones avec ses partie transparentes ????

Merci d'avance

regarde mes sources ....
Mail:ASC.Warning@caramail.com
Warning


-------------------------------
Réponse au message :
-------------------------------

Normale les picturebox transforme en BMP pour l'enregistrement, regarde dans les API il y en a une qui sauvegarde directement en Icones :)

A++

Crazyht :)


-------------------------------
Réponse au message :
-------------------------------

Sygale
Bonjour actuellement, j'extrait des icônes d'un .exe ou .dll avec les APIs suivantes :

'Extrait les icones et donne le nombre d'icones
Declare Function ExtractIconEx Lib "shell32.dll" Alias "ExtractIconExA" (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long
'Dessine les icones
Declare Function DrawIconEx Lib "user32" (ByVal hdc As Long, ByVal xLeft As Long, ByVal yTop As Long, ByVal hIcon As Long, ByVal cxWidth As Long, ByVal cyWidth As Long, ByVal istepIfAniCur As Long, ByVal hbrFlickerFreeDraw As Long, ByVal diFlags As Long) As Long

Ensuite une fois l'icones voulu est affichée dans une Picture box j'utilise la fonction

SavePicture de VB afin de sauvegarder l'icone sur le Disque dure, mais cette fonction remplace les partie transparente de l'icone en gris.

KK1 sait comment faire pour sauvegarder l'icones avec ses partie transparentes ????

Merci d'avance

• ---