-
Qui est en ligne 3 membres, 0 anonyme, 40 invités (Afficher la liste complète)
Pour aller plus loin en LISP
Vous avez déjà écrit des programmes LISP? Vous souhaitez vous perfectionner? Vous butez sur un problème de programmation? Les termes de DCL, ActiveX, réacteur, compilation ne vous sont pas inconnus? Ce forum est pour vous.
1 363 sujets dans ce forum
-
- 0 réponse
- 2,1 k vues
-
- 0 réponse
- 1,6 k vues
-
- 0 réponse
- 1,7 k vues
-
- 0 réponse
- 1,7 k vues
-
- 0 réponse
- 461 vues
-
- 0 réponse
- 224 vues
-
- 0 réponse
- 288 vues
-
- 0 réponse
- 282 vues
-
- 0 réponse
- 322 vues
-
- 0 réponse
- 288 vues
-
- 0 réponse
- 282 vues
-
- 0 réponse
- 332 vues
-
- 0 réponse
- 369 vues
-
Statistiques des forums
-
Total des sujets49,5 k
-
Total des messages300,2 k
-
-
Sujets
-
-
Messages
-
Par Invité tugain with finasteride · Posté(e)
tretinoin ivermectin approved by fda An abdominal aortic aneurysm is a swelling in the wall of the part of the aorta which is the largest artery in the body that is found in the abdomen real propecia from canadian pharmacy -
Euh... désolé mais je viens de me rendre compte que j'avais déjà ouvert un post sur ce sujet.... -
Carrément pénible !!! C'est systématique quand tu veux éditer tes mises en plan. 1 coup tu as tes courbes de niveau qui se retrouvent derrière, ou tes projets, ou... Alors tu retournes dan ton espace objet et tu refais pour la Xème fois la manip ! Et 2 minutes après rebelote ... En SIG c'est vrai qu'il n'y a pas ce problème mais ce n'est pas le même usage non plus 😉
-
Bonjour, Il est vrai que c’est frustrant ce problème d'arrière-plan qui se modifie souvent. Quand tu passes d'AutoCAD à un vrai logiciel de cartographie (Qgis) où l'ordre d'affichage est toujours respecté, c'est compliqué de revenir sur un logiciel de DAO. Fabcad Le Rennais Métropolitain
-
Moi j'utilise ce lisp dans certaines conditions et ça marche pas mal. Je ne sais plus où je l'ai récupéré 😉 ;; SOUSTRAC (gile) ;; Effectue une soustraction de régions ou solides 3d sans faire d'union ;; Propose de supprimer ou de conserver les objets soustraits (defun c:soustrac (/ *error* ss1 ss2 n lst) (vl-load-com) (or *acdoc* (setq *acdoc* (vla-get-activeDocument (vlax-get-acad-object))) ) (defun *error* (msg) (and msg (/= msg "Fonction annulée") (princ (strcat "\nErreur: " msg)) ) (vla-EndUndoMark *acdoc*) (princ) ) (princ "\nSélectionnez les solides et les régions à enlever de .." ) (if (setq ss1 (ssget '((0 . "REGION,3DSOLID")))) (if (and (princ "\nSélectionnez les solides et les régions à soustraire .." ) (setq ss2 (ssget '((0 . "REGION,3DSOLID")))) ) (progn (vla-StartUndoMark *acdoc*) (repeat (setq n (sslength ss2)) (setq lst (cons (vlax-ename->vla-object (ssname ss2 (setq n (1- n)))) lst ) ) ) (repeat (setq n (sslength ss1)) (setq obj (vlax-ename->vla-object (ssname ss1 (setq n (1- n)))) ) (foreach o lst (and (= (vla-get-ObjectName obj) (vla-get-ObjectName o)) (vla-Boolean obj acSubtraction (vla-copy o)) ) ) ) (initget "Oui Non") (if (= "Oui" (getkword "\nSupprimer les objets soustraits [Oui/Non] <N>: ")) (mapcar 'vla-delete lst) ) (*error* nil) ) ) ) )
-
-
Sujets
-
