-
Compteur de contenus
340 -
Inscription
-
Dernière visite
-
Jours gagnés
1
Type de contenu
Profils
Forums
Calendrier
Blogs
Tout ce qui a été posté par vinz34
-
Bonjour, Je ne vais pas trop m'aventurer ce sur terrain glissant alors, merci pour cette info culture "G". Pour en revenir au sujet, j'ai une proposition : (defun c:vblat (/ e elist lst) (while (or (not (setq e (car (entsel "\nSélectionner un bloc :")))) (/= (cdr (assoc 0 (setq elist (entget e)))) "INSERT") ) ) (if (assoc 66 elist) (progn (setq e (entnext e) lst "") (while e (cond ((= (cdr (assoc 0 (setq elist (entget e)))) "ATTRIB") (setq lst (strcat (cdr (assoc 2 elist)) " : " (cdr (assoc 1 elist)) "\n" lst) e (entnext e))) ((= (cdr (assoc 0 (setq elist (entget e)))) "SEQEND") (setq e nil)) ) ) (alert lst) ) (princ "\nCe bloc ne contient pas d'attribut.") ) (princ) )
-
Salut, Ce n'est pas une erreur de manip, regarde ici
-
Salut Matt, J'espère que je ne t'ai pas blessé, c'est le triple 6 qui m'a inspiré. Pour Pascal, La solution est toute trouvée, tu l'as toi même donnée, elle est juste à réorganiser comme te l'a suggéré l'initiateur de ce sujet.
-
Bonjour et bonne année Lili, Il ne te manque qu'à mettre des [surligneur]guillemets[/surligneur] : Affclich [b]"[/b]C:\Users\Lilian\Desktop\Diaporama AutoCAD Exemple\plan PARKING-A1-1-200.sld[b]"[/b] Delai 3000 Affclich [b]"[/b]C:\Users\Lilian\Desktop\Diaporama AutoCAD Exemple\courbes de niveau.sld[b]"[/b] Delai 3000 Affclich [b]"[/b]C:\Users\Lilian\Desktop\Diaporama AutoCAD Exemple\DETAILl n°1.sld[b]"[/b] Delai 3000 Affclich [b]"[/b]C:\Users\Lilian\Desktop\Diaporama AutoCAD Exemple\DETAILn°2.sld[b]"[/b] Delai 3000 Affclich [b]"[/b]C:\Users\Lilian\Desktop\Diaporama AutoCAD Exemple\DETAIL3.sld[b]"[/b] Delai 3000 Rscript Bonne journée .
-
Bonjour et bonne année, Bravo pour cette initiative"El Diablo", je pense que nous sommes très nombreux à avoir besoin de recommencer sur de bonnes bases pour cette nouvelle année. Pour ma part, j'aurais suggéré un test de plus avec le entsel, à savoir s'il s'agit bien d'un bloc : ((defun c:bl_att(/ blatt) (while (not blatt) (setq blatt (entget (car (entsel "\nSélectionnez le bloc: ?")))) (if (/= (cdr(assoc 0 blatt)) "INSERT") (setq blatt nil))) ;;; la suite (princ) ) Je laisse la suite à Pascal.
-
Salut, Le problème vient justement de là dès qu'on a un facteur d'échelle sur un bloc dynamique et qu'on lui fait une rotation ou autre, on perd ses propriétés dynamiques.
-
Merci encore à bonuscad, Voilà le code adapté à mes besoins qui ne conservent que les échelles commencant le préfixe VD et non issues d'une Xref : (defun c:nettoie_échelles (/ lst) (while (setq ename (cdr (assoc 350 (dictsearch (namedobjdict) "ACAD_SCALELIST")) ) ) (progn (if (and (= "VD" (substr (setq scname (cdr (assoc 300 (setq elist (entget ename))))) 1 2 ) ) (/= "XREF" (substr scname (- (strlen scname) 3))) ) (setq lst (cons elist lst)) ) (vla-delete (vlax-ename->vla-object ename)) ) ) (setq i 1 x (strcat "Z" (rtos i)) ) (repeat (length lst) (setq n (nth (1- i) lst) dict (cdr (assoc -1 (dictsearch (namedobjdict) "ACAD_SCALELIST")) ) ent1 (entmakex (list '(0 . "SCALE") '(100 . "AcDbScale") '(70 . 0) (cons 300 (cdr (assoc 300 n))) (cons 140 (cdr (assoc 140 n))) (cons 141 (cdr (assoc 141 n))) ) ) ) (dictadd dict x ent1) (setq i (1+ i) x (strcat "Z" (rtos i)) ) ) )
-
Bonjour, J'ai des blocs dynamiques qui perdent parfoient leurs propriétés dynamiques après une rotation par exemple. Je retrouve en général ces propriétés en modifiant les échelles en x, en y, et en z dans la barre de propriétés. J'ai essayé par un entmod mais là je ne comprends pas, ce qui fonctionne sous autocad ne fonctionne pas en lisp... :P Quelqu'un connaît il une solution pour réinitialiser un bloc dynamique ?
-
Salut, Merci à toi bonuscad, tu m'as ouvert la voie sur le sentier que je vais explorer. Mes échelles personnalmisées comporrtent un préfixe qui me permet de les différencier, je vais donc me contenter de supprimer toutes celles qui n'ont pas ce préfixe.
-
Bonsoir Daniel. Je pense que (gile) t'as déja fait part de ses remarques sur "ACADDOC.LSP". Précisons quand même qu'il faut se le créer et ne pas utiliser celui d'autocad au cas où certains ne le sauraient pas. En fait ce n'est pas ce que je cherche, là tu restaure la liste par défaut que je supprime systématiquement. Ce que je cherche c'est purger ces échelles car je me crée les miennes et j'aimerais les conserver, ce qui n'est pas possible avec le scalelistedit. Merci quand même. [Edité le 18/12/2007 par vinz34]
-
Bonjour, Fervent utilisateur des échelles d'annotations,pour chaque nouveau dessin je me crée systématiquement mes échelles personnalisées et je supprime les standards (sauf le 1:1). Quand j'insère une Xref, je retrouve dans ma liste les "annoscales" de l'Xref... , je les supprime. Je réouvre mon dessin et je retrouve à nouveau ces échelles d'annotations. Quand on a plusieurs Xrefs ces listes sont sans fin !.... (ajd'hui près de 200 dans la liste ! ) Quelqu'un connaît il un moyen de purger les échelles d'annotations inutilisées ?
-
Salut, Je n'ai pas de LT 2006 pour tester mais essaye ça : ^C^C_layerp Edit : Désolé, j'ai testé sous LT 2008 la commande n'existe pas.
-
Salut, Ce n'est pas ce message qui provoque un pb d'impression, il est là pour t'avertir qu'il y a de nouveaux calques sur ton dessin que tu n'as peut être pas géré dans tes présentation. Quand tu vas dans ton gestionnaire de caque tu séléctionne les calques traités, puis click droit, rapprocher calque. Il ne t'affichera ce message que si de nouveaux calques ont été ajouté au dessin. (Xref par exemple) Edit : Je n'ai pas regardé dans l'aide mais je pense que tu y trouveras ton bonheur. [Edité le 27/11/2007 par vinz34]
-
Liste de fonctions d\'un lisp
vinz34 a répondu à un(e) sujet de vinz34 dans Pour aller plus loin en LISP
Chapeau bas (gile), je n'en demandais pas tant. Que dire de plus .... Merci à tous ceux qui ont participé à ce sujet. [Edité le 26/11/2007 par vinz34] -
Bonjour Jalna, Bien vu pour le fieldeval, le pb doit venir de là au moins pour Ludwig. FIELEVAL = 31 chez moi, c'est la valeur par défaut. Ca fonctionne parfaitement que ce soit dans un texte dynamique ou multiligne. Je confirme ma première réponse :
-
Bonjour Jalna, Bien vu pour le fieldeval, le pb doit venir de là au moins pour Ludwig. FIELEVAL = 31 chez moi, c'est la valeur par défaut. Ca fonctionne parfaitement que ce soit dans un texte dynamique ou multiligne. Je confirme ma première réponse :
-
Liste de fonctions d\'un lisp
vinz34 a répondu à un(e) sujet de vinz34 dans Pour aller plus loin en LISP
Merci à toi bseb67 c'est exactement ce que je cherchais. Je n'ai pas pour habitude de créer des routines avec arguments ça m'a un peu dérouté... Je l'adapte et je l'adopte !!! Eh vive les 35 heures ! :D -
Liste de fonctions d\'un lisp
vinz34 a répondu à un(e) sujet de vinz34 dans Pour aller plus loin en LISP
Bonjour à tous et merci pour vos réponses. Patrick_35 : Merci la solution que j'utilise depuis longtemps mais si je change la syntaxe d'une routine ou si j'en rajoute une il faut touours penser à aller modifier la liste manuelle. bseb67 : Je n'arrive pas à lancer ton lisp Je fais bien (listing_des_fonctions_simple ("nom_du_lisp.lsp")) ? Il me retourne : ; erreur: fonction incorrecte: "nom_du_lisp.lsp". bonuscad : Je ne saisi pas le fonctionnement ; à quel moment voit-on une liste des fonctions ? C'est que ce atomlst1.ori ? Je continue à chercher avec le lien que tu as donné. Matt666 : C'est toi qui te rapproche le plus de ce que je cherche à faire, mais ca me reourne : ; erreur: type d'argument incorrect: FILE nil. Je ne comprends je suis pourtant aller chercher un fichier qui se trouve dans les chemins de recherche de fichiers support d'Autocad. Encore merci pour votre participation. -
Bonjour, Est-il possible d'obtenir une liste des fonctions présentes dans un fichier lisp ? Je m'explique : J'utilise un fichier lisp chargé au démarrage qui contient les routines que j'utilise quasi quotidiennement, mais il m'arrive parfois de ne plus me souvenir de la syntaxe exacte d'une commande récemment créée par exemple. Je cherche donc un moyen de lister tout ce qui commence par un (defun c: J'ai bien pensé à un open_file et read_line mais je me suis heurté à bien des difficultés ! Si quelqu'un a une idée ...
-
affichage des cotes à l\'envers !
vinz34 a répondu à un(e) sujet de Martial dans AutoCAD Architecture
Tu as surement dans ton style de côtes pour les options de textes l'option d'alignement horizontal sélectionnée. -
affichage des cotes à l\'envers !
vinz34 a répondu à un(e) sujet de Martial dans AutoCAD Architecture
Salut Martial, C'est certainement parce que tu as tourné ton scu ou ton plan avant de faire tes cotations. Les textes de cotes sont alignés par défaut à ton scu. -
Salut Ludwig, Certainement une mise à jour depuis la 2006 alors, je travaille avec la 2008 et pas de pb.
-
Bonjour Jalna, Le champ date de tracé se met à jour au moment de l'impression. Si il affiche "---", c'est que le document n'a pas été imprimé depuis que tu as inséré le champ. Il s'affichera à la date du jour lorsque tu l'imprimera. Désolé je n'avais pas vu la réponse de Ludwig. Pour compléter sa réponse ça fonctionne aussi sur un texte dynamique. [Edité le 22/11/2007 par vinz34]
-
Salut Jpeg, Je pense que tu n'as pas du chercher trop longtemps. Il y au moins deux sujet récent qui répondent à ta question.
-
Viewer Autocad gratuit avec option \"mesurer\" ?
vinz34 a répondu à un(e) sujet de piloupilou dans Visualisateurs, annotation
Salut, Tu as le dwg true view q'autodesk qui est prévu pur ça. Il est disponible ici : http:// http://usa.autodesk.com/adsk/servlet/index?id=6703438&siteID=123112
