Désélectionner tous les éléments d'une List Box

Technicien Support

- Titre : Désélectionner tous les éléments d'une List Box

- Auteur : Technicien Support

- Parution : 11 avril 2005

- Licence : Copyright ® 2005 4D s.a.. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.

Sommaire

Produit : 4D 2004 · Plateforme : Mac & Win ♪

Voici un code exemple pour désélectionner tous les éléments d'un objet List Box :

1. ` --- méthode ---

3. `paramètre : $1 Pointeur vers la variable List Box

5. C_POINTEUR($1 ;$ListBox_p)

7. $ListBox_p :=$1

9. Repeter

10. $Elem :=Chercher dans tableau($ListBox_p-› ;Vrai)

12. Si ($Elem#-1)

13. $ListBox_p-›{$Elem}:=Faux

14. Fin de si

15. Jusque ($Elem:=-1)

17. ` --- Fin de méthode ---