dr_Lire nom

4D - Documentation   Français   English   German   4D Draw 2004, Commandes par thèmes   4D Draw 2004, Liste alphabétique des commandes   Retour   Précédent   Suivant

version 6.0


dr_Lire nom (zone; cible) Alpha

ParamètreTypeDescription
zoneEntier longZone 4D Draw
cibleEntier long-2 = Nom par défaut, -1 = Tous, 0 = Sélection, >0 = ID
RésultatAlphaNom de l'objet désigné par cible

Description

La commande dr_Lire nom retourne le nom de l'objet désigné par cible. Ce nom est une chaîne de caractères dont la limite supérieure est fixée à 31 caractères. Il n'est pas nécessairement unique. Il peut avoir été donné par l'utilisateur ou attribué par programmation à l'aide de la commande dr_FIXER NOM.

Si cible est égal à -2, dr_Lire nom retourne le nom par défaut défini pour chaque nouvel objet créé dans la zone, lorsqu'un nom par défaut existe. Ce nom ne peut être défini que par programmation. S'il n'existe pas, une chaîne vide est retournée.

Si cible est égal à -1, dr_Lire nom retourne le nom de tous les éléments contenus dans zone. Si les noms diffèrent, dr_Lire nom retourne la chaîne "*****" et dr_Erreur renvoie l'erreur 29.

Si cible est égal à 0, dr_Lire nom retourne le nom de tous les éléments sélectionnés. Si les noms diffèrent, dr_Lire nom retourne la chaîne "*****" et dr_Erreur renvoie l'erreur 29.

Si cible est supérieur à 0, 4D Draw interprète la valeur passée comme étant le numéro d'identification d'un l'objet et retourne son nom. Si le numéro d'identification ne correspond à aucun objet de zone, dr_Lire nom retourne la chaîne "*****" et dr_Erreur renvoie l'erreur 2.

Exemple

L'exemple suivant est la méthode objet d'un bouton placé dans un formulaire contenant une zone 4D Draw. Cette méthode objet s'assure que la sélection n'est pas vide, puis teste la fonction dr_ Erreur ; si les noms des objets diffèrent, un message est renvoyé, sinon il retourne dans une variable le nom commun à l'ensemble de la sélection.

   Si (0<dr_Compter(LaZone;0))
      $Nom:=dr_Lire nom(LaZone;0)
      Si (29=dr_Erreur)
         ALERTE("Tous ces objets ne portent pas le même nom !")
      Sinon 
         ALERTE("Ces objets portent le nom suivant : "+Caractere(13)+$Nom)
      Fin de si
   Fin de si

Référence

dr_FIXER NOM, dr_Lire ID.


4D - Documentation   Français   English   German   4D Draw 2004, Commandes par thèmes   4D Draw 2004, Liste alphabétique des commandes   Retour   Précédent   Suivant