Exemple:

Soit une liste LST_IMAGES ayant 3 colonnes :
- COL_IMAGE est une colonne de style étendu "Image"
- COL_FICHIER est une colonne de type ALPHA, contenant le nom du fichier image, par exemple.
- COL_X est une colonne de type ALPHA (par exemple) pour qui on aura décoché "Visible" et pour qui on aura mis une taille de police de caractères assez grande pour que l'image contenue dans COL_IMAGE soit correctement visible

 

Il faut créer une liste d'images rattachée à la liste graphique.
Pour cela, utiliser la méthode AJOUTER_IMAGE de la liste.

* 1ère image intégrée dans la liste des images de la liste
W_FICHIER = 'D:\Adelia\Images\img2.gif'
APPELER_METHODE LST_IMAGES AJOUTER_IMAGE W_FICHIER B
* 2ème image intégrée dans la liste des images de la liste
W_FICHIER = 'D:\Adelia\Images\img05.gif'
APPELER_METHODE LST_IMAGES AJOUTER_IMAGE W_FICHIER B

 

Placer une colonne à la liste graphique. Sous l'onglet "Style étendu", sélectionner "Image".
Ensuite, fixer, pour chaque enregistrement, le n° de l'image dans la liste d'images : propriété VALEUR.

VIDER_LST LST_IMAGES:LISTE
COL_IMAGE:VALEUR = 1
COL_FICHIER: = 'img2.gif'
INSERER_ELT LST_IMAGES:LISTE
COL_IMAGE:VALEUR = 2
COL_FICHIER: = 'img05.gif'
INSERER_ELT LST_IMAGES:LISTE

Articles connexes