didier

coucou, mon message n'a rien, mais alors RIEN à voir avec le sujet, mais lire dans un message : 17h33 ma boîte ferme, je dois y aller. la preuve est faite, il y a des gens gens du matin et d'autres... sur ce, il est 20 heures, je décide de prendre mon après midi et je vais renter à la maison grand fou que je suis... les 35 heures ça existe donc quelque part... mort de rire et triste cependant. amicalement [Edité le 12/10/2006 par didier]

coucou, c'est impossible avec un AutoCad, sans applicatif je veux dire je sais le faire, mais je me refuse à aider une société. j'ai un côté anar qui resurgit de temps en temps, si c'est à titre personnel et que tu veux te mettre au lisp tu pourras compter sur moi, et plein d'autres pour t'aider. le temps que tu vas mettre à carroyer 2000 planches sans applicatif est largement supérieur au prix d'une version de Covadis, notez que je n'ai pas le moindre intérêt chez Géomédia. donc pour t'aider dans le lisp, je suis à ta disposition. ps : est ce que le lorient qui est dans ton pseudo est ta ville, si c'est le cas c'est encore pire. amicalement tout de même.

coucou, dans ta deuxième énumération tu parles de raccourcis qui se trouvent dans le PGP, donc chacun fait ce qu'il veut, et j'en ai vu des pas mal dans le style compliqué à se souvenir... en revanche les accrochages sont francisés, il est prouvé que la fin d'une ligne est une EXTrémité, il n'y a guère que le nodal qui peut causer une difficulté. à ce propos, est il utile que je rappelasse à vos souvenirs les PLANS qui sont devenus CALQUES ? je souhaite au traducteur français d'AutoCad de se servir du logiciel qu'il a traduit, je pense que la punition serait méritée, c'est un peu comme si je souhaitais à un homme politique de subir la loi qu'il vote. dans un cas comme dans l'autre le changement sera notoire... amicalement

bonsoir, est ce que le renseignement fourni par la Variable ACADVER est suffisant ? amicalement

Bonsoir, non Fraid, le plus simple est d'utilliser la transformation de coordonnées, voir l'aide de la fonction TRANS si tu ne t'en sors pas avec cette aide, vois sur CadXp ou repose ta question. amicalement

hello CarapaceMan, tout ce boulot et même pas une réponse, je suis dans ton camp camarade, tes cinq paires de pattes expliquent la longueur de ton message... en te lisant on a la preuve que le temps passe bel et bien... amicalement

coucou, pourquoi pas ? à mon avis, ce n'est qu'une question d'habitudes, celui qui commence avec ce matos n'a pas de problème, celui qui doit s'y mettre en a un peu plus, si demain on remplace le volant de direction des automobiles par un joystick, ça va raler !!! au début la souris paraît ingérable, ensuite elle devient un prolongement de la main... moi qui ne supporte pas qu'on touche à mon écran, je suis mal parti... le style tactile, c'est pour l'écran ou sur un tapis ? les commandes vocales, pourquoi pas non plus! joyeux boxon dans un bureau, "ligne", j'ai dit "ligne", tu comprends pas ce que je dis et le collègue qui passe derrière et qui hurle "annuler"... amicalement

Bonsoir, pour mettre à Zéro toutes les polylignes épaissies, utiliser PEDIT, Répondre M, sélectionner toutes les polylignes, choisir LA et répondre 0. maintenant si tu veux mémoriser l'épaisseur attribuée à chaque polyligne avant la modification par PEDIT, soit mettre un contrôle ANNULER avant de lancer la modif et revenir à l'état initial ensuite. soit passer par un lisp mais c'est pas simple dit comme ça. j'ai une ou deux idées mais c'est pas évident (de sagesse) amicalement

Bonsoir la douce Esbe, dans ton message on ne sait pas si tu travailles avec un rouleau ou en feuille à feuille, remarque, celà ne changera guère les zones non imprimables, elles sont utilisées par le traceur pour guider le papier et les têtes d'impression n'y passeront jamais. amicalement

Bonsoir, pour résoudre le souci rencontré, il te suffira de régler la variable DIMZIN à 3 amicalement

coucou, oui c'est possible, dans le même genre, on peut imaginer lancer quelque chose sur la Lune avec un lance pierres allumer une clope avec un lance flammes peindre la Joconde avec un fusil de paint-ball... enfin plein de choses pas très raisonnables ni sérieuses. amicalement

hello, Un géomètre prend la parole pour te répondre, ce que tu demandes n'est possible que s'il y a une relation fixe entre le point (topo) et le point d'insertion du texte. sinon ça va ressembler à du flou à peu près environ presque bon. sans polémiquer, si le devis ne précise pas explicitement la livraison d'un fichier informatique, le collègue a eu raison d'agir ainsi. il m'est arrivé de le faire, pas pour faire ch..., mais pour ne pas être doublé dans une affaire où je me suis investi et qu'un tiers utilise mes données à ma place. Soyez clairs dans les commandes et nous serons clairs dans la livraison de nos fichiers. il est courant que la fourniture de MNT soit précisée dans le devis et j'en tiens compte pour établir mes prix. par ailleurs, contacte le géomètre en passant par le maître d'oeuvre, il serait étonnant qu'il refuse de filer son fichier non "nettoyé" enfin pour répondre à ton souhait, veux tu être guidé pour faire un lisp ou bien veux tu le copier coller. amicalement

Hello PatrickRacineDe1225 je te trouve un peu speed il est clair que cet applicatif a besoin de publicitaire je pense qu'il a trouvé le bon, car il est pour le moins vaillant, il n'y a aucune méchanceté dans mes propos, cela me fait juste sourire, merci AutoSpeed. ami calmant

coucou, j'ai pris un bref instant pour lire ta prose, et il apparaît que, sans vouloir paraître abscons, il ne sera pas superfétatoire que tu revoies tes explications. par le petit bout de ma lorgnette, je ne vois rien venir. amicalement

hello, je n'en vois pas l'utilité, car, une fois enregistré dans le PGP, le raccourci est utilisable jusqu'à sa suppression dans ce même fichier... sans compter qu'il va falloir lancer REINIT... donc... le mieux est l'ennemi du bien, gardons nous de tout vouloir Lisper. Tel est mon avis. amicalement

coucou, révision : c'est normal à la rentrée d'attaquer par les révisions ENTGET pour choisir UNE ENTITE SSGET pour choisir PLUSIEURS ENTITES la commande IF fonctionne ainsi : IF test fairececi sinonfairecela end if si fairececi est plus compliqué qu'une ligne de code IF test (progn fairececi ) sinonfairecela end if

hello, des spams... avec les nouvelles messageries, ils sont filtrés automatiquement, je pense en particulier à GMAIL et à ThunderBird. oublier OutLook Express est urgent amicalement

Bonjour, Ce que tu demandes est aisé à réaliser s'il n'ya pas trop de conditions restrictives. Deus solutions, 1: attendre que quelqu'un te mettes un code sur le site 2: contacte moi par message privé, je te files mon mail, tu me renvoies un bloc type et un exemple de ce que tu veux faire, je te ferai une routine que je mettrai sur CadXp. amicalement

coucou, je ne savais pas qu'ils faisaient des traceurs chez OCE ;) en revanche, chez HP, j'ai remarqué qu'il est souhaitable de sortir, puis de relancer AutoCad, pour que les modifs avancées du traceur soient prises en compte, c'est peut être à cause de Windows... fais gaffe aussi aux Pouces et Millimètres c'est ballot, mais ça arrive... amicalement

bonjour, bienvenue au club des CadXpiens... ta question est mal posée à mon avis, qu'est ce Echelle de Schéma ? dans AutoCad, pas de notion d'échelle pour les distances si c'est un bloc que tu insères, il est conseillé de n'utiliser qu'une seule Unité Dessin. amicalement

hello, je n'ai pas testé, donc indulgence ... à première vue je pense que la solution est d'utiliser la concaténation de codes ASCII. en effet si tu fais : zozo = Chr(62) & Chr(92) & "zaza" & Chr(92) & Chr(62) la chaîne se concatène correctement. amicalement

bonjour, tes points numérotés sont ils des blocs avec attribut ? j'avais sévi, dans le temps, sur les points topo ... fais gaffe au filtre de nom de bloc, mais je te confie cette routine qui date qui date qui date qui date qui date ........ (setq ListXY nil) (setq JeuSel (ssget "X" (list (cons 2 "TCPOINT")))) (setq i 0 lon (sslength JeuSel)) (while ( (setq ent (ssname JeuSel i)) (setq pt1 (cdr (assoc 10 (entget ent)))) (setq ent (entnext ent)) (setq ListXY (cons pt1 ListXY)) (setq i (1+ i)) ) (setq n 1) (command "_pline" (car ListXY)) (repeat (length ListXY) (command (nth n ListXY)) (setq n ( + 1 n)) ) ça ne nous rajeunit pas cette histoire... amicalement

Bonsoir, le lien est mort, du moins depuis la machine que j'utilise, si Eric a raison, ce qui fait peu de doutes, les propriétés géométriques étaient donc différentes... un gage pour Dominique, nananère, on va lui retirer la touche Z de ton clavier, il fera moins le fier, hihihihihi amicalement,

Hello Je vous remercie de confirmer ce que je n'avais réussi à faire, mais au moins, maintenant je sais qu'il ne faut pas demander l'impossible... Pour ce qui est des icônes, je ne sais pas de quoi il s'agit, donc je ne les utilise pas plus, en revanche, pour le VBA, le Lisp et les autres applics Windows, Excel et consorts, c'est très cool. J'utilise cet adjectif à dessein, pour prouver à la gente CadXpienne, que : avoir commencé avec le DOS 3.0 manier avec adresse le language des 16-17 ans est compatible... ceci est de l'humour pour les ceusses qui ne savent lire entre les lignes. au passage, je te serre la pince amicalement

Bonsoir mon Cher Banquier, voici ce que je te propose : Sub GetEntite() Dim Titre As String Dim Message As String Dim Resultat As String Dim objEntite As AcadEntity Dim varPoint As Variant Dim CalqueEntite As String On Error Resume Next With ThisDrawing.Utility .GetEntity objEntite, varPoint, vbCr & "Sélection d'un objet: " If objEntite Is Nothing Then .Prompt vbCrLf & "Aucun objet sélectionné." Exit Sub End If 'change l'objet en rouge objEntite.color = acRed objEntite.Update CalqueEntite = objEntite.Layer Titre = "Bred Test" Message = "Vous avez sélectionné une Entité du Calque : " & CalqueEntite Resultat = MsgBox(Message, 0, Titre) End With End Sub j'en profite pour passer l'entité en rouge pour te montrer la marche à suivre pour changer une propriété d'un objet. en souhaitant ne pas être hors sujet. amicalement