LISTBOX LIRE OBJETS

4D v16.3

LISTBOX LIRE OBJETS


LISTBOX LIRE OBJETS ( {* ;} objet ; tabNomsObj )

Paramètre	Type	Description
*	Opérateur	Si spécifié, objet est un nom d'objet (chaîne) Si omis, objet est une variable
objet	Objet de formulaire	Nom d'objet (si * est spécifié) ou Variable (si * est omis)
tabNomsObj	Tableau texte	Noms des sous-objets de la list box (en-têtes, colonnes, pieds)

Description

La commande LISTBOX LIRE OBJETS retourne un tableau contenant les noms de chaque objet composant la list box désignée par les paramètres objet et *.

Si vous passez le paramètre optionnel *, vous indiquez que le paramètre objet est un nom d'objet (une chaîne). Si vous ne passez pas ce paramètre, vous indiquez que le paramètre objet est une variable. Dans ce cas, vous ne passez pas une chaîne mais une référence de variable.

Passez dans tabNomsObj un tableau texte qui sera automatiquement rempli par la commande. Les noms des objets sont retournés dans leur ordre d’affichage, avec la séquence suivante :

nomCol1

nomEntêteCol1

nomPiedCol1

nomCol2

nomEntêteCol2

nomPiedCol2

...

Le tableau retourne les noms des objets de toutes les colonnes (y compris les pieds de colonnes), quel que soit leur statut visible/invisible.

Cette commande est utile dans le contexte de l’analyse d’un formulaire via les commandes FORM CHARGER, FORM LIRE OBJETS et OBJET Lire type. Elle permet, si nécessaire, d’obtenir les noms des sous-objets des list box.

Exemple

Vous souhaitez charger un formulaire et obtenir la liste de tous les objets des list box qu’il contient.

 FORM CHARGER("MonFormulaire")

 TABLEAU TEXTE(tabObjets;0)

 FORM LIRE OBJETS(tabObjets)

 TABLEAU ENTIER LONG(ar_type;Taille tableau(tabObjets))

 Boucle($i;1;Taille tableau(tabObjets))

       ar_type{$i}:=OBJET Lire type(*;tabObjets{$i})

       Si(ar_type{$i}=Objet type listbox)

          TABLEAU TEXTE(tabObjetsLB;0)

          LISTBOX LIRE OBJETS(*;tabObjets{$i};tabObjetsLB)

       Fin de si

 Fin de boucle

 FORM LIBERER

Voir aussi

FORM CHARGER
OBJET Lire type