Bred

Salut, et bienvenue ! Tu va en espace papier (ou présentation) Tu crées une fenêtre pour chaque vue, et dans chaque fenêtre tu tourne ta vue dans le sens que tu veux (vue de gauche, droite, haute, etc...)

Salut, personnellement j'ai beaucoup chercher quel logiciel "3D" était le plus performant pour mon métier. j'ai testé SolidWorks, TopSolid, Inventor... pour me rendre compte qu'aucun ne pouvais vraiment faire ce qu'Autocad prposais : de vrais mise ne plan 2D rapide. Si tu ne fais pas de la Conception (CAO), tous ces logiciels ne sont pas pour toi. Si tu fais de la 3D pour sortir au final un plan d'exécution 2D de gros ensembles de pièces, avec Nomenclature des blocs insérer, etc... un seul mot : AUTOCAD, avec plein de petit programme perso et une recherche de méthodologie pour rendre sont travail performant (sans oublier les paramétrages 3D d'Autocad.)

Salut, Les commandes express sont à installer "en option" à partir du CD (DVD) d'installation d'Autocad. La manière la plus simple pour les dernière versions est d'insérer le CD, d'aller dans démarrer / panneau de config / Ajout-suppression de prog, de choisir Autocad et de cliquer sur Modifier/supprimer.

oui oui, c'est ce que j'écris, c'est logique. Mais je ne m'étais jamais aperçu de ça. Et j'étais en train de faire un programme basé sur de attributs dans des blocs imbriqué, et je ne comprenais pas pourquoi tous mes blocs se mettait à jour. Maintenant je comprends. Je trouve ça logique. Mais tous mon prog est à mettre à la poubelle !!!!... :P

Salut, Un truc idiot dont je viens de m'apercevoir : Vous avez un bloc avec un attribut modifiable.... Ce bloc, vous en faites un blocs imbriqué avec autre chose... Ben si vous copiez ce bloc, et que vous voulez changer la valeur de l'attribut pour l'un, vous pouvez le faire grâce à l'éditeur de bloc... Et là, oh surprise ! Tous les attributs des autres blocs identiques sont modifiés !!!!! Il met à jour les autres blocs, mais bien sûr, la valeur de l'attribut aussi !!!!! C'est logique, mais pas sympa... :P

Un régime...

En effet ! Mais Autocad n'a pas pour but premier de faire de la conception. C'est tous d'abord pour faire du DAO ! J'ai testé des logiciels de conception pour ma branche professionnel, aucun n'ont pu réaliser ce que j'arrive à faire avec la 3D d'Autocad. En effet les logiciels de conception sont tip-top pour faire des pièces unitaires (voir un petit assemblages d'un centaines de pièces), avec des outils super performant de colision, de mouvement, etc... Mais dès qu'il sagissais de mettre en oeuvre plusieurs milliers d'éléments, et surtouts de mettre cet ensemble en mise en plan 2D, AUCUN n'y est arrivé (plantage ou temps de réaction trop long). Ben tiens, je n'avais pas testé cette commande depuis longtemps car elle ne prenais pas en compte les blocs... Je viens de la tester sur 2009, elle fonctionne sur les blocs (même imbriqués !) Bon... faut pas qu'ils soient trop compliqués (j'e fait planté Autocad sur un bloc à chaque fois...) [Edité le 11/7/2008 par Bred]

Salut (gile), Super astucieuses tes méthodes !

Ben tiens, c'est marrant... Je m'étais refusé d'utiliser "reverse" car je pensais que cette fonction pouvais être "lente", et au vu de ton Deb_Pat2, ça dépote sec !!!!.. :o

Re, Comme le dit Lili2006, Autocad fait de la 3D "tous seul", " comme un grand"... Affiche toi les barres d'outils "Modélisation", "Edition de Solide", "Orbite", "Style Visuel", "Navigation 3D", "Rendu", "Lumières", etc... Tu trouveras certainement ton bonheur ! Après, si tu as des questions pour réaliser certaines choses, n'hésite pas à poser des questions !

Salut, Désolé de ne pas avoir répondu, mais au boulot je ne peux charger tes codes... Je l'ai fait chez moi hier soir, et quand je l'ai testé ici au boulot, je me suis rendu compte que c'était l'ancienne version... j'ai du faire une fausse manip... Donc, je n'ai toujours pas tester la version 2, je verrais ça ce soir. Vraiment désolé ! :exclam:

Salut, et bienvenue ! Si tu veux garder des points en mémoire, crées en toi une liste. Mais si tu postais ton code, ce serais plus facile de te répondre...

Salut, Je ne comprends pas ta question. Les outils proposés ne te suffisent pas ? Que veux-tu faire ?

merci, en effet, ENCORE une étourderie.... :mad2: décidément, faut que je sois plus attentif en ce moment....

Salut, bon, on est jeudi, je poste mes codes, et ça tombe bien que je sois le premier parce qu'ils ne sont pas du tous élaborés... (et puis je suis allez un peu vite) : ; Début de liste jusqu'au n'ème élément de la liste (defun deb_Bred (lst n / l) (repeat n (setq l (append l (list (nth 0 lst))) lst (cdr lst))) l ) ; Fin de liste partir du n'ème élément de la liste (defun fin_Bred (lst n / l i) (repeat (- (setq i (length lst)) (1- n)) (setq l (cons (nth (setq i (1- i)) lst) l) n (1+ n))) l ) ; insert un élément après le n'ème élément de la liste (defun sub_Bred (lst lst-I n) (append (deb_Bred lst n) (list lst-I) (fin_Bred lst (+ n 2))) ) [Edité le 10/7/2008 par Bred]

Re, Test cela ci-dessous. Je t'ai re-écris ton lisp en gardant tes (command... , mais en changeant la logique de traitement, afin de te montrer l'utilisation de certaines fonctions, et d'une certaines manière pour réaliser des boucles (il y en a d'autres...) Si tu as besoin d'explication, n'hésite pas. (Defun C:transvue (/ FEN I LST-LAY THISTAB) (setq lst-lay (layoutlist) THISTAB (getvar "CTAB")) (repeat (setq i (length lst-lay)) (setvar "CTAB" (nth (setq i (1- i)) lst-lay)) (setq fen (vports)) (foreach n fen (if (not (equal (car n) 1)) (progn (command "_.MSPACE") (setvar "CVPORT" (car n)) (command "_.UCS" "_W") (command "-pan" (list 0 0 0) (list -617592.5171 -144913.5211 0)) (command "_.DVIEW" "" "_TW" -5 "") (command "_.PSPACE") ) ) ) ) (setvar "CTAB" THISTAB) (princ) )

Merci, mais je ne me mets pas au niveau des pré-cités... je suis encore brouillon et je manque de précision (la preuve : la longueurs des posts ou je propose mon aide...) mais j'essaye de me corriger...

Re, bon, c'est bon, ça doit fonctionner maintenant (version 1.1) Grâce au dernier test on peux s'apercevoir que sous 2005 il n'y a pas de XEFFECTIVESCALEFACTOR... (et ve savoir pourquoi je prenais "l'effective"...) Et comme le X à l'air aussi bizarre, je prends le Y. oran et grand_sapin, si vous pouvez tester le dernier svp, normalement ça doit fonctionner... Pour info, lorsque vous avez des lisps qui ne fonctionnent pas, retournez bien ce qu'il y a marqué en ligne de commande : le message de grand_sapin met le doigt sur le bug.

:casstet: :casstet: :casstet: C'est quoi ce bordel ? Tu as cette erreur là aussi oran ? 1 - Vu ce que vous me retournez, ce n'es pas ce que je pensais au sujet des fenêtres (calque et verrouillage présent en 2005) Vous pouvez éditer vos message pour enlever les résultats, c'est pas ça (et ça éviteras de mettre le désordre dans le post) 2 - Vous pourriez charger ça, sélectionner un bloc, et me dire ce que ça retourne svp ? (defun c:test () (vlax-dump-object (vlax-ename->vla-object (car (entsel "\n Sélectionner bloc :")))) (command "ecrantxt") )

Re, As-tu regarder dans l'aide du développeur les fonctions que je te donnes plus haut ?...

Salut, Vu qu'a la dernière modif j'avais récupéré le calque et le verrouillage de la fenêtre existante, j'ai chuinter le truc pour la version avant 2006. J'ai éditer le code ci-dessus, chez grand_sapin et oran cela doit maintenant fonctionner... Mais, ceux qui ont une version 2005, dans votre fichier test, pourriez-vous lancer ceci et me retourner ce que cela dit svp ? merci ! (defun c:test (/ A-P ACDOC I LAYS ONG-BASE) (setq AcDoc (vla-get-activedocument (vlax-get-acad-object)) layS (layoutlist)) (if (> (length layS) 1) (progn (princ "\n Copie configuration traceur d'onglet Existant. \n Plusieurs Présentations détectées.") (while (not ong-base) (princ "\n") (repeat (setq i (length layS)) (princ (strcat (nth (- (length layS) i) layS) " * ")) (setq i (1- i)) ) (setq ong-base (getstring t "\n Présentation d'où la configuration du traceur sera récupérée :")) (if (not (member ong-base layS)) (setq ong-base nil))) ) (setq ong-base (car layS)) ) (setq a-p (vla-item (vla-get-layouts AcDoc) ong-base)) (vla-put-ActiveLayout AcDoc a-p) (vlax-for e (vla-get-paperspace AcDoc) (if (equal (vla-get-ObjectName e) "AcDbViewport") (vlax-dump-object e t) ) ) (command "ecrantxt") ) [Edité le 9/7/2008 par Bred]

Re, re, Je crois que je me suis mal expliquer (et ce n'est pas pour me défausser...mais ça m'arrange bien) : Je ne parle pas de geler des calques en EO, mais de ne pas afficher dans la liste des calques de ta boite de dialogue les calques qui sont "vraiment" gelé, (puisque ils ne sont pas afficher dans les fenêtres d'office)... et ceci en cochant une case à cocher pour afficher ou non l'ensemble de ces calques. et, en plus

Salut winfield, merci pour ta suggestion, mais j'avoue que j'ai pas mal avancé sur le truc, et j'ai contourné le problème.. Mais je jetterais un coup deuil sur ta proposition.

Re, Va voir dans l'aide la fonction length (et tant que t'y est, sslength)

Re, Patrick_35 Une idée pour GEF : Je crois que tu as eu des remarques sur la longueurs de la BD pour les calques (ce n'est pas le cas chez moi, mais c'est pour le plaisir de te faire travailler.... ;) ) Ne penses-tu pas qu'il serait intéressant d'avoir en option (case à cocher) la possibilité de ne pas afficher les calques gelés en EO ? (voir deux autres supplémentaires : n'afficher que les gelés ou que les dégelés dans les fenêtres...)