inserer un bloc

[serge77]

Bonjour,

 

J'ai un petit souci,

j'essai d'inserer un bloc en lisp à un point "ins6" mais je n'y arrive pas.

 (vla-insertblock space ??? (vlax-3d-point ins6) 1 1 1 0)

Par quoi je dois remplacer les ??? pour que ca marche.

 

J'ai essayé avec

 (setq bloc (car (entsel "\nSélectionnez le bloc ")))

et j'ai remplacé les ??? par bloc ca ne marche pas alors j'ai essayé

 (setq bloc2 (vlax-ename->vla-object bloc)) 

et j'ai remplacé les ??? par bloc2, ca ne marche pas non plus.

 

Si quelqu'un peut me repondre, ca me depannerai bien.

Merci

 

[Edité le 12/2/2007 par serge77]

[(gile)]

Salut,

 

Il faut mettre le nom du bloc.

 

(vla-insertblock space "Nom_du_bloc" (vlax-3d-point ins6) 1 1 1 0) 

[serge77]

Tout simplement, le seul truc que je n'avais pas essayé et aussi le plus simple.

Merci Gile

[serge77]

Voila,

 

J'ai mis ca:

 

 (vla-insertblock space "bala" (vlax-3d-point ins6) 1 1 1 0)

 

et la réponse d'Autocad:

 

; erreur: valeur Lisp sans contrainte avec VARIANT de ce type:  # < variant 8197 
...>  

 

[Edité le 13/2/2007 par serge77]

[(gile)]

Salut,

 

Qu'y a-t-il dans la variable space ?

 

Elle doit contenir un pointeur vers l'espace (Objet ou Papier) dans lequel tu veux insérer le bloc.

Pour obtenir un pointeur vers l'espace courant :

 

(setq space (if	(= (getvar "CVPORT") 1)
      (vla-get-PaperSpace
	(vla-get-activedocument (vlax-get-acad-object))
      )
      (vla-get-ModelSpace
	(vla-get-activedocument (vlax-get-acad-object))
      )
    )
) 

 

Qu'y a-t-il dans la variable ins6 ?

 

Elle doit contenir le point d'insertion, un point 3D dans le SCG ex : '(10.0 20.0 0.0).

 

 

[serge77]

Bonjour Gile,

 

on est bien daccord

 

Commande: !space

# < VLA-OBJECT IAcadModelSpace3 05d6c634>

Commande: !ins6

(-3674.53 2563.16 0.0)

 

[Edité le 13/2/2007 par serge77]

[Bred]

Salut serge77,

Pour info, (gile) m'a déjà aidé pour l'insertion de bloc en vl ici ! (fonctionne en 3D)

[serge77]

Merci à Gile et à Bred.

 

J'ai reussi en fait j'avais inversé l'ordre: le nom du bloc doit etre placé après le point d'insertion.

Voila c'était tout bête mais c'est souvent les trucs les plus bêtes que l'on ne trouve pas.

Encore Merci à vous deux

[(gile)]

Re,

 

Pour éviter de chercher tout seul, interroge l'aide.

 

En utilisant l'éditeur VisualLISP (Outils > AutoLISP > Editeur VisualLISP), tu sélectionne la fonction (double clic) et tu cliques sur l'icône de l'aide ...

 

http://xs412.xs.to/xs412/07072/ConsoleVlisp3.png

 

... l'aide s'ouvre à la page de la fonction surlignée, même si tu ne comprends pas bien l'anglais, tu peux toujours lire les arguments nécessaires à la fonction.

 

http://xs412.xs.to/xs412/07072/ConsoleVlisp4.png

[Bred]

Trés jolie ce style déchiré, (gile) !

Photoshop ?

[(gile)]

Trés jolie ce style déchiré, (gile) !

Photoshop ?

 

Non, un logiciel de capture d'écran que j'essaie : Snagit