Probleme boc avec *u125

olivertsss · le 11 mars 2008

Bonjour j'ai creer des bloc dans un fichier et quand j'ai rouvert ce fichier, les bloc que j'avais creer (des bloc dynamiques) ont étés renommer en *u125 ou*u148 ou etc...

le probleme c'est qu'il ne sont plus exploitables, je suis obliger de les décomposer et tout recommencer

de quoi cela peut-il provenir?? merci

lili2006 · le 11 mars 2008

Bonsoir à toutes et tous,

As-tu essayé une récupération de ton fichier ?

Sinon, désolé, je ne connais pas ce message d'erreur !

(gile) · le 11 mars 2008

Salut,

C'est le comportement normal avec les blocs dynamiques.

Quand on modifie leurs propriétés dynamiques, ils deviennent des blocs anonymes.

Il y a là une certaine logique, ces blocs n'étant plus identiques, il faut pouvoir les identifier individuellement.

le probleme c'est qu'il ne sont plus exploitables

Que veux tu dire par là ?

bseb67 · le 12 mars 2008

Salut olivertsss,

Je travail depuis un moment sur les blocs dynamiques, et oui c'est un peu embêtant le fait qu'ils

deviennent des *U, mais comme l'a dit (Gile) c'est le fait que tu modifies les propriétés qui fait

changer le nom.

La seule solution que j'ai trouvé pour retrouver mes blocs, c'est de passer du v-lisp afin de trouver le nom d'origine.

oliverts · le 12 mars 2008

:casstet:

ok pour la solution mais comment tu fais ton v-lisp

oliverts · le 12 mars 2008

reponse pour Gile

du fait que mon bloc se soit renommer *uxxx, les fonction dynamiques n'existent plus, je suis donc obliger explser mon bloc pour reatribuer des parametres et actions dynamique

Tchao

(gile) · le 12 mars 2008

du fait que mon bloc se soit renommer *uxxx, les fonction dynamiques n'existent plus

Ça c'est pas normal.

La disparition des propriétés dynamiques n'est pas due au fait que le bloc ait été renommé.

PHILPHIL · le 12 mars 2008

bonjour

bsed67 bonne question de la part de oliverts

comment tu fais en vlisp pour retrouver le nom d'origine ??

j'ai cherche dans un bloc avec visual lips " ENA1 " dans toute l'arborescence impossible de retouver le nom de base du bloc

 (defun c:inf ()
 (vl-load-com)
 (setq ent1 (car (nentsel "\rSELECTIONNER UNE ENTITE POUR INFO1.")))
 (setq CODE1 (cdr (assoc -1 (entget ent1))))
 (SETq ena1 (vlax-ename->vla-object code1))
 (vlax-dump-object ena1)
 ((vla-get-ModelSpace acadDocument) 'vlax-dump-Object)
)

j'ai un autre souci de bloc dans un lisp pour aligner des blocs je change la reference " 10 " du bloc sauf que les attributs ne change pas de place

normal ?? pas normal ???

il y a une variable cache dans autocad pour que les attributs bougent en fonction de ma modification du point de base du bloc ??

phil

 					; ---------------------------------------------------
				; ALIGNEMENT DES BLOCS AVEC POSSIBILITE DE COPIE
				; ---------------------------------------------------

(defun C:ALB (/ ENTX)
 (setvar "cmdecho" 0)
 (command "scu" "")
 (setq COPIETEXT (getcfg "APPDATA/COPIETEXT"))
 (setq TYPEALGN (getcfg "APPDATA/TYPEALGN"))
 (setq DALTX (atof (getcfg "APPDATA/DALTX")))
 (setq DALTY (atof (getcfg "APPDATA/DALTY")))
 (initget "X Y XY")
 (setq	TMP
 (getkword
   (strcat "\nENTRER LE PLAN DE PROJECTION (X) (Y) (XY) ACTUELLEMENT <"
	   TYPEALGN
	   "> : "
   )
 )
 )
 (if TMP
   (setq TYPEALGN TMP)
 )
 (setq
   TMP1 (getdist
   (strcat
     "\nENTRER LA VALEUR DU DECALAGE DES BLOCS SUR X DESIRE <"
     (rtos DALTX 2 8)
     ">: "
   )
 )
 )
 (if TMP1
   (setq DALTX TMP1)
 )
 (setq
   TMP1 (getdist
   (strcat
     "\nENTRER LA VALEUR DU DECALAGE DES BLOCS SUR Y DESIRE <"
     (rtos DALTY 2 8)
     ">: "
   )
 )
 )
 (if TMP1
   (setq DALTY TMP1)
 )
 (initget "oui OUI o O non NON n N")
 (setq	TMP
 (getkword
   (strcat
     "\nVOULEZ VOUS FAIRE DES COPIES DES BLOCS ( O(UI) / N(ON) ) <"
     COPIETEXT
     "> : "
   )
 )
 )
 (if TMP
   (setq COPIETEXT TMP)
 )
 (setq ENTX NIL)
 (prompt "\nSELECTIONNER LE(S) BLOC(S) A MODIFIER :")
 (while (null ENTX)
   (setq ENTX (ssget '((0 . "INSERT"))))
 )
 (setq	POINTREF
 (getpoint
   (strcat
     "\nENTRER LE POINT DE REFERENCE POUR L'ALIGNEMENT : "
   )
 )
 )
 (setq XPOINTREF (car POINTREF))
 (setq YPOINTREF (cadr POINTREF))
 (if (or (= COPIETEXT "oui")
  (= COPIETEXT "OUI")
  (= COPIETEXT "o")
  (= COPIETEXT "O")
     )
   (command "COPIER" ENTX "" "0,0" "0,0")
 )
 (setq COMPT 0)
 (setq COM (sslength ENTX))
 (while (< COMPT COM)
   (progn
     (setq ENT (entget (ssname ENTX COMPT)))
(progn (if (= TYPEALGN "X")
	 (if (= DALTX 0)
	   (setq ENT
		  (subst
		    (cons
		      10
		      (list (car (cdr (assoc 10 ENT))) YPOINTREF 0)
		    )
		    (assoc 10 ENT)
		    ENT
		  )
	   )
	   (setq
	     ENT (subst	(cons 10
			      (list (+ XPOINTREF (* COMPT DALTX))
				    YPOINTREF
				    0
			      )
			)
			(assoc 10 ENT)
			ENT
		 )
	   )
	 )
       )
       (if (= TYPEALGN "Y")
	 (if (= DALTY 0)
	   (setq ENT
		  (subst
		    (cons
		      10
		      (list XPOINTREF (cadr (cdr (assoc 10 ENT))) 0)
		    )
		    (assoc 10 ENT)
		    ENT
		  )
	   )
	   (setq
	     ENT (subst	(cons 10
			      (list XPOINTREF
				    (- YPOINTREF (* COMPT DALTY))
				    0
			      )
			)
			(assoc 10 ENT)
			ENT
		 )
	   )
	 )
       )
       (if (= TYPEALGN "XY")
	 (setq ENT (subst (cons	10
				(list (+ XPOINTREF (* COMPT DALTX))
				      (- YPOINTREF (* COMPT DALTY))
				      0
				)
			  )
			  (assoc 10 ENT)
			  ENT
		   )
	 )
       )
)
     (entmod ENT)
     (command "_attsync" "_n" (cdr (assoc 2 ent))) 
     (setq COMPT (1+ COMPT))
   )
 )
 (command "scu" "p")
 (setcfg "APPDATA/COPIETEXT" COPIETEXT)
 (setcfg "APPDATA/TYPEALGN" TYPEALGN)
 (setcfg "APPDATA/DALTX" (rtos DALTX 2 8))
 (setcfg "APPDATA/DALTY" (rtos DALTY 2 8))
 (princ)
)

[Edité le 12/3/2008 par PHILPHIL]

(gile) · le 12 mars 2008

comment tu fais en vlisp pour retrouver le nom d'origine ??

C'est la propriété EffectiveName.

(setq blk (car (entsel "\nSélectionnez un bloc: ")))
(setq blk (vlax-ename->vla-object blk))
(setq nom (vla-get-EffectiveName blk))

(gile) · le 12 mars 2008

j'ai un autre souci de bloc dans un lisp pour aligner des blocs je change la reference " 10 " du bloc sauf que les attributs ne change pas de place
normal ?? pas normal ???
il y a une variable cache dans autocad pour que les attributs bougent en fonction de ma modification du point de base du bloc ??

Il faut synchroniser les attributs après le (entmod ent) :

(command "_.attsync" "_n" (cdr (assoc 2 ent)))

lili2006 · le 12 mars 2008

Bonsoir à toutes et tous,

PHILPHIL, sur ton Lisp, comment fais-ton pour choisir le plan de projection et que répondre si on est en 2D ? Si je prend l'option copie, il le fais bien, mais le colle sur l'original. Je n'arrive donc pas à avoir de décalage. C'est qui le point de référence pour l'alignement ?

Merci d'avance.

PHILPHIL · le 13 mars 2008

HELLO

ok gile ca marche merci

lili2006,

ce lisp est juste une modification du lisp " ALT" ( alignement des textes ) que tu avais deja essayé

pour un alignement sur l'axe des X : entree X

pour un alignement sur l'axe des Y : entree Y

si tu rentres

un aligement sur Y

une valeurs pour les decalages "50" par exemple

ca empile les blocs tout les 50 unites

si decalage egal "0" ca alignement les bloc sur l'axe Y en modifiant la position des X

le decalage peut etre negatif aussi

OK ???

phil

bseb67 · le 13 mars 2008

Salut ,

Pour PHILPHIL: Désolé de n'avoir pas encore répondu, mais (Gile) t'as donné la réponse,

Pour oliverts: j'ai découvert un bug d'autocad sur les blocs dynamiques et je pense que tu dois avoir le même. Si tu insères un bloc dynamique loin du point 0,0,0 du dessin, là ca va, mais si tu le pivotes,

le déplace un peu ou change quoi que se soit, les petites flèches bleues (des propriétés dynamiques) foutent le camp. Mais le pire, c'est que cela m'est aussi arrivé proche du point 0,0,0, après avoir déplacé plusieurs le bloc et de pas grand chose (quelques mètres seulement) et fait des rotations.

Mais en v-lisp tu arrive toujours à chopper les propriétés dynamiques. Donc ma super astuce, si les propriétés ne sont plus accessibles, j'ai fait des fonctions v-lisp (spécifique à chaque bloc) qui récupère les infos (position, rotation, propriétés dynamiques), supprime le bloc sélectionné et ré-insère un nouveau avec les paramètres sauvegardés.

PHILPHIL · le 13 mars 2008

hello

petite precision sur les blocs dynamiques

les petites fleches et autres moyens de modification des blocs disparaissent

aussi bien sur la fenetre de dessin que dans la fenetre des proprietes

quand les echelles X,Y,Z ne sont pas exatement les meme

phil

lili2006 · le 13 mars 2008

Bonsoir à toutes et tous,

Ok PHILPHIL, je teste et je repasse,...

LUDWIG · le 13 mars 2008

http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=17866#pid73251

Même réponse, perte des poignées sur bloc non uniforme... Peut-être une impossibilité géométrique ?

olivertsss · le 13 mars 2008

Salut ,

Donc ma super astuce, si les propriétés ne sont plus accessibles, j'ai fait des fonctions v-lisp (spécifique à chaque bloc) qui récupère les infos (position, rotation, propriétés dynamiques), supprime le bloc sélectionné et ré-insère un nouveau avec les paramètres sauvegardés.

Salut Bseb 67

tu peux m'expliquer ce qu'est ton V-lisp pour retrouver les proprietes du bloc, parceque la je vois pas

merci, bye

lili2006 · le 13 mars 2008

Re,

Bien vu LUDWIG, j'avais pas fait le rapprochement,...

lili2006 · le 14 mars 2008

Bonjour à toutes et tous,

Effectivement, PHILPHIL !

Par contre, les attributs de blocs se copient sur le point d'insertion de l'original chez moi ?!

Par exemple sur l'image ci-dessous, la lettre A est resté sur le point d'insertion du bloc origine (celui de droite) :

Je suis sous une V2008 full !

Connexion

Probleme boc avec *u125

Messages recommandés

olivertsss

lili2006

(gile)

bseb67

oliverts

oliverts

(gile)

PHILPHIL

(gile)

(gile)

lili2006

PHILPHIL

bseb67

PHILPHIL

lili2006

LUDWIG

olivertsss

lili2006

lili2006

Créer un compte ou se connecter pour commenter

Créer un compte

Se connecter

Forums

Naviguer

Activité

Information importante