|
| Débuté par p.rodriguez, 15 déc. 2004 10:57 - 2 réponses |
| |
| | | |
|
| |
| Posté le 15 décembre 2004 - 10:57 |
Bonjour,
Je souhaiterai pouvoir connaitre l'icone associé à un fichier de manière à pouvoir eventuellement le récupérer et l'afficher dans une table à coté du nom du fichier.
Est ce que cette opération et possible et comment ?
Merci de votre aide |
| |
| |
| | | |
|
| | |
| |
| Posté le 16 décembre 2004 - 16:06 |
Salut,
Pour l'exemple tu as besoin d'un champ image de dimension 38x38 nommé Image1
et d'une table nommée Table1 avec une colonne nommée colonne1
//DÉBUT DU CODE
SHFILEINFO est une structure
hIcon est un entier //Type C : HICON
iIcon est un entier //Type C : int
dwAttributes est un entier //Type C : DWORD
szDisplayName est une chaîne fixe sur 260 //Type C : TCHAR
szTypeName est une chaîne fixe sur 80 //Type C : TCHAR
FIN
sh_info est un SHFILEINFO
// Extraire l'icône associé au raccourci Windev
// et l'afficher dans une fenêtre
hDC est un entier
hInst est un entier
strChemin est une chaîne
// récupére le "Device Context" de l'image
hDC = dDébutDessin(Image1)
// sélection du fichier pour lequel on veut l'icône...
strChemin = fSélecteur(SysRep(srBureau), "", "Sélectionnez un
fichier...","Tous fichiers (*.*)"+TAB+"*.*", "*", fselOuvre+fselExiste)
// extraction de l'icône
iRetour est un entier =
API("shell32","SHGetFileInfo","."+fExtraitChemin(strChemin,fExtension)+Caract(0),128,&sh_info,Dimension(sh_info),256+16)
SI iRetour <> -1 ALORS
// affichage de l'icône
API("user32", "DrawIcon", hDC, 1, 1, sh_info:hIcon)
API("user32", "DestroyIcon", sh_info:hIcon)
// permet l'affichage dans la zone hIconAFF (sinon l'icône est manipulable
dcopie... mais ne s'affiche pas?)
dRedimensionne(Image1,Image1..Largeur,Image1..Hauteur)
FIN
strRetour est une chaîne = dSauveImageBMP(Image1,enMémoire)
tablesupprimetout(table1)
TableAjouteLigne(Table1)
Table1.Colonne1[1] = strRetour
//FIN DU CODE
Il ne te reste plus qu'à jouer avec la couleur de fond du champ image et
celui de ta table
Mathieu
"Pascal" <p.rodriguez@clior.com> a écrit dans le message de news:
41bff248@news.pcsoft.fr...
Bonjour,
Je souhaiterai pouvoir connaitre l'icone associé à un fichier de manière à
pouvoir eventuellement le récupérer et l'afficher dans une table à coté du
nom du fichier.
Est ce que cette opération et possible et comment ?
Merci de votre aide
|
| |
| |
| | | |
|
| | |
| |
| Posté le 17 décembre 2004 - 10:21 |
| Merci beaucoup pour le coup de main !!!! |
| |
| |
| | | |
|
| | | | |
| | |
|