Aller au contenu

vannes

Membres
  • Compteur de contenus

    97
  • Inscription

  • Dernière visite

Tout ce qui a été posté par vannes

  1. Pour Philsogood Je n'avais pas suivi mon poste! Donc voici une réponse très tardive! J'utilise le gestionnaire des Etats de Calque, uniquement, pour geler et dégeler des calques (en espace Objet ou en espace papier) Exemple: Plan topographique, Plan de Récolement EU, Epure d'Implantation... Aussi, je décoche la gestion des couleurs, type de ligne... Je ne travail pour ma part jamais avec "le style de tracé".
  2. Bien sur. C'est ce que je voulais exprimer dans ma conclusion.
  3. OK, je vais tester et je donnerai le résultat.
  4. Merci pour cette réponse. Donc, j'en conclu qu'un développement avec des commandes autocad est plus lent qu'un développement en autolisp qui est plus lent qu'un développement en visuallisp. Aussi, je dois privilégier un développement en visuallisp dans la mesure de mes compétences, de ma rapidité à créer un code et de l'enjeu de la commande à créer.
  5. vannes

    Résolution d'écran

    Merci pour ces éclaircissements: J'en conclu: - Windows seven pro 64bits OK (traitement de gros fichiers) - Processeur OK - Carte garphique OK - Ecrans à changer pour obtenir une plus haute résolution - RAM à passer à au moins 8 Mo
  6. vannes

    Hyperlien

    Super! Avec ces infos, je vais m'en sortir. Merci
  7. vannes

    Hyperlien

    Bonjour, J'ai un fichier ou j'utilise des liens hypertexte définis avec le chemin relatif prévu par autocad. Cependant, d'autres objets ont des liens hypertexte avec un chemin absolu. Mon service info. projette de changer de serveur et de nous assigner une nouvelle lettre. Aussi, je vais devoir changer le chemin de liens hypertexte d'une cinquantaine d'objet. J'aimerais connaitre la démarche pour accéder à la définition de l'hyperlien d'une entité autocad. Ainsi, avec un lisp, je pourrais automatiser cette démarche aujourd'hui et pour l'avenir. Merci d'avance
  8. vannes

    Résolution d'écran

    Effectivement , j'oubliais de spécifier que mon PC est doté de Windows seven Pro 64bits et de 6Mo de ram. J'en conclu que 6Mo c'est pas suffisant mais que je n'ai pas une machine au rabais. Ceci expliquerais peut-être mes problèmes lorsque j'insère une orthophoto! Il faut que j'en parle à mon service info. Cependant, que faudrait-il faire évoluer pour pouvoir obtenir une plus haute résolution?
  9. Bonjour, J'ai un service info. qui ne veut ou ne peut me répondre sur ce sujet. Quelles sont les caractéristiques qui permettent d'avoir une plus haute résolution d'affichage? - Résolution actuelle: 1680x1050 Caractéristiques de mon ordinateur et écran - Processeur: Intel® Xeon® CPU W3550@3.07GHZ 3.06GHZ - Carte graphique: NVIDIA Quadro 2000 Mémoire dédiée: 1024Mo Mémoire système partagée: 2807Mo - Ecran (deux): NEC AccuSync AS221wm (22 pouces) J'en profite de solliciter vos remarques sur cette configuration. Est-ce performant? Sachant que je traite uniquement du 2D et des fichiers de données topo. et de récolement de réseaux (généralement 10 mégas, rarement jusqu'à 50 mégas) Merci d'avance
  10. Bonjour, Quelles sont les avantages et les inconvénients (mes codes ne sont certainement pas parfait) de ces 3 développements suivants: Numéro 1: (setvar "CMDECHO" 0) (command "-calque" "_thaw" "*" "") (command "-calque" "_on" "*" "") (setvar "CMDECHO" 1) Numéro2: (setq I 0) (setq CALQUECARACTERISTIQUE1 (tblnext "LAYER" T)) (while (/= CALQUECARACTERISTIQUE1 nil) (setq CALQUE (cdr (assoc 2 CALQUECARACTERISTIQUE1))) (setq ETATGELERLIBERER (cdr (assoc 70 CALQUECARACTERISTIQUE1))) (setq COULEUR (cdr (assoc 62 CALQUECARACTERISTIQUE1))) (if (or (= ETATGELERLIBERER 1) (< COULEUR 0)) (progn (setq CALQUECARACTERISTIQUE2 (tblobjname "LAYER" CALQUE)) (setq CALQUECARACTERISTIQUELISTE (entget CALQUECARACTERISTIQUE2)) (if (= ETATGELERLIBERER 1) (setq CALQUECARACTERISTIQUELISTE (subst (cons 70 0) (assoc 70 CALQUECARACTERISTIQUELISTE) CALQUECARACTERISTIQUELISTE))) (if (< COULEUR 0) (progn (setq COULEUR (* COULEUR -1)) (setq CALQUECARACTERISTIQUELISTE (subst (cons 62 COULEUR) (assoc 62 CALQUECARACTERISTIQUELISTE) CALQUECARACTERISTIQUELISTE)) )) (entmod CALQUECARACTERISTIQUELISTE) )) (setq CALQUECARACTERISTIQUE1 (tblnext "LAYER")) (setq I (+ I 1)) ) (command "regen") Numéro 3: (vl-load-com) (setq acdoc (vla-get-Activedocument (vlax-get-acad-object))) (vlax-for CALQUE (vla-get-Layers acdoc) (if (/= (vla-get-Freeze CALQUE) :vlax-false) (progn (vla-put-Freeze CALQUE :vlax-false) )) (if (= (vla-get-LayerOn CALQUE) :vlax-false) (progn (vla-put-LayerOn CALQUE :vlax-true) )) ) (vla-regen acdoc acActiveViewport) (princ) ) Merci d'avance
  11. Bonjour, Je crée un nouveau dessin avec "Commencer avec un brouillon" avec le paramètre par défaut en métrique. Je suis équipé d'Autocad Map3D 2011 accompagné de Covadis 13.0d. Quelqu'un pourrait-il me donner la démarche afin de purger le style de texte "Legend"? A part le style de tableau qui fait référence à ce style de texte, je ne trouve aucune autre raison qui m'empêche de purger ce style de texte. Merci d'avance
  12. vannes

    Création d'une image

    Voici mon lisp: (defun C:VannesImageSave (/ ) (vl-load-com) (command "filedia" 0) ;;;(setenv "Background" "16777215") ;;;(command "tilemode" 0) ;;;(command "tilemode" 1) (vla-put-GraphicsWinModelBackgrndColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) "16777215") ;;;(setq BMPNAME (vl-filename-base (getvar "dwgname"))) ;;;(command "sauvebmp" BMPNAME "") (command "sauvebmp" "" "") (command "filedia" 1) ;;;(setenv "Background" "0") ;;;(command "tilemode" 0) ;;;(command "tilemode" 1) (vla-put-GraphicsWinModelBackgrndColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) "0") )
  13. vannes

    Création d'une image

    Merci à Maxence et à Patrick C'est OK, mon lisp est fait.
  14. Bonjour Je voudrais écrire un lisp me permettant de créer une image en passant ma couleur d'Arrière-plan uniforme de noir vers blanc et en exécutant la commande "sauveimg". Problème: - je ne sais pas comment passer de noir en blanc! - je ne connais pas la commande qui permet de sauvegarder sans que la boite de dialogue s'ouvre! (je m'inspire de ceci:(command "_.mslide" (vl-filename-base (getvar '"dwgname")))) Merci
  15. Bonjour, Je suis interressé par ce lisp, mais pour effacer un wipeout au lieu d'un point. Quelle modification doit être apportée alors à ce lisp?
  16. Bonjour, Responsable de l'environnement autocad dans mon service, je charge notre fichier "*.cuix" (sur serveur) en tant que fichier de personnalisation partiel. Pour les autres utilisateurs, le même "*.cuix" est chargé en tant que fichier de personnalisation d'entreprise (lecture seule). Ainsi, dès que je rajoute ou modifie des outils (commande lisp par exemple) dans des barres d'outils, dès que je modifie des menus déroulants, tous les utilisateurs bénéficient de ces modifications sans intervention de ma part sur leur poste. Pour le moment, je n'utilise pas de palettes d'outils, puisque nous utilisons encore des menus mosaïque d'image. Lorsque ce sera le cas, je retiens l'info de Patrick (Merci).
  17. Merci à Bryce et à Patrick. Je suis allé au plus simple et à ce que je maîtrise le plus, càd le lisp de Bryce. J'analyserais dès que j'aurai un moment le lisp de patrick. Pour philsogood: Un état de Calque permet de geler et dégeler des calques afin de passer d'un plan projet d'assainissement à un plan projet d'eau potable. C'est un exemple dans le cadre d'un projet de lotissement.
  18. Bonjour, Je souhaite supprimer tous mes "Etats de calque" par un lisp sans devoir ouvrir la boite de dialogue correspondante. La commande clavier pour ouvrir cette boite de dialogue est _layerstate. Stef
  19. Bonjour, Je souhaite purger par un lisp le Gestionnaire des Etats de Calque. J'ai trouvé plusieurs lisp qui permettent de nettoyer un fichier mais aucun qui parvient à supprimer tous les Etats de calque. Je remercie d'avance la personne qui me donnera le code en lisp ou en vlisp pour y arriver.
  20. Bonjour, Quelqu'un pourrait-il me donner la démarche afin de purger le style de texte "Legend". A part le style de tableau qui f
  21. Salut Gile je te sollicite à nouveau. Voici mon lisp tout simple: (defun C:VannesClose (/ ) (if (/= (getvar "catb") "Model") (command "_layout" "e" "Model")) ;;; (c:VannesVariableInit) ;;; (c:VannesCalqueAfficherTout) (initdia) (command "_close") ) Par contre, malgré la commande (initdia) la boite de dialogue ne s'ouvre toujours pas. Ca m'embèterais de passer du temps à créer cette boite!!! Ms si je n'ai pas le choix tant pis. Merci.
  22. Lorsque j'utilise la commande "_close" dans un lisp, je souhaiterais que la boite de dialogue s'ouvre. En effet, à l'exécution de la ligne (command "_close"), la macro réclame un résultat dans la ligne de commande. Merci.
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité