Patrick_35

Bonjour à tous Je n’ai absolument rien contre à ce que l’on donne un exemple, au contraire si on s ‘en inspire pour faire le sien, c’est juste pour ne pas faire un copier/coller et un 20/20 à un truc auquel on n’a rien compris. D’autant plus que savoir manipuler ce langage permet de faire des gains de temps fabuleux pour son travail et de mieux maîtriser Autocad. Et s’il y a un gros fil de messages, ce n'est pas grave, ça permet de soulever des points que ne sont pas toujours facile à comprendre @+

Ah oui, effectivement, je n’avais pas fait attention aux tarifs, c’est prohibitif. Bon, quand je vois la pub de France télécomm au sujet du visiophone, je me dis que ça va très vite se démocratiser @+

Rebcao,c'est très gentil de ta part de vouloir aider Yatch, mais faire son exercice n'est pas lui rendre service. Il peut poser autant de questions qu'il veut, on sera toujours là pour l'aider et l'accompagner à réaliser son Lisp. De plus, c'est un excellent exercice pour ceux qui veulent aussi s'y mettre Un proverbe (chinois je pense) dit que si on veut nourrir une personne, ne lui donne pas à manger mais apprend lui à pécher @+

Pour Pako J'ai bien vu que c'est gratuit, je parlais au passé. Il ne faut pas se leurrer, on n'a pas affaire à des philanthropes, il faut bien que le club ait des ressources afin de vivre. Pour Patrick Tu as bien la vidéo conférence et ce site ou encore celui-là par exemple J'ai déjà fait ce type de reunion, et je trouve que ça reste purement professionnel, froid. Et du coup, on n'a même plus la bolée à la fin de la réunion :( @+

Bonjour, Cette idée n’est pas nouvelle et il y a déjà eu me semble-t-il un club d’utilisateur de produits Autodesk. De plus c ‘était payant et quand on demandait à son patron de s’inscrire, il n’en voyait pas l’intérêt. Je pense que c’est beaucoup de blabla, de réunionnite aiguë et on est aussi bien informé, sinon mieux par Cadxp et la presse spécialisée. C’est un avis pour l’instant assez négatif, reste à voir ce que propose ce nouveau club, comment il s’organise, quelles sont les fréquences des réunions, les sujets abordés, etc… Encore une précision, c’est au sujet de la segmentation par marché. On est toujours gagnant de mélanger plusieurs corps de métier, de s’enrichir les uns des autres mais si c’est pour présenter un produit bien spécifique, ça reste à voir Affaire à suivre... @+

Salut Dans les propriétés de l'image, il est possible de la rendre transparente @6

Bonjour à tous Ce doit être faisable en visual lisp, hors doslib C'est sûrement dans KeyCodeConstants avec vbKeyCapital dans le module vba. Il reste à voir comment y accéder. @+

Merci beaucoup Serge, je ne connaissais pas cette manière de faire. J'avais bien trouvé dans mes recherches ACAD_GROUP, ACAD_LAYOUT, ACAD_MLINESTYLE, ACAD_PLOTSETTINGS et ACAD_PLOTSTYLENAME mais absolument rien sur ACAD_LAYERFILTERS, d'où ma question, ce qui induit aussi de savoir s'il n'y en a pas d'autre dans le même style. @+

Bonjour à tous pour Tramber Il me semble qu'il suffit d'avoir Autocad d'installé pour lancer les outils de migration Voici un lien pour la version 2004 Pour Rebcao Excuse-moi si je t'ai un peu froissé. Je pensais que tu ne connaissais pas @+

Ah, une petite carbonnade et un flamiche au maroilles.... :cool: Et je suis en ce moment au régime galette saucisse, m'enfin...:angel: @+

Ah, oui peut-être ! Je ne pense pas que ce soit dans les variables, mais du coté des registres (si c’est paramétrables) @+

Pour rebcao un ; sert de rem, c'est à dire que la ligne devient un commentaire Pour dol Pourquoi faire un lisp ? Il existe le programme Batch drawing converter des migrations assistance fournit avec le cd d'autocad. @+

Salut Tu peux agrandir ta boite de dialogue de calques comme toutes fenêtres windows avec les flèches !!! @+

Salut un cadr te retourne le deuxième élément d'une liste ex : (cadr '(45.0 90.0 80.0)) retourne 90.0 un car donne le premier, un caddr le troisième, un cadddr le quatrième et un caddddr ? Non, pas de cinquième, ça n'existe pas comme fonction ;) @+

Salut Pour essayer de simplifier les explications de Patrick --------------ENTIER 8 BITS------------- ---------------------------------------- |BINAIRE |128|64|32|16|8|4|2|1| DECIMAL |00000101|--0|-0|-0|-0|0|1|0|1| 4+1=5 |00100010|--0|-0|-1|-0|0|0|1|0| 32+2=34 |01001001|--0|-1|-0|-0|1|0|0|1| 64+8+1=73 |11111111|--1|-1|-1|-1|1|1|1|1| 128+64+32+8+4+2+1=255 @+

Bonjour à tous Serge, juste une question sur ton lisp, le ACAD_LAYERFILTERS, tu le trouves où dans la doc ?. Ce qui me gène dans ces deux lisp, c'est de ne pas savoir où trouver ce fichu argument, même en parcourant l'explorateur d'objet en vba. @+

Salut, Un des mes vieux lisps (qui n'est pas de moi, je n'en faisais pas encore à cette époque) @+ (vmon) (defun c:compt (/ bloc d a n) (setq en (car (entsel "\nPIQUEZ LE BLOC A COMPTER ..."))) (setq name (cdr (assoc 2 (entget en)))) (princ (strcat "\n-----> " name)) (setq d (cons 2 bl)) (setq a (ssget "x" (list (cons 2 name)))) (if (/= a nil) (progn (setq n (sslength a)) (PRINC (strcat "\nJ'ai TROUVE "(itoa n) " " name " dans le dessin \n")) ) ) (if (= a nil) (prompt "\ DESOLE Aucun bloc dans le dessin !!!") ) )

Salut C'est le fichier count.lsp dans le répertoire des express, sinon il est possible de técharger les express à cette adresse @+

Bonjour à vous deux Il est toujours irritant de voir un nouveau message sur un sujet qui à été déjà été abordé et qui est resté sans conclusion (surtout quand une recherche a été faite). C'est le seul reproche que je fais, mais bon, ce n'est pas grave, je ne t'en tiens pas rigueur Je sais qu'il existe des sites où on passe son temps à se justifier et où on à droit aussi aux injures. J'ai passé l'age et je ne vais plus mettre la souris dans ces sites, je préfère de loin les choses constructives Donc, pour répondre à ton souci principal Un (setq a (tblnext "block" t)) te donne le premier bloc de la table "block" Si un (logand (cdr (assoc 70 a)) 4) est égal à 4, c'est donc un xref. Si c'est un xref, un (cdr (assoc 1 a)) te donne le nom et un (cdr (assoc 2 a)) te donne son chemin complet (répertoire+fichier) Pour passer au block suivant, un (setq a (tblnext "block")) suffit Et si la valeur de a est nil, c'est que c'est fini, la table des blocs a été balayée Pour Tramber. Si tu as un moment, fais un saut sur la côte de granit rose, surtout en ce moment où il n'y a pas de touriste. Ce n'est pas les grandes plages du nord, mais ça a un charme incomparable ;) Et rien n'interdit le poster et la bouteille de sable sur le bureau (bon, je taquine un peu...) @+

Salut ou encore http://www.drcauto.com/ @+

Ah ! yes, si tu as ton imprimante pdf en pc3, supprime le fichier. J'ai eu une fois un souci comme ça (par pour du pdf, mais sur une imprimante réseau) et en supprimant le fichier pc3, tout est rentré dans l'ordre Pour le 35, c'est le département, l'age un peu plus (heureusement que je ne suis pas dans le 95 ;)) @+

Tiens tyrese69_, le retour sur les xrefs Je tiens à te féliciter de ta courtoisie sur ce sujet. Tu ferais bien de t’inspirer de celui-ci Je ne te salue pas

Salut Tu devrais trouver ton bonheur ici @+

Salut, au lieu de changer la taille des icones, autant changer la définition d'écran ? @+

Salut, C'est sûrement un problème de superposition de couches. Si tu créés un bloc sur la couche "mes_blocs" par exemple, puis tu l'insères sur une couche par exemple "insertion". Jusque là, tous va bien. Maintenant, je gèle la couche "mes_blocs" et je constate que mes blocs ont disparu. Je fais l'inverse, je dégèle ma couche "mes_blocs" et je gèle la couche "insertion", ils sont toujours invisibles. Bon, je dégèle ma couche insertion et là je les retrouve @+