Afficher les coordonnees

[mittoo]

Comment creer automatiquement un texte a coté d'un point contenant lees coordonnees de celui ci?

[LFA]

salut,

 

essaie ceci

a toi de le modifier

 

 

(defun c:de ()

(setvar "cmdecho" 0)

(command "osmode" "16383")

(setq p1 (getpoint "Select line near endpoint"))

(setq p2 (getpoint p1 "Select end of Leader"))

(setq px (rtos (nth 0 p1 ) 2 4))

(setq py (rtos (nth 1 p1 ) 2 4))

(setq pz (rtos (nth 2 p1 ) 2 4))

(setq txt (strcat "X " px " , " "Y " py " , " "z " pz))

(command "dim1" "leader" p1 p2 "" txt)

(setvar "cmdecho" 1)

)

 

 

 

 

 

[extrusion]

La fonction existe déjà :

 

_dimordinate

 

ou bien : cotord

 

dans Cotation - Ordonnées

[lecrabe]

Hello EXTRUSION

 

Faudra m'expliquer comment tu fais apparaître par cette commande

de cotation dans AutoCAD ("_dimordinate")

à la fois le X ET le Y ???

 

C'est une nouvelle option cachée ?

Mais bon je ne suis pas encore bien réveillé !!!

 

Voir aussi le sujet "cotation type plan topo" dans le forum AutoCAD 2004 !

 

BYe

 

 

[Edité le 4/8/2004 par lecrabe]

[mittoo]

Salut,

j'ai essayé les lignes de lisp, mais il m'affiche les coordonnees mais uniquement dans la partie "commandes", et me dit "commande inconnue" au moment d'afficher le texte...

 

[Patrick_35]

Salut

Corrige cette ligne de code

(command "dim1" "leader" p1 p2 "" txt)

par cette ligne

(command "dim1" "_leader" p1 p2 "" txt)

 

@+

 

[Edité le 4/8/2004 par Patrick_35]

[extrusion]

Bonjour Mr Le Crabe,

c'est vrai, une seule cote à la fois ... il faut le faire en deux coups.

Mais ce n'est pas de ma faute ! :(

 

Je suis daccord, ils auraient dû mettre cette option.

[mittoo]

Merci chers amis et surtout au crabe et à Patrick, leur collaboration m'a été fort utile...

 

[Tramber]

Sinon,

 

dans ce sujet, il y a moyen de faire un peu différent sans utiliser le Lisp,

 

c'est sv_zx9r qui a proposé la correction à un code de bouton que j'avais donné rapidement :

 

^C^CCOTORD;\@0,10;COTORD;@0,0 @10,0