Bred

Salut, c'est que ta forme n'est pas fermée : tu n'extrude pas une surface, mais des lignes. Il faut que tes polylignes soient jointes (pour n'en faire qu'une pour 1 objet), et fermée.

Salut, merci (gile). un "détail" : ne serait-il pas logique de rendre "incochable" les calques déjà gelée "normalement". Car si ils ont été gelé (en EO+EP), il y a forcément une raison qui rends inutile (et non logique) la possibilité de le rendre gelé uniquement en EO...

re, tu as testés les routines que je te donne dans mon messge précedent ? je les utilises continuellement, et elles fonctionnent trés bien....

Salut, tu trouvreas des routines lisp ici.

Salut, je ne sais pas si j'ai bien compris. Tu peux dire à Autocad d'ouvrir n'importe quel dessin ou gabarit au démarage dans les options / fichiers supports... Dans cette boite de dialogue, tu peus aussi changer le chemin du gabarit l'orsque tu fait "nouveau dessin" (RAPNOUVEAU).

Salut Patrick_35 hein ??? ;) je suis completement largué en réacteur !.... J'ai juste recopié un bout de code présent dans le lisp de (gile) et qui me semblait lancer la mise à jour de l'outils (et ça marche...) Donc, ce que tu m'expliques, et je l'avoues sans honte, c'est du chinois pour moi !... quand j'en serait arrivé au niveau des réacteurs (et j'ai encore beaucoup de chose à comprendre) j'en serait trés heureux.... Richard-c : Ben ça ne peux pas fonctionner alors.... Il faut charger obligatoirement le lisp au demarrage vu que ça fait appel au lisp....

non, tu le mets tout en bas des lisp de (gile), sans (defun ...) afin que cela se charge au demarrage.

Re, J'ai copier/coller ça pour que ça se charge en direct : merci de me confirmer si je ne fais pas d'erreur. (setq *GelerOngletObjet* (vlr-command-reactor nil '((:vlr-commandWillStart . gelobjstart) (:vlr-commandEnded . gelobjend) ) ) )

Re, Ben ça va trés loin !... Comme je dois tester beacoup de données, ma liste est souvent longue, et je me retrouve à attendre.... attendre.... que toutes les combinaisons soient finis.... ex : (defun c:ttt () (combinaisons '(a b c d e f g h i j k l m n)) ) Donc je voudrais interrompre le calcul à chaque combinaison trouvé, et le reprendre si besoin après avoir posé une question (et fait un test que la combinaison précedement calculé)... mais je ne sais pas comment faire... merci....

Salut, (vl-mkdir "c:\\repertoire")

Bien vu !.... c'est une solution.... mais comme je bosse 90% au clavier.....

Salut, ça à l'air trés trés bien, merci ! juste un détail, après quelques test : Il faudrait (si le lisp est chargé au démarrage), le lancer "à vide" afin de geler les calques spécifiés ulterieurement dans un dessin où gelobj à déjà été utilisé.

Salut, J'avoue ne pas trés bien comprendre ce que prompt pourrais éviter....

Merci encore, (gile) ! (je n'avais plus fait attention au challenge que tu cites, désolé)

Salut, Test ça.

Salut, Je reste planté sur un truc qui me semblait évident.... comme toujours.... certainement avez vous ce genre de choses dans vos sacs.... Je cherche à créer une liste contenant toutes les combinaisons possibles de rangement d'une liste. Ex : (setq l '(A B C D)) (Toutecombinaison l) => '((A) (B) © (D) (A B) (A C) (A D) (B C) (B D) (C D) (A B C) (A C D) (B C D) ... etc .... ... ceci afin de tester ensuite toutes les listes afin d'analyse les possibilités (bien sûr, les entités 'A, 'B, etc... sont en fait des listes d'info ....) merci pour tout.

Salut, Les délimitations ne sont utiles que pour les vues Parallèle au SCG. C'est trops délicat à utiliser autrement. Exemple : dans ta fenêtre "vue de dessus" tu lances la commande _3DCLIP, te permettant de régler/activer/désactiver les délimitations arrières et avant. Mais ces délimitations super puissante ne fonctionne que pour la vue que tu as travaillé : si tu fait un orbite d'une vue délimité, les délimitaions restent où elles sont (ce qui est logique en fait....)

Ah non, c'est vrais.... Je regarderais ça.

Re, alors, grâce à Patrick_35 : - ouvre un gabarit et charge ces lisps. - tape test - vas choisir un fichier dans le repertoire ou tu désirs analyser tous les fichiers le contenant - cela créra un fichier Listing-Présentations.txt dans le répertoire que tu viens de choisir. (defun c:[b]test[/b] (/ F F-DWG I LST-F R X) (setq r (vl-filename-directory (getfiled "Sélectionnez un fichier dans le répertoire à traiter :" "c:/" "dwg" 8))) (setq lst-f (mapcar '(lambda (x) (strcat r "\\" x)) (vl-directory-files r "*.dwg" 1))) (setq f (open (strcat r "//Listing-Présentations.txt") "w")) (repeat (setq i (length lst-f)) (setq f-dwg (Ouvrir_dessin_dbx (nth (setq i (1- i)) lst-f))) (princ (strcat (nth i lst-f) " : " (rtos (1- (vla-get-count (vla-get-layouts f-dwg)))) " Présentations\n") f) (vlax-release-object f-dwg) ) (close f) (princ "OK") (princ) ) (defun Ouvrir_dessin_dbx (dwg / dbx) (if (< (atoi (substr (getvar "ACADVER") 1 2)) 16) (setq dbx (vlax-create-object "ObjectDBX.AxDbDocument")) (setq dbx (vlax-create-object (strcat "ObjectDBX.AxDbDocument." (substr (getvar "ACADVER") 1 2)))) ) (vla-open dbx dwg) dbx )

pffffff.... désolé de t'avoir fait perdre ton temps...... merci !

Salut, Dans AutoCAD.lsp, met ceci en direct : (Alert (strcat "\n Nombre de Présentation(s) : " (rtos (length (layoutlist))))) Je suis en train de regarder, mais j'ai un souci avec ceci...

Salut, j'essaye de répondre à ce message en utilisant ta routine, et j'ai une erreur : ... je ne vois pas où..... (setq r (vl-filename-directory (getfiled "Sélectionnez UN fichier dans le répertoire à traiter :" "c:/" "dwg" 8))) (setq lst-f (mapcar '(lambda (x) (strcat r x)) (vl-directory-files r "*.dwg" 1))) ; test (setq f (Ouvrir_dessin_dbx (car lst-f))) merci !....

Salut, A chaque ouverture du logiciel je ne vois pas. Par contre, à chaque ouverture d'un dessin il suffir de le mettre dans "un" acad.lsp (avec la variable ACADLSPASDOC à 1)

Monsieur Autodesk, en copie à votre fils prodigue Autocad, Si vous pouviez nous rajouter l'option "Geler le calque en Espace Objet - dans l'onglet Objet -" Afin que l'on puisse éviter lorque l'on travail en EO, de geler un calque inutile dans cette espace, et que ce calque soit toujours accessible en EP dans une fenêtre, car justement créer pour travailler qu'en EP !... merci !

Salut, une manière Avec le DVD d'installation. démarrer - panneau de config - ajout/suppress de prog - choisie autocad2008 et modider.