lecrabe

ReBonjour Mille mercis Mr fhervet (from aricad) :) :D :cool: Eh oui, je crois que j'avais fais le test avec un AutoCAD 2000i ou 2002 et à l'époque, il n'y avait AUCUNE limitation !!! ;) :P Le Decapode "Terminalement déçu"

Bonjour fhervet Merci de ta réponse, mais tu dis que c'est limité à 2 (deux) sessions ... - SVP Quelle version d'AutoCAD EXACTEMENT ? - 2006 / 2005 / 2004 ??? Cela signifie que 2 Users au maximum pourront lancer AutoCAD / MAP / LT version 2006 / 2005 sur le serveur en Terminal Server / Citrix, ai je bien compris ? Depuis quelle version d'AutoCAD, Autodesk a t-il limité cette possibilité ? Car je me sousviens avoir fait le test (il y a longtemps) et à cette époque, on n'avait AUCUNE limitation ! Merci d'avance, Le Decapode

Bonjour Question: avez vous une expérience de fonctionnement d'AutoCAD 2006 ou 2005 en mode Terminal Server ou Citrix depuis DONC un "super server bien musclé" ? En théorie avec UNE SEULE licence sur le server, on peut faire tourner N sessions AutoCAD / MAP / LT / etc qui sont visualisées sur les postes User !!! - Avant de faire des tests, j'aimerais avoir vos impressions à ce sujet ? - Est ce fonctionnel techniquement ? - D'autre part, je pense que c'est "peut etre" une violation de la licence Autodesk ? Dans l'attente de vos réponses, merci d'avance Le Decapode

Bonjour En fait le SP patche le "A C A D.exe" et de tres nombreux fichiers du type: ARX, DLL, etc ... Confere la fin du fichier "readme" qui accompagne le SP1 :) De plus je suppose qu'il DE-Registre puis Registre les nouvelles DLL, ARX, etc ... :( Donc a mon avis ton MAP est peut etre dans un etat "instable" SP1 en partie installe :o :( Le Decapode

Bonjour NON Desole mais une commande WBLOC enregistre toujours quelque soit la version d'AutoCAD dans le format DWG "dernier cri" :cool: Ou alors j'ai oublie une variable systeme "super importante" ... En effet aujourd'hui pour les gens qui ont AutoCAD ou LT ou MAP en version 2004 / 2005 / 2006 on peut configurer son logiciel pour qu'il ecrive en format DWG 2000 :) Il n'y aura (A ma connaissance) aucune perte d'information :) Vous remarquerez que je n'ai pas inclus Autodesk Architectural Desktop dans ma liste ! Cependant malheureusement cela ne fonctionne pas pas pour par exemple: - WBLOC - Edition en "live" des XREFs - Enregistrer dans les dessins Sources (Pour MAP) Le Decapode [Edité le 5/12/2005 par lecrabe]

Bonsoir Eh Oui cette version 2006 est franchement "lente" et donc je prefere travailler le plus possible avec mon bon vieux MAP 3D 2005 + SP2 + Divers Patches :) Voire même parfois avec un MAP 2004 :D Le Decapode

Bonsoir NON a ma connaissance seul le logiciel EDICAD (Edite par GEOMEDIA Brest) permet de traiter les fichiers EDIGEO ... :) depuis un MAP :D Autre solution: le produit GEOSPATIAL du cabinet STROZYNA qui traite les fichiers EDIGEO pour les convertir directement en Oracle Spatial ... :cool: (Mais a ce moment, on ne boxe plus du tout dans la meme categorie) :( Le Decapode

Bonjour Je suppose qu'il s'agit de 3D Volumique ... Vérifies les variables suivantes: ISOLINES = 8/10/12 (Ca suffit) FACETRES = 0.5 ... 1 (Ca devrait suffire) FACETRATIO = 0 (Parfois 1) HIDEPRECISION = 0 (Parfois 1) Ne pas oublier un REGEN apres une modif de ces variables ... RESVUE 20000 La version 2006 va franchement "moins" vite que la 2005 que la 2004 ... :o Le Decapode

Bonjour Eh oui, les masques (Wipeout) "sur un calque spécifique" ou les objets graphiques dessinés dans une couleur qui sera "invisible" lors du tracé par une couleur ou un style de tracé avec une projection à ZERO % ... Cela permet des magouilles "subtiles" :) Mais attention quand vous mettez ce genre de DWG entre les pattes d'un utiulisateur NIveau 1 (Genre stagiaire de passage) :o Aujourd'hui avant d'utiliser certaines fonctionnalités dans AutoCAD il faut peut etre s'inquiéter du niveau des utilisateurs amenés à intervenir sur le DWG !!! :( :mad: Le Decapode

Bonjour Eh oui (quand j'y pense) lors du chargement d'un DWG (susceptible de contenir de la 3D) provenant de l'exterieur ... Je fais toujours: ELEV puis ZERO puis ZERO si nécessaire ... Le Decapode

Bonsoir Les champs "dynamiques" d'AutoCAD 2005/2006 ouvrent des perspectives "affolantes" :) Par exemple récupérer la propriété INDEX (Valeur ou Contenu) d'un TEXT/MTEXT permet d'avoir un texte de référence quelque part dans le dessin ! Et de déclencher des modifications des "copies" (Champ en fait) du contenu/valeur de ces textes N'IMPORTE OU dans le dessin :D Le Décapode

Bonsoir Si tu n'as touché à RIEN dans la configuration d'AutoCAD 2005/2006 (Outils / Options) ... La Mise à Jour "automatique" se fait lors des manipulations suivantes: - Ouvrir - Enregistrer - Tracer - ETransmit - Regen Le Decapode

Bonsoir Je n'ai pas d'AutoCAD sous la main à l'instant ... As tu essayé de jouer avec la variable MIRRTEXT ? Le Decapode

Bonsoir Je connaissais mais je n'utilise par énormément dans la mesure où une bonne sélection par des fenêtres subtiles est "souvent" suffisante ... D'autre part avec une "excellente" organisation de calques (ou charte graphique) permet d'isoler facilement les calques et donc les objets ... Le Decapode

Bonsoir Je vais proposer à Patrick de changer ton pseudo de Bonuscad en BonusLisp :) :D :cool: Ce sera beaucoup plus juste ... ;) Le Decapode

Bonsoir Voici une routine AutoLisp "MTEXTMASK.lsp" qui ajoute des masques aux MTEXTs sélectionnés Quelle ne fut pas ma surprise le jour où j'ai oublié que j'étais sur AutoCAD 2004 et que j'ai fait fonctionner la routine "MTEXTMASK" ... Tous mes MTEXTs sont apparus avec un joli masque de couleur en arrière plan !!! alors que cette fonctionnalité n'existe que DEPUIS AutoCAD 2005 !!! Autodesk avait il déjà prévu dans la 2004 une fonctionnalité qui ne serait implantée que dans la 2005 ??? Qq explications des PROs de la programmation seraient les bienvenus Merci d'avance, Le Decapode PS: J'espère que le Copier/Coller n'a pas trop "bousillé" le code ! ;; Written by: Lee Ambrosius ;; Created on: 4/7/2004 ;; http://www.hyperpics.com/ ;; This program allows you to add Background Mask ;; to several Mtext objects ;; at one time instead of using the Mtext editor ;; for each object or the Properties Palette. ;; The Properties Palette in 2005 doesn't allow you ;; to set Background Color or Border Offset. (defun c:MTextMASK ( / kWordBackgroundMaskCurrent dOffsetCurrent ssMtext dxf90 dxf63 dxf45 dxf441) (prompt "\nApply Mtext Mask") (if (= kWordBackgroundMask nil) (setq kWordBackgroundMask "Background" kWordBackgroundMaskCurrent "Background") (setq kWordBackgroundMaskCurrent kWordBackgroundMask) ) (initget "None Background Color") (setq kWordBackgroundMask (getkword (strcat "\nSpecify Background Mask: [None/Background/Color] : "))) (if (= kWordBackgroundMask nil) (setq kWordBackgroundMask kWordBackgroundMaskCurrent) ) (cond ((= kWordBackgroundMask "Color") (if (or (= maskClr nil) (/= (type maskClr) 'LIST)) (setq maskClr (acad_truecolorcli 1)) (if (= (assoc 420 maskClr) nil) (setq maskClr (acad_truecolorcli (cdr (assoc 62 maskClr)))) (setq maskClr (acad_truecolorcli (assoc 420 maskClr))) ) ) ) ((= kWordBackgroundMask "Background")(setq maskClr 256)) ((= kWordBackgroundMask "None")(setq maskClr 0 dOffset 1.0)) ) (if (/= maskClr nil) (progn (if (/= kWordBackgroundMask "None") (progn (setq dOffsetCurrent dOffset) (if (= dOffsetCurrent nil) (setq dOffset 1.0 dOffsetCurrent 1.0) (setq dOffsetCurrent dOffset) ) (setq dOffset (getreal (strcat "\nSpecify border offset factor: : "))) (if (= dOffset nil) (setq dOffset dOffsetCurrent) ) (if (> dOffset 5)(setq dOffset nil)) (if ( (while (= dOffset nil) (setq dOffset (getreal (strcat "\nSpecify border offset factor: : "))) (if (> dOffset 5)(setq dOffset nil)) (if ( ) ) (if (= dOffset nil) (setq dOffset 1.0) ) ) (if (setq ssMtext (ssget (list (cons 0 "MTEXT")))) (progn (cond ((= kWordBackgroundMask "None") (setq mask_list (list (cons 90 2)(cons 63 0)(cons 45 dOffset)(cons 441 0)) dxf90 2 dxf63 nil dxf45 nil dxf441 nil ) ) ((and (= kWordBackgroundMask "Color")(/= (assoc 420 maskClr) nil)) (setq mask_list (list (cons 90 1)(cons 63 1)(cons 421 (cdr (assoc 420 maskClr)))(cons 45 dOffset)(cons 441 (cdr (assoc 420 maskClr)))) dxf90 1 dxf63 2 dxf45 dOffset dxf441 (cdr (assoc 420 maskClr)) ) ) ((and (= kWordBackgroundMask "Color")(= (assoc 420 maskClr) nil)) (setq mask_list (list (cons 90 1)(cons 63 (cdr (assoc 62 maskClr)))(cons 45 dOffset)(cons 441 2146608)) dxf90 1 dxf63 (cdr (assoc 62 maskClr)) dxf45 dOffset dxf441 nil ) ) ((= kWordBackgroundMask "Background") (setq mask_list (list (cons 90 3)(cons 63 3)(cons 45 dOffset)(cons 441 0)) dxf90 3 dxf63 256 dxf45 dOffset dxf441 0 ) ) ) (setq emax (sslength ssMtext) sscount 0 ) (while ( (setq EN (entget (ssname ssMtext sscount)) tempEN nil) (if (/= dxf90 nil) (progn (if (/= (assoc 90 EN) nil) (setq EN (subst (cons 90 dxf90) (assoc 90 EN) EN)) (setq EN (append EN (list (cons 90 dxf90)))) ) ) (progn (setq CNT 0 nMembers (member (assoc 90 EN) EN)) (if (= nMembers nil) (setq nMembers 0) (setq nMembers (length nMembers)) ) (repeat (- (length EN) nMembers) (setq tempEN (append tempEN (list (nth cnt EN)))) (setq CNT (1+ CNT)) ) (if (> nMembers 0) (progn (setq CNT 1) (repeat (- nMembers 1) (setq tempEN (append tempEN (list (nth cnt (member (assoc 90 EN) EN))))) (setq CNT (1+ CNT)) ) ) ) (setq EN tempEN tempEN nil) ) ) (if (/= dxf63 nil) (progn (if (/= (assoc 63 EN) nil) (setq EN (subst (cons 63 dxf63) (assoc 63 EN) EN)) (setq EN (append EN (list (cons 63 dxf63)))) ) ) (progn (setq CNT 0 nMembers (member (assoc 63 EN) EN)) (if (= nMembers nil) (setq nMembers 0) (setq nMembers (length nMembers)) ) (repeat (- (length EN) nMembers) (setq tempEN (append tempEN (list (nth cnt EN)))) (setq CNT (1+ CNT)) ) (if (> nMembers 0) (progn (setq CNT 1) (repeat (- nMembers 1) (setq tempEN (append tempEN (list (nth cnt (member (assoc 63 EN) EN))))) (setq CNT (1+ CNT)) ) ) ) (setq EN tempEN tempEN nil) ) ) (if (/= dxf45 nil) (progn (if (/= (assoc 45 EN) nil) (setq EN (subst (cons 45 dxf45) (assoc 45 EN) EN)) (setq EN (append EN (list (cons 45 dxf45)))) ) ) (progn (setq CNT 0 nMembers (member (assoc 45 EN) EN)) (if (= nMembers nil) (setq nMembers 0) (setq nMembers (length nMembers)) ) (repeat (- (length EN) nMembers) (setq tempEN (append tempEN (list (nth cnt EN)))) (setq CNT (1+ CNT)) ) (if (> nMembers 0) (progn (setq CNT 1) (repeat (- nMembers 1) (setq tempEN (append tempEN (list (nth cnt (member (assoc 45 EN) EN))))) (setq CNT (1+ CNT)) ) ) ) (setq EN tempEN tempEN nil) ) ) (if (/= dxf441 nil) (progn (if (/= (assoc 441 EN) nil) (setq EN (subst (cons 441 dxf441) (assoc 441 EN) EN)) (setq EN (append EN (list (cons 441 dxf441)))) ) ) (progn (setq CNT 0 nMembers (member (assoc 441 EN) EN)) (if (= nMembers nil) (setq nMembers 0) (setq nMembers (length nMembers)) ) (repeat (- (length EN) nMembers) (setq tempEN (append tempEN (list (nth cnt EN)))) (setq CNT (1+ CNT)) ) (if (> nMembers 0) (progn (setq CNT 1) (repeat (- nMembers 1) (setq tempEN (append tempEN (list (nth cnt (member (assoc 441 EN) EN))))) (setq CNT (1+ CNT)) ) ) ) (setq EN tempEN) ) ) (entmod EN) (setq sscount (1+ sscount)) ) ) ) ) ) (princ) ) (prompt "\nType MTEXTMASK to run the command") (princ)

ReBonsoir Didier SVP as tu installé avec succès le SP1 FRA sur ton MAP 3D 2006 FRA ? Si OUI penses tu aller "un peu plus vite" ? Le Decapode

Bonsoir Didier N'es tu pas un "fan" de Cinéma ? Didier begins ... Le Decapode "chauve-souris"

Bonsoir Noble Dame Esbe J'ai manqué à tous mes devoirs en oubliant de vous saluer comme il sied à un preux chevalier AutoCADien :( J'espère que votre courroux ne sera que passager ... :) Le Humble Decapode

Bonsoir Petite question pour ceux qui ont reçu la "fameuse" version 200x-7: Y a t-il bien 2 programmes : l'un pour AutoCAD 2000-2002 et l'autre pour AutoCAD 2004-2006 ??? Merci d'avance, Le Decapode

Bonsoir "Gente Dame Esbe" Le modeste chevalier du Decapode vous rend hommage :) :D :cool: Le Decapode "servant"

Bonsoir Je suis comme Didier "Sur le cul" de voir que la variable DIMZIN agit en AutoLisp !!! Mr Bonuscad, comment as tu trouvé cette fonctionnalité "inattendue" pour moi ? Le Decapode

Bonsoir Voici une bonne vieille routine AutoLisp que j'utilise avec succes depuis AutoCAD R14 :) Elle utilise un fichier Texte/Ascii de type CDF (Comma delimited) ou de type SDF (Space delimited) Elle génère au choix des points, lignes, 3DPoly, 2DPoly, Copies de blocs :) :D :cool: J'espère que le Copier/Coller n'a pas trop "bousillé" la routine !!! Le Decapode ;; ASCPOINT.LSP Copyright 1990-97 Tony Tanzillo All Rights Reserved. ;;----------------------------------------------------------------- ;; Author: Tony Tanzillo, ;; Design Automation Consulting ;; http://ourworld.compuserve.com/homepages/tonyt ; ASCPOINT.LSP is a utility for use with AutoCAD Release 10 or 11, ; which reads coordinate data from ASCII files in CDF or SDF format, ; and generates AutoCAD geometry using the incoming coordinate data. ; ; The ASCPOINT command will read coordinate data from an ASCII file, ; and generate either a continuous string of LINES, a POLYLINE, a 3DPOLYline, ; multiple copies of a selected group of objects, or AutoCAD POINT entities. ; Format: ; Command: ASCPOINT ; File to read: MYFILE.TXT ; Comma/Space delimited : Comma ; Generate Copies/Lines/Nodes/3Dpoly/: Nodes ; Reading coordinate data... ; If you selected "Copies", then ASCPOINT will prompt you to select the ; objects that are to be copied. The basepoint for all copies is the ; current UCS origin (0,0,0). One copy of the selected objects will be ; created for each incoming coordinate, and placed at each coordinate. ; ; A comma-delimited (CDF) ascii file contains one coordinate per line, ; with each component seperated by a comma, like this: ; 2.333,4.23,8.0 ; -4.33,0.0,6.3 ; 0.322,5.32,0.0 ; etc ... ; There should be no spaces or blank lines in a CDF coordinate data file. ; A space-delimited (SDF) ascii file contains one coordinate per line, ; with each component seperated by one or more spaces, like this: ; 2.333 4.23 8.0 ; -4.33 0.0 6.3 ; 0.322 5.32 0.0 ; etc ... ; Coordinate data can be 2D or 3D. ; Note that all numeric values must have at least one digit to the left ; and the right of the decimal point (values less than one must have a ; leading 0), and a leading minus sign indicates negative values. This ; applys to both CDF and SDF formats. ; ; ASCPOINT can generate a continuous chain of LINE entities from your ; coordinate data, where each pair of adjacent lines share a coordinate ; from the file. ; ASCPOINT can also generate a polyline or 3DPOLYline from the coordinate ; data, where each point in the file becomes a vertice of the polyline. ; If the input file contains 3D coordinates, and you specify a polyline, ; then the Z component is ignored and the default of 0.0 is used. ; ASCPOINT will also COPY a selected group of objects, creating one copy ; for each incoming coordinate, and using the coordinate as the absolute ; copy displacement from the CURRENT UCS origin (0,0,0). ; Finally, ASCPOINT will generate AutoCAD POINT entities from the data in ; the file. Specify the point size and type prior to invoking ASCPOINT. ; Good luck, Tony Tanzillo (defun C:ASCPOINT ( / f bm hi format input read-point line plist ss) ;(cond ( (eq "" (setq f (getstring "\nFile to read: ")))) (cond ( (eq "" (setq f (getfiled "Liste des fichiers TXT" "" "TXT" 8)))) ( (not (setq f (open f "r"))) (princ "\nCan't open file for input.")) (t (initget "Space Comma") (setq format (cond ((getkword "\nComma/Space delimited : ")) (t "Comma"))) ( princ "\nChoisissez une option : C ou L ou N ou 3D ou P " ) ( princ "\nATTENTION : Si option P (Pline 2D), tous les Z sont identiques ") (initget "Copies Lines Nodes 3Dpoly Pline") (setq input (cdr (assoc (cond ( (getkword "\nGenerate Copies/Lines/Nodes/3Dpoly/: ")) (t "Pline")) '(("Lines" . "_.line") ("Copies" . "_.copy") ("Nodes" . "_.point") ("3Dpoly" . "_.3dpoly") ("Pline" . "_.pline"))))) (setq read-point (cond ( (eq format "Comma") cdf) (t sdf))) (setvar "cmdecho" 0) (command "_.undo" "g") (setq bm (getvar "blipmode")) (setq hi (getvar "highlight")) (setvar "blipmode" 0) (princ "\nReading coordinate data...") (while (setq line (read-line f)) (cond ( (setq line (strtrim line)) (setq line (read-point line)) (setq plist (append plist (cond ( (eq input ".pline") (list (noz line))) (t (list line)))))))) (close f) (cond ( (eq input "_.point") (setvar "highlight" 0) (command "_.point" "0,0,0" "_.copy" (setq ss (entlast)) "" "_m" "0,0,0") (apply 'command plist) (command) (entdel ss)) ( (eq input "_.copy") (princ "\nSelect objects to copy,") (while (not (setq ss (ssget))) (princ "\nNo objects selected,") (princ " select objects to copy,")) (setvar "highlight" 0) (command "_.copy" ss "" "_m" "0,0,0") (apply 'command plist) (command)) (t (command input) (apply 'command plist) (command))) (command "_.undo" "_e") (setvar "highlight" hi) (setvar "blipmode" bm))) (princ) ) (defun cdf (l) (command "_.setvar" "lastpoint" l) (getvar "lastpoint") ) (defun sdf (l) (read (strcat "(" l ")")) ) (defun noz (p) (list (car p) (cadr p)) ) (defun strtrim (s) (while (eq " " (substr s 1 1)) (setq s (substr s 2))) (while (eq " " (substr s (strlen s))) (setq s (substr s 1 (1- (strlen s))))) (cond ( (eq s "") nil) (t s)) ) (princ "\nC:ASCPOINT loaded. Start command with ASCPOINT. ") (princ) ;;

Bonsoir Mr Esbe Et OUI moi aussi j'oublie des choses ... :mad: Bientot le Demi-Siecle et toi ? Le Decapode

Bonsoir Si je me souviens bien, cette commande "_BATTMAN" etait dispo dans les routines Bonus/Express depuis longtemps ... :) Mais pas forcément connue :( Le Decapode [Edité le 7/11/2005 par lecrabe]