lecrabe

Bonjour Tu regardes les propriétés du style de texte utilisé dans ton type de ligne complexe ! Barre de menu: Format / Style de Texte ... Le Decapode "content"

ReBonjour SORRY, la routine de GIlles est mille fois mieux ! Elle traite tous les cas - Bravo - Bravo Le Decapode (en retard d'une guerre)

Bonjour Il faut vérifier que ton style utilisé n'est Ni Reflété, Ni Renversé ! Et c'est peut être la routine Lisp qui déconne à mon avis ... :o Sinon en voici une que j'utilise de temps en temps (Merci à Olivier) ;;; ;;; ATTENTION: Cette Routine ne traite pas les polylignes SPLINEES OU LISSEES ;;; (defun c:invsens2() (if (or (null (setq v0 (ssget '((0 . "LWPOLYLINE"))))) ( ) (exit) ) (command "annuler" "m") (setq v10 0) (while ( (setq v1 (ssname v0 v10)) ; parcours pour récupérer les points (setq v2 (entget v1 '("*")) v3 nil v4 nil) (foreach v5 v2 (if (= (car v5) 10) ; point (setq v3 (append v3 (list v5))) (if (= (car v5) 42) ; rayon de courbure (setq v4 (append v4 (list (cons 42 (* -1.0 (cdr v5)))))) ) ) ) ; inversion (setq v3 (reverse v3) v4 (reverse v4)) ; bidouille pour remettre dans le bon ordre les rayons de courbure (setq v9 (car v4) v4 (append (cdr v4) (list v9))) (setq v6 nil v7 0) (foreach v5 v2 (if (= (car v5) 10) (setq v6 (append v6 (list (nth v7 v3)))) (if (= (car v5) 42) (setq v6 (append v6 (list (nth v7 v4))) v7 (1+ v7)) (setq v6 (append v6 (list v5))) ) ) ) (entmake v6) (entdel v1) (setq v10 (1+ v10)) ) (command "annuler" "f") (princ) ) Le Decapode (inversant)

Hello Pour les développeurs du genre (Patrick_35, Gilles, etc), vous avez des trucs intéressants ici (A mon avis): http://www.4d-technologies.com/techcenter/ C'est du Free Stuff :) Le Decapode "farfouillant"

Re Bon Matin J'avais seulement environ 1/3 de tes routines Patrick_35 Encore BRAVO BRAVO ! :D Par contre, j'ai pas trouvé la routine qui fait le CAFE !!! :o :( Le Decapode "matinal au café"

Bon Matin Qq mots : Merci, Tip-top, Excellent, Beau Boulot, etc :) :D :cool: Le Decapode "faisant son marché mais mon caddie est déjà bien rempli"

Bonsoir Je viens seulement de découvrir que Autodesk avait mis en ligne (surement depuis longtemps) une sorte de calculatrice pour faire des conversions d'unité ! http://usa.autodesk.com/adsk/servlet/index?siteID=123112&id=2758888&linkID=2475161 Quand on voit tout ce qui est DISPO dans ce domaine sur le Web, je trouve ça un peu ringard et inutile ... Qui s'en sert ??? Le Decapode "curieux"

ReBonsoir Didier Donc d'apres les boys de GEOMEDIA, ce problème de XREF proviendrait éventuellement de COVADIS et/ou du Dotnet Framework 2.0 qui s'installe obligatoirement avec la 2007 !? Sur mon poste j'ai AutoCAD 2007 + MAP 3D 2007 et idem en 2006, je n'ai pas de problème particulier avec les XREFs mais je n'en fait pas un usage intensif comme toi !! :P Cependant j'ai fait ton test de Décharger, Recharger, Détacher, Re-attacher, etc dans la même session ou autre session de travail avec AutoCAD / MAP 2007 sans bug ! :) Pour une fois que le Decapode est chanceux !!! ;) Le Decapode "lucky"

Bonsoir Didier Un Didier "hors sujet" c pas possible ! :P Il manque la pointe habituelle d'humour , je suis déçu ... :D Le Decapode "rigolard"

Bonsoir Eh OUI, il ne faut surtout pas avoir un vieux schnok dans l'équipe de développement car il pollue les idées géniales des jeunes développeurs de pointe ! :o Pour faire de belles choses innovantes, certains "managers" pensent qu'il faut toujours faire table rase du PASSE !! :( C'est assez classique du développement informatique aujourd'hui ... :exclam: Heureusement que dans la mécanique / batiment, on construit encore pour moultes années (voire même plusieurs décennies) avec maintenance / evolution relativement compatible avec le projet de départ !? La 2007 commence à m'énerver sérieusement !!! :o Ou alors il est temps que je prenne ma retraite, je (NOUS) ne suis plus dans le coup !!! Le Decapode "qui pique sa crise"

Re Gilles A propos Félicitations pour l'utilisation du M-TEXTE de largeur NULLE ! Pour BEESHOP, utilise plutot la nouvelle mouture du programme Lisp de Gilles, elle me semble parfaite !!! Le Decapode "que l'on bouffe avec de la Mayo et un bon petit vin blanc" PS: Enfin je pense que c'est surtout Gilles qui "me boufferait" ...

Hello Gilles Je savais bien qu'il fallait t'aiguillonner un petit peu ... ;) Ca marche SUPER NICKEL CHROME, y compris sur un AutoCAD 2002 !!! :) :D :cool: Tu es le MEILLEUR sur TOUTES les versions d'AutoCAD !!! ;) Le Decapode "aiguillonnant" PS: Je t'octroie génèreusement 19.9 / 20 pour ce développement ! :P

Bonjour Désolé Gilles, mais ça ne passe pas même avec un CHR(10) ou CHR(13) pour rigoler ! :P Donc je suis obligé de te noter à 19/20 seulement ... Peut mieux faire !!! :) J'ai essayé la nouvelle version = IDEM Le Decapode (en recherche de la perfection) PS: En tant que Marseillais, si tu allais faire une pétanque avec un bon Pastis ! :D je suis sur que cela t'éclaircirait les idées !!! :cool:

Bonjour Wharf, wharf, Je vais pouvoir "raler" après (gile) pour sa routine qui déconne ! :) En fait sa routine est OK depuis AutoCAD 2004 jusqu'à AutoCAD 2007 = BRAVO :D Mais elle ne marche pas "complètement" avec un AutoCAD 2002 ou Inférieur !!! :o (setq txt (strcat txt (cdr (assoc 2 clq)) "\n") A cause de cette concaténation avec \n qui n'est pas interprété correctement par un vieux AutoCAD 2002 !!! ;) ;) ;) Tous les noms de calque sont sur la MEME ligne ! Youpee, Youpee, j'ai trouvé un micro-bug dans la routine de (gile) :exclam: :exclam: Le Decapode "chiant et critiquant et ralant"

Bonjour Eh OUI, c'est là que l'on voit la classe et surtout l'efficacité de Gilles ! Je ne suis pas développeur ... I am sorry ! Ton code est superbe et CONCIS Gilles !!! Le Decapode "admiratif"

Re Si tu avais utilisé Google avec les mots clés suivants: layer list autolisp autocad tu aurais trouvé assez vite la routine AutoLisp qui suit ... Elle écrit dans un fichier Texte la liste des calques de ton dessin avec toutes leurs caractéristiques (en Anglais, je sais) ! Il suffit après de reprendre le fichier Texte dans Excel ou dans le Notepad.exe pour faire un Copier : Coller vers un Nouveau M-Texte dans AutoCAD ! Commande pour lancer la routine: LLFP !!! J'espère que le BBCode ne m'a pas bousillé mon Copier / Coller !!! ;;; Layer-list ;;; ;;; By Jimmy Bergmark ;;; Copyright © 1997-2006 JTB World, All Rights Reserved ;;; Website: www.jtbworld.com ;;; E-mail: info@jtbworld.com ;;; 2000-03-15 ;;; ;;; c:llfp ;;; Save the layer list to a file, (can be imported to Excel) ;;; ;;; Example: (ax:layer-list) ;;; Return values: list of layers and all layerstates ;;; ( ;;; ) (defun ax:layer-list (/ lst layer colors color lw) (setq colors '("Red" "Yellow" "Green" "Cyan" "Blue" "Magenta" "White")) (vlax-for layer (vla-get-Layers (vla-get-ActiveDocument (vlax-get-acad-object) ) ) (setq color (vla-get-color layer)) (if ( (setq lw (vla-get-lineweight layer)) (if (= lw -3) (setq lw "Default") (setq lw (rtos (/ lw 100.0) 2 2))) (setq lst (cons (list (vla-get-name layer) (if (= (vla-get-layeron layer) :vlax-true) "On" "Off") (if (= (vla-get-freeze layer) :vlax-true) "Frozen" "Thawed") (if (= (vla-get-lock layer) :vlax-true) "Locked" "Not locked") color (vla-get-linetype layer) lw (vla-get-plotstylename layer) (if (= (vla-get-plottable layer) :vlax-true) "Plottable" "Not plottable") (if (= (vla-get-viewportdefault layer) :vlax-true) "Frozen" "Not frozen") ) lst)) ) (vl-sort lst (function (lambda (e1 e2) ( ) ) ) ) ;;; Writes layer list to specified file ;;; (layer-list-fprint "test.txt") ;;; return: T if file was created, else nil (defun layer-list-fprint (fn / f row col) (if (setq f (open fn "w")) (progn ; print header (princ "\"Layer Name\" \"On\" \"Frozen\" \"Locked\" " f) (princ "\"Color\" \"Linetype\" \"Lineweight\" \"Plotstylename\" " f) (princ "\"Plottable\" \"Viewportdefault\"\n" f) (foreach row (ax:layer-list) (foreach col row (prin1 col f) (princ " " f) ; for tabulated (princ "\t" f) ) (princ "\n" f) ) (close f) T ) nil ) ) (defun c:llfp (/ fn) (if (setq fn (getfiled "Save layer list as" (strcat (vl-filename-base (getvar "dwgname")) ".txt") "txt" 1 ) ) (if (layer-list-fprint fn) (princ "\nLayer list created.") (princ "\nError: Layer list not created!") ) ) (princ) ) Le Decapode "farfouillant"

ReCoucou Que veux tu exactement ? Un programme Lisp qui récupère la liste de tous les calques de ton dessin et qui génère automatiquement par exemple un superbe M-TEXTE avec la liste en question ? La liste manuelle dans l'Ecran Texte d'AutoCAD évoqué dans ton sujet précédent ne te suffit pas ? Ou bien ai je RIEN compris à ta demande ? Le Decapode

hello Tu tapes au clavier "-calque Entree" puis "? Entree" puis Entree ! ( C'est à dire le signe MOINS suivie de CALQUE ) Et après tu fais un copier /coller de l'écran texte AutoCAD !! Comprendo ? El Decapodo

Bonjour Merci Maître Bonuscad, c'est VRAi qu'il est mignon ! :) ( Je parle du TGV bien sur et non pas de Bonuscad ! ) Le Decapode PS: Félicitations à notre contributeur AXX !!! :D :cool:

Bonjour Did OK je comprend ... Mais moi, je n'ai pas Covadis donc voilà pourquoi je n'ai pas le problème ! Good luck, Le Decapode

Bonjour Désolé mais je n'arrive pas à charger ce TGV dans mon AutoCAD 2002 ou 2004 ou 2006 ! Voici l'erreur >>> Commande: _3DSin Initialisation de Render... Initialisation des préférences...terminé Traitement de l'objet ALUMINIUM en cours e Conversion du matériau ALUMINIUM0 Traitement de l'objet BLACK en cours Conversion du matériau BLACK0 Erreur interne numéro 8 - Importation de fichier 3D Studio terminée Quelqu'un a t-il réussi ? Si OUI, qu'il m'explique SVP les options subtiles qu'il a choisi lors de l'Import 3DS ! Merci d'avance, Le Decapode "dépité"

Bonsoir Ton problème est surement un problème AutoCAD en général, il n'est pas lié en principe au fait que tu possèdes la version MAP d'AutoCAD ... Tu as donc un magnifique HP DesignJet 4500 PS, c'est à dire avec PostSCript ! Cela fonctionnait il AVANT ? ou bien n'as tu jamais réussi à paramétrer un format personnalisé ? As tu installé le driver HPGL2 de ton HP DesignJet EN PLUS du driver PostScript ? Car AutoCAD désire (ou plutôt préfère) le driver HPGL2 et non pas le driver PsotScript ! Dans l'attente de tes réponses, Bonne soirée ! Le Decapode "qui n'est pas toulousin"

Bonsoir Christ Tu parles de quelle version d'AutoCAD svp ? De la 2007 spécifiquement ?? Le Decapode [Edité le 7/8/2006 par lecrabe]

ReBonsoir Mr Tramber Je m'incline "bien bas" Oh Toi Le Très Grand Maître Suprème du SCRIPT !!! :) Que la félicité absolue daigne t'honorer durant ta longue et heureuse vie !!! :D Le misérable crabounet que je suis te salue HUMBLEMENT :cool: [Edité le 7/8/2006 par lecrabe]

Bonsoir Maître Tramber Absolument, cela dépend de chaque Fenêtre !!! :o Par exemple: PSLTSCALE = 0/1 Cette variable peut aussi être différente dans chaque Mise en Page / Présentation J'ai résolu ce problème pour un collègue ... C'est un Super-Piège !!! :( Le Decapode