4D v14.3LIRE RESSOURCE ICONE |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v14.3
LIRE RESSOURCE ICONE
|
LIRE RESSOURCE ICONE ( resNum ; resDonnées {; resFichier} ) | ||||||||
Paramètre | Type | Description | ||||||
resNum | Entier long |
![]() |
Numéro de ressource icône | |||||
resDonnées | Image |
![]() |
Champ ou variable image devant recevoir l'icône | |||||
![]() |
Image résultante | |||||||
resFichier | RefDoc |
![]() |
Numéro de référence de fichier de ressources ou tous les fichiers de ressources ouverts si ce paramètre est omis | |||||
La commande LIRE RESSOURCE ICONE retourne dans le champ ou la variable image resDonnées l'icône stockée dans la ressource icône couleur ("cicn") dont vous avez passé le numéro d'ID dans resNum.
Si la ressource n'est pas trouvée, le paramètre resDonnées reste inchangé et la variable système OK prend la valeur 0 (zéro).
Si vous passez un numéro de référence de fichier de ressources valide dans resFichier, la ressource est recherchée dans ce fichier uniquement. Si vous ne passez pas le paramètre resFichier, c'est la première occurrence de la ressource rencontrée dans la chaîne des fichiers de ressources qui sera retournée.
L'exemple suivant charge dans un tableau image les icônes couleur situées dans l'application 4D en cours d'utilisation :
Si(Sous Windows)
$vh4DResFile:=Ouvrir fichier ressources(Remplacer chaine(Fichier application;".EXE";".RSR"))
Sinon
$vh4DResFile:=Ouvrir fichier ressources(Fichier application)
Fin de si
LISTE RESSOURCES("cicn";$alResID;$asResNom;$vh4DResFile)
$vlNbIcons:=Taille tableau($alResID)
TABLEAU IMAGE(ag4DIcon;$vlNbIcons)
Boucle($vlElem;1;$vlNbIcons)
LIRE RESSOURCE ICONE($alResID{$vlElem};ag4DIcon{$vlElem};$vh4DResFile)
Fin de boucle
Une fois ce code exécuté, le tableau aura l'aspect suivant lorsqu'il sera affiché dans un formulaire :
La variable système OK prend la valeur 1 si la ressource est trouvée, sinon elle prend la valeur 0 (zéro).
Produit : 4D
Thème : Ressources
Numéro :
517
Nom intl. : GET ICON RESOURCE
Créé : 4D v6
4D - Langage ( 4D v12.4)
4D - Langage ( 4D v11 SQL Release 6)
4D - Langage ( 4D v14 R3)
4D - Langage ( 4D v14 R2)
4D - Langage ( 4D v13.5)
4D - Langage ( 4D v14.3)
4D - Langage ( 4D v14 R4)