vincentp010

Attention à vos données, rien n'est éternel ;) http://twitter.com/sirchamallow/statuses/138685960723505152?_escaped_fragment_=/sirchamallow/statuses/138685960723505152#!/sirchamallow/statuses/138685960723505152

Bonjour, non allons surement passer nos postes à Seven 64bits vers la fin de l'année. Je crois savoir que la version 2009 d'autocad existe en 64bits, si je pouvais avoir confirmation de cela ça serait pas mal. En fait après recherche la version 2009 existe en 64bits mais pas la version Map 3D 2009 :angry:

Non justement, il met exactement ce message d'erreur

Ça marche chez moi; tu peux remettre un lien avec ta polyligne dedans ?

Salut, c'est parce que ta polyligne n'est pas close. Si tu fais pedit clore ça marchera mieux.

As tu essayé l'etransmit sur un autre répertoire de destination, genre sur le réseau local ou un disque usb ?

A mon avis tu ne peux pas utiliser de command sur les objets dans le bloc, tu dois passer par les fonctions lisp pour supprimer le mtext et créer un texte avec les mêmes propriétés.

Rajoute avant ta commande explode (setq ent (vlax-vla-object->ename ent))

Salut, le point de base dans ton fichier bloc est bien aux coordonnées (0,0,0) du SCG ?

Salut, et as tu vérifié si ce qui est marqué dans le message d'erreur n'est pas vrais ???

Ok, j'étais pas loin de la bonne syntaxe. En fait je faisais l'opération dans le mauvais sens ;) Si on lance la commande (vla-put-TextAlignmentPoint txt pt) alors que le texte est aligné à gauche on obtient une erreur, c'est ce qu'il m'arrivait car je voulais changer le point d'alignement avant de changer l'alignement

Bonjour, j’essaie d'insérer un texte avec la commande (vla-addtext) puis de changer son point d'insertion à acAlignmentMiddleCenter, mais le texte est déplacé car le changement se fait sur le point d'alignement (0, 0, 0). Je voulais changer ça mais lorsque j'execute la commande suivante j’obtiens une erreur (vla-put-TextAlignmentPoint ent (vlax-3d-point pti)) ; erreur: Erreur Automation Non valable Il a t'il un moyen d’insérer directement le texte en choisissant l'alignement en visual lisp, car là je suis bloqué, à chaque fois j'ai le point d'insertion à gauche

Je viens de faire ça vite fait (defun c:dgrp (/ lst lst2 nb grou pts) (vl-load-com) ;---liste des groupes--- (setq grou (dictsearch (namedobjdict) "ACAD_GROUP")) (setq lst (vl-remove-if 'vl-symbolp (mapcar '(lambda (x) (if (or (= (car x) 3) (= (car x) 350)) (cdr x) T)) grou))) (setq nb 0 lst2 nil pts nil) (if (= lst nil) (progn (print "Pas de groupes dans le dessin") (exit))) (while (<= nb (length lst)) (if (< (length pts) 2) (progn (setq pts (append pts (list (nth nb lst)))) (setq nb (+ nb 1)) ) (progn (setq lst2 (append lst2 (list pts))) (setq pts nil) ) ) ) ;----------- ;; DCL load (setq tmp (WriteDcl)) (setq dcl_id (load_dialog tmp)) (if (not (new_dialog "dial" dcl_id)) (exit)) (start_list "lstg") (mapcar 'add_list (mapcar '(lambda (x) (car x)) lst2)) (end_list) (action_tile "degr" "(degroup (get_tile\"lstg\") lst2)") (start_dialog) (unload_dialog dcl_id) (vl-file-delete tmp) ) (defun degroup (lnb lst / a l lst2 nb) (setq l '()) (while (/= lnb "") (setq a (read lnb)) (setq l (cons a l)) (setq lnb (vl-string-left-trim " " lnb)) (setq lnb (vl-string-left-trim (itoa a) lnb)) ) (setq nb 0 lst2 lst) (while (< nb (length l)) (setq pos (nth nb l)) (entdel (cadr (nth pos lst))) (setq lst2 (vl-remove (nth pos lst) lst2)) (setq nb (+ nb 1)) ) (start_list "lstg") (mapcar 'add_list (mapcar '(lambda (x) (car x)) lst2)) (end_list) ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun WriteDcl () (setq fichier (vl-filename-mktemp "tmp.dcl")) (setq file (open fichier "w")) (write-line "dial : dialog { label = \"Multi degroupage\" ; : boxed_column { label = \"Selectionnez les groupes\"; : list_box { multiple_select = true; value = \"0\"; key = \"lstg\"; height = 15; fixed_height = true; width = 40; fixed_width = true; } : button { key = \"degr\"; label = \"Degrouper\"; width = 10; fixed_width = true; } spacer; } ok_only ; }" file ) (close file) fichier )

C'est normal, car autocad ne modifie pas le fichier à l'enregistrement, il le déplace en .bak et créer un nouveau fichier .dwg. Le fichier .dwg a donc les attributs de la dernière personne qui a fait l'enregistrement.

Je pense que c'est la méthode la plus simple, après il suffit juste de supprimer ce qui n'est pas "primitf" avec la commande filtrer

En détachant la xref mère, les enfants sont détachés aussi.

J'ai trouvé ce post avec une recherche PROCEDURE DE RECEPTION DE PLAN

Salut, tes hachures ne seraient pas sur un calque verrouillé par hasard ?

Salut, je n'ai pas très bien compris les histoires d'orientation. Pourrais tu être plus précis dans ton explication ?

Ce n'est pas spécifique à LT car sur une 2009 pleine, l'option n'existe pas non plus. Sinon il y a une méthode un peu triviale qui consiste à joindre la polyligne avec une autre en sens inverse, ce qui aura pour effet d'en inverser le sens (le sens gardé est celui de la première polyligne sélectionnée).

Salut, quand tu fais ton MNT il faut aller dans la fenêtre des paramètres afin de choisir ton calque de destination et plein d'autres options sur l'utilisation des points.

Le post date de 2005 et nom de domaine a expiré 1 ou 2 ans après ;)

Clique sur le bouton "modifier" sur ton premier post et ensuite "utiliser l’éditeur complet", de là tu peux modifier le titre.

Salut, j'ai trouvé ceci si ça t’intéresse http://geodesie.ign.fr/contenu/fichiers/Coordonnees_LambertI_Lallemand.pdf Par contre, le système lallemand a l'air de servir sur Paris, je ne vois donc pas ce que le Lambert 3 vient faire ici.

C'est bon ça marche, on vient d'installer un nouveau pare-feux sur le serveur et il bloquait le ftp.