N° | Fonction | Catégorie | Version |
---|---|---|---|
BIB 08 | BiB_GetVal | Gestion des Objets | 1.0 - Janvier 2007 |
But | Retourne la valeur associée d’une paire pointée d’une entité. |
Prototype | (BiB_GetVal Code_Groupe Entité) |
Arguments | Code_Groupe - Le code associé à la valeur désirée - tout type - Entité - ename, entsel ou entget de l'entité - divers - |
Retours | La valeur associée ou nil - tout type - |
Var. globales | Néant |
Description | Retourne la valeur associée d'une paire pointée (ou liste associative). Cette fonction est utilisée pour extraire une des caractéristiques d'une entité d'après la codification DXF. Le second argument accepte comme valeur, auussi bien le "ename", la liste Entsel ou la liste Entget de l’entité. |
Notes | Voir également les fonctions BiB_Get, BiB_GetSel, BiB_GetType, BiB_EntGet, BiL_Get2Dim ... |
Exemples | Command: (command "_line" "10,20" "100,200") (BiB_GetVal 10 (entlast)) retourne (10.0 20.0 0.0) (BiB_GetVal 0 (entlast)) retourne "LINE" Command: (BiB_GetVal 11 (entsel)) Si on sélectionne la même ligne, retourne : (100.0 200.0 0.0) Command: (setq Ent2 (entget (entlast))) ((-1 . <Entity name: 21d0a88>) (0 . "LINE") (5 . "179") (100 . "AcDbEntity") (67 . 0) (8 . "0") (100 . "AcDbLine") (10 10.0 20.0 0.0) (11 100.0 200.0 0.0) (210 0.0 0.0 1.0)) Command: (BiB_GetVal 0 Ent2) retourne "LINE" Command: (BiB_GetVal 10 Ent2) retourne (10.0 20.0 0.0) |
1- (defun BiB_GetVal (*Grp *Elm) 2- (cdr 3- (assoc *Grp 4- (entget 5- (BiB_Ename *Elm) 6- ) 7- ) 8- ) 9- )
Retourne la sous-liste contenue dans la liste de données correspondant à "l'ename" de *Elm qui est associée au code *Grp , sans ce code de groupe.