PPI

Bonjour à tous, voila je veux sélectionner des lignes et et qu'un cercle soit dessiné aux intersections de toutes ces lignes. Pour la sélection des lignes, pas de prob, pour trouver les intersections pas de prob mais c'est pour prendre la 1ere ligne et le 2eme et qu'il cherche une intersection, alors là !!!! et je veux qu'il compare toutes les lignes pour trouver toutes les intersections !!! pouvez vous m'aider, svp Merci beaucoup. ci dessous mon p'tit code ... c'est au moment du traitement de ma liste de ligne 'ss' que j'ai du mal (princ "\nSélectionner les lignes : ") (setq ss (ssget '((0 . "line")))) (setq XP1 (car P1));renvoie le X du point1 (setq XP2 (car P2));renvoie le X du point2 (setq YP1 (cadr P1));renvoie le Y du point1 (setq YP2 (cadr P2));renvoie le Y du point2 (setq ZP1 (caddr P1));renvoie le Z du point1 (setq ZP2 (caddr P2));renvoie le Z du point2 (setq pt (inters XP1 YP1 ZP1 XP2 YP2 ZP2))

Bonjour à tous, Je voudrais savoir comment on trouve toutes les intersection d'une sélection de lignes pour pouvoir y insérer (aux intersections) un bloc !!! Et avant d'y insérer mon bloc je voudrais que mon SCU soit orienté suivant les deux lignes qui font l'intersection. 1) Sélection des lignes 2) Recherche des intersections 3) List des intersections (points) 4) SCU parrallele aux 2 lignes de l'intersection trouvée 5) Insertion de mon bloc à cette intersection 6) Retour à 2) je sèche grave .... Ca fait vraiment trop longtemps que je n'ai plus fait de Lisp, j'ai beau chercher des bouts de progs dans tout vos messages, j'ai vraiment du mal à m'y remetre ... merci à vous pour votre aide ...

Hiiii pinaize ... merci beaucoup beaucoup beaucoup. Je vais maintenant l'adapter. encore Merci

exact, en gratouillant un peu à droite et à gauche, j'avais trouvé l'expression (vl-load-com). je te remercie beaucoup, cela m'a vraiment fait avancer dans le bon sens. Alles un autre défi ? voila je voudrais que mon bout de prog sélectionne tout les cylindres dans mon dessin pour en faire une liste que je pourrais transformer en fichier texte. as-tu une idée ? j'ai planché dessus cette nuit jusqu'a au moins 2H du mat, en Lisp, je pourrais y arriver, mais 'entsel' ,e reconnais pas les objets 'cylindre' ... à moins que je me trompe de commande .... a+ et merci encore .... voila mon p'tit bout de prog : (defun c:lg () (if (and ;; sélection du solide (setq cyl (car (entsel "\nSélectionnez un cylindre: "))) ;; transformation du nom d'entité en objet vla (setq cyl (vlax-ename->vla-object cyl)) ;; l'objet est bien un solide 3d (= (vla-get-ObjectName cyl) "AcDb3dSolid") ;; l'objet est bien un cylindre (primitive) (= (vl-catch-all-apply 'vla-get-SolidType (list cyl)) "Cylindre") ) (setq ;; hauteur du cylindre ht (* 2 (distance (vlax-get cyl 'Position) (vlax-get cyl 'centroid))) ;; diametre du cylindre diam (* 2 (sqrt (/ (vla-get-Volume cyl) (* pi ht)))) ) (princ "\nEntité non valide.") ) (setq calque (cdr (assoc 8 (entget (car (entsel)))))) (princ) (prompt "\nRepere ligne = ") (princ calque) (princ) (prompt "\nDiamètre = ") (princ diam) (princ) (prompt "\nLongueur = ") (princ ht) (princ) )

merci beaucoup gile, mais je ne suis déja pas bien fortiche en Lisp mais le Vlisp encore moins .... j'ai trouvé comment charger le fichier déja !!! mais il me met une erreur apres la sélection du cylindre : Sélectionnez un cylindre: ; erreur: no function definition: VLAX-ENAME->VLA-OBJECT ???!!!???!!! en tout cas merci quand mème ...

excellent, merci de cette aide précieuse .... autrement si quelqu'un saurait comment extraire le rayon d'un cylindre en LISP ... ca serait sympa a+

rebonjour, j'ai trouvé une solution (grace a vous), il faut que j'extrais le volume de mon cylindre, et vu que je connais le rayon de celui ci, je peux tres facilement en déduire ma longueur de tube. par contre comment faire pour réussir à récupérer le diametre ou rayon de mon cylindre ? merci

bonjour et merci, je retrouve bien ma longueur de cylindre en faisant comme vous dites, mème si pour mes constructions de tube je change tres souvent de SCU. Je trace d'abord mon axe de tube (bien sur il peut avoir différente orientation de SCU), puis j'oriente mon SCU Z suivant mon axe de tube et enfin je dessine mon cylindre. Donc grace à votre méthode, en revenant dans le SCU Z de mon tube je retrouve bien ma longueur. Par contre j'aimerais savoir maintenant comment retrouver le SCU de mon tube lors de sa création de tel maniere à traiter en automatique tout cet ensemble. en gros : 1)sélection du cylindre 2)quel SCU lors de la crétion de mon cylindre 3)ensuite PROPMECA pour trouver la longueur de mon/mes cylindre Merci encore pour cette réponse tres utile.

Bonjour a tous, je bute sur un truc (tout bete), je cherche à avoir la longueur d'un cylindre 3D créé par la commande autocad : 'cylindre'. auriez-vous une solution ? merci beaucoup ...

J'ai essayé en activant l'openGL, en reglant au minimum Surface tesselation et curve tesselation, et là hoooo miracle le style visuel Realistic est fluide en faisant un 3Dorbit, le plan n'est pas trop lourd pour l'instant, reste à voir plus tard une fois les moteurs ajouté ainsi que les tuyauteries. Merci pour les infos ... a+

merci pour les réponses, c'est bien ce que je pensais. Par contre je trouve Autocad lent, tres lent par rapport à Microstation (oupsss désolé) concernant l'affichage, j'ai vue des plans 3D assez lourd tres bien tourné sous Microstation et presque les mèmes plans ramer sous Autocad lorsque que l'on travaille en cacher ou rempli (style visuel : conceptual). Je trouve cela dommage car c'est un gros point faible d'Autocad par rapport à Microstation, ou alors je règle mal les parametres d'Autocad (ma carte graphique est certifié 3D par Autodesk, mes drivers aussi). ca me désole un peu... à moins que quelqu'un une solution ?

Salut à tous, petite question aux tres pros d'AutoCad (toutes versions), je dessine pas mal de plan d'installation en 3D, et je voudrais savoir ce qui est moins lourd la 3D surfacique et volumique ? merci de vos réponses

Bred : non il n'est pas planté mais il met du temps, je suppose que autocad affiche la p'tite fenetre en 3D wireframe, voila pourquoi il met du temps (supposition). J'ai geler 95% des calques dans la fenetre ou je fais le 3dclip, et maintenant c'est beaucoup plus rapide. Tramber : oui regen fait avant de lancer la commande. Sachant que c'est une instal d'usine, peut etre est-ce dû à mon plan de fond qui est tres grand ??? j'ai fait une capture d'écran mais je ne sais pas comment l'attaché avec ma réponse ?? merci de vos réponses. Paul

salut à tous, j'ai un p'tit probleme avec la commande 3dclip, j'ai réalisé une installation 3D en tuyauterie en utilisant des xref (jusque là, rien de bien extraordinaire). Je veux maintenant utiliser la commande 3dclip pour montrer certain détail, faire des vues ... enfin ce genre de choses là. Je lance donc ma commande, la petite fenetre s'affiche, ca met un certain temps, pourtant je suis assez bien monté, si je peux me permettre : carte NVIDIA 256Mo (reconnu par Autocad pour la 3D), disque 7200 tr/mn, 1Go de ram, 4096 Mo de swap, processeur 2Gh, y a mieux mais c déja pas mal. Donc je lance ma commande, la petite fenetre prend sont temps pour s'afficher (1min), là je veux faire un zoom + pour mieux voir ou je vais poser mes délimitations et cette con....... de fenetre ne me fait pas le zoom +, pourtant j'ai l'impression qu'elle travaille mais pas de zoom + !!! le zoom - pas de prob mais pas le zoom +. Quelqu'un aurait une réponse, SVP .... merci