Equivalence LISP <-> VLISP

[l56]

Bonjour,

 

Ou peut-on trouver une liste d'équivalence du genre :

 

LISP : (= "TEXT" (cdr (assoc 0 (entget ent))))

VLISP : (= "AcDbText" (vla-get-objectname (vlax-ename->vla-object ent)))

 

Je cherche l'équivalent de :

 

LISP : (assoc -3 (entget ent '("MY_APP")))

VLISP : ??

 

Merci pour votre aide ...

[vincentp010]

Salut,

 

En vlisp il y a la commande vla-getxdata

(vla-getxdata (vlax-ename->vla-object ent) "MY_APP" 'xdtype 'xdvalue)

Dans la variable xdtype tu auras tous les type des valeurs, comme 1010, 1040, 1070, ...

Et dans xdvalue tu a les valeurs.

Exemple:

(vlax-safearray->list xdtype)
(1001 1040)

(mapcar '(lambda (x) (vlax-variant-value x)) (vlax-safearray->list xdvalue))
("MY_APP" 268.815)

[l56]

C'est parfait. Merci pour ta réponse rapide.

Mais pour trouver tout seul ce genre de chose, je dois chercher ou ?

[vincentp010]

J'ai été dans l'aide aux développeurs d'autocad (Menu ? -> Ressources supplémentaires -> Aide aux développeurs), je ne sais pas qu'elle version tu as, mais dans les dernières versions c'est l'aide sur internet, donc je ne sait pas si tu as tout ce que j'ai.

 

Dans l'aide toute les commandes ActiveX et VBA que tu vois peuvent êtres appelées en vlisp avec le préfix vla-

[l56]

Je vais aller regarder et étudier cela de près.

Encore merci pour ton aide.