x_all

oui atomick bug connu, en fait il faut créer un filtre de calque "tout sauf Xref" en filtrant sur "~*|*" voir ici http://cadxp.com/top...lques-des-xref/ pour le hot fix mon anglais est trop sommaire pour comprendre le pb.. une histoire d'ellipse?

un truc comme ça? http://cadxp.com/topic/33623-export-du-gestionnaire-des-proprietes-des-calques-vers-excel/ ou ça? http://cadxp.com/topic/29407-inpresion-liste-calque/

compte les clics avec sstl; 1 clic et 4 lettres... 2 secondes maxi si tu as pas eu ton café du matin... et franchement ne pas mettre spécial sélection dans les lisp au démarage c'est se privé de ssc, ssl, sse qui me servent plusieurs fois par jour

ou sinon, c'est intégré au spécial sélection de (gile) appel par sstl

sinon, il y a pas mal de lisps pour traiter les blocs et y placer toutes les entité en claque 0, couleur dubloc ou ducalque ... cherche editblocs de (gile) ou rb sur des Xref archicad ça fait des miracles...

j'avais fait ça pour expliquer aux stagiaires http://joch04.free.fr/achtml/methodo.htm#ob

Il y a peut etre un pb de formation bien qu'il y ai eu une formation, mais leur soucis principaux sont en terme de gestion des éléments de détail et du rendu Pour le 1ere, trop de réglages pour avoir un rendu 2d correct, les mises en page sont pas pratique, et en terme de qualité 2d c'est moche. Pour l'autre, qui était déja un pro de la 3d sur Archicad, il m'a tenu à peu près le même discours, à part que lui il râle sur les rendus 3d et les textures. Mon ressenti perso, le 1er n'a pas tort sur le fond, la gestion des vues est quand même une gigantesque usine à gaz, faire un gabarit résous pas mal de pb, mais celui par défaut est bidon et en faire un adapté au normes prend énormément de temps. (allez trouver l'épaisseur des mur coupé sur les élévations, demande bac +2) Pour le deuxième je suis plus mitigé, les rendus Revit sont pas si moches même si la gestion des lumières et des textures n'est pas des plus souples et très approximatives (toujours pas réussi à faire un mappage uvw correct) , mais on peux s'en sortir... Ne connaissant pas Archicad (il faudrait que je le teste quand même depuis le temps, je ne peux pas juger si leur arguments sont réels et si c'est vrai que dans ces domaine précis, il répond mieux aux attentes des archis. Après je crois que comme quand on est passé du dessin à la main au dessin CAO, il y a eu un temps d'adaptation. Un beau plan à la main bien fait c'est magnifique (sisi les vieux de la vielle savent de quoi je parle). On y a trouvé son comte car la CAO faisait gagner du temps sur les modif, la gestion des Xref, les blocs les calques... A l'époque Autocad s'est imposé car c'était l'outil le plus adapté au besoins des B.E. et finalement il était très souple et adaptable Et puis à l'époque totocad n'avait pas de concurrence... Je ne suis pas encore persuadé que pour le virage du BIM, Revit soit le plus adapté et ce qui est sur c'est qu'il y à une énorme concurrence. Archicad fait des maquettes 3d et des plans depuis des années, j'ai pas trop de mal à imaginer qu'il soit performant.

merci pour vos retour d'expérience Je note, je me doute que ça n'infléchira pas la la politique de todesk mais il rique d'y avoir une grosse hémoragie vers d'autre solutions j'ai déja 2 gros cabinet d'archi qui abandonne revit pour archicad suite a un manque de souplesse du soft (j'ai pas bien compris leur arguments mais ils ont l'air remonté comme des pendules) les objets proxi ont jamais été super exportable, à mois d'utiliser EXPORTODWG (de mémoire) et pour le reste on trouvera des solutions pour info, chez nous 8 licences Autocad 2010 et une seule souscription et tant qu'on change pas les postes, je ne voie pas le patron changer de politique

je dis ça je dis rien (du coup je ferai peut être mieux de fermer ma ..) mais le PDF à remplacé le plt depuis une paire d'année quand même. c'est devenu un standard de fait car le lecteur est universel... je ne dis pas le les plt c'est nul, mais ça fait un peu vielle garde... un peu comme les transfert de fichier avec un modem et telnet... ça marche bien, mais un fichier dans un courriel c'est quand même plus pratique... ha !, le son du modem 56k le soir dans une agence d'archi déserte... j'étais jeune et enthousiaste... seulement 8 mn pour un fichier de 3mo !!

ben quoi? il marche bien son bloc, tu le déplace en Z, ou tu changes la position en Z dans les propriétés, tu fait un regen et ho, magie, le Z apparait... après, si tu veux voir le détail du champ, un double clic sut l'alti, ça ouvre la fenêtre pour remplir / modifier un attribut tu ne change surtout pas la valeur à la main, mais tu fait un clic droite

tien? n'étant pas amateur de ce type d'entités, j'étais passé à coté de cette "nouvelle" commande merci pour la piqure de rappel, comme quoi il y a des développeurs chez tocad qui font autre chose que du design d’icônes (humour off)

j' ai vu passer un lisp qui converti une spine en poly S2P http://cadxp.com/topic/28979-svp-test-routine-s2plsp-sur-acad-20102011/

quelle version d'autocad? cherche l'espace de travail modélisation 3d à priori, tu fait un balayage pour générer ton tunnel un autre avec un tout petit diamètre pour générer un solide de contrôle, puis tu fait une différence booléenne du solide avec le tunnel si rien ne reste c'est que tu est dedans... mais il y a d'autre méthodes avec aretes d'intersections ...

c'est vrai qu'il mettent l'accent sur la 3d avec les dwf (que personne n'utilise) et les fbx qui on du mal à être compatible entre 2 soft autodesk (enfin sur ma revit 2014 ça marchait très mal) pour faire des pdf 3d, c'est ici https://www.bentley.com/en/products/product-line/modeling-and-visualization-software/bentley-view

une question me turlupine... pdf, pdf ok, mais qq1 à testé les pdf3d? gaine clim.pdf

ha yes... pas mal ce truc !! c'est rudement pratique. on peu même donner un delta en +- merci beaucoup !

Bonjour Quand on veux ajuster un point sur le contour d'une plateforme, on double-clique à proximité du coin. Il est mal heureusement rare que tout se passe bien, c'est à dire qu'instantanément la bonne ligne soit sélectionner dans le tableau.. C'est même un peu gavant à la longue... surtout si les hachures qui marquent la plt sont un peu grosse N'y a t il pas une commande magique pour affecter une alti directement en cliquant sur le texte d'affichage? ou enfin un truc qui marche mieux... merci

pareil ici, bouger des poignées ou changer la valeur dans les propriétés donne des résultat similaire si le bloc est "bien fait" Il y a tout de même un bug connu quand le bloc n'est pas à une échelle uniforme, les poignées ont tendance à disparaître... par précaution, dans le paramètre linéaire je ne laisse qu'une poignée pour être sur de la direction..

je n'ai pas la solution pour + de 40 hachures, mais c'est parce que je suis pas fan des hachures pour les surfaces. Si dans sa définition il y a un point double ou un autre petit défaut, elle n'est pas comptabilisée. je préfère générer les contours avec HATCHGENERATEBOUNDARY et totaliser les surfaces de polylignes avec un lisp. si tu prend la précaution de te mettre dans un calque vierge quand tu génère les contours, tu les sélectionne avec SSL (spécial sélection de (gile)) et il y a pas mal de lisp qui traîne sur le forum pour faire la somme...

effectivement... ça se complique confirmes tu que le n° du repère avec le quel tu as fait le test est HAB-8 ? on devrai pouvoir bricoler un truc sur la base de OUA je remet le code ici [size=2][/size];;;================================================================= ;;; ;;; OUA.LSP V1.01 ;;; ;;; Localiser des blocs ;;; ;;; Copyright (C) Patrick_35 ;;; ;;;================================================================= (defun c:oua(/ bas cle doc ent fic lst nbl pos pt s sel tbl tot totg val xd xt *erroua* dessine_ligne inputbox msgbox recherche_nom) ;;;--------------------------------------------------------------- ;;; ;;; Gestion des erreurs ;;; ;;;--------------------------------------------------------------- (defun *erroua* (msg) (or (member (strcase msg) '("FUNCTION CANCELLED" ""QUIT / EXIT ABORT"" "FONCTION ANNULEE" "QUITTER / SORTIR ABANDON")) (princ (strcat "\nErreur : " msg)) ) (vla-endundomark doc) (setq *error* s) (princ) ) ;;;--------------------------------------------------------------- ;;; ;;; Message ;;; ;;;--------------------------------------------------------------- (defun MsgBox (Titre Bouttons Message / Reponse WshShell) (vl-load-com) (setq WshShell (vlax-create-object "WScript.Shell")) (setq Reponse (vlax-invoke WshShell 'Popup Message 0 Titre (itoa Bouttons))) (vlax-release-object WshShell) Reponse ) ;------------------------------------------------------------------------- ; Saisir une valeur via une boite de dialogue ;------------------------------------------------------------------------- ;; InputBox (gile) ;; Ouvre une boite de dialogue pour récupérer une valeur ;; sous forme de chaine de caractère ;; ;; Arguments ;; tous les arguments sont de chaines de caractère (ou "") ;; box : titre de la boite de dialogue ;; msg : message d'invite ;; val : valeur par défaut ;; ;; Retour ;; une chaine ("" si annulation) (defun InputBox (box msg val / subr temp file dcl_id ret) ;; Retour chariot automatique à 50 caractères (defun subr (str / pos) (if (and (< 50 (strlen str)) (setq pos (vl-string-position 32 (substr str 1 50) nil T)) ) (strcat ":text_part{label=\"" (substr str 1 pos) "\";}" (subr (substr str (+ 2 pos))) ) (strcat ":text_part{label=\"" str "\";}") ) ) ;; Créer un fichier DCL temporaire (setq temp (vl-filename-mktemp "Tmp.dcl") file (open temp "w") ret "" ) ;; Ecrire le fichier (write-line (strcat "InputBox:dialog{key=\"box\";initial_focus=\"val\";spacer;:paragraph{" (subr msg) "}spacer;:edit_box{key=\"val\";edit_width=54;allow_accept=true;} spacer;ok_cancel;}" ) file ) (close file) ;; Ouvrir la boite de dialogue (setq dcl_id (load_dialog temp)) (if (not (new_dialog "InputBox" dcl_id)) (exit) ) (set_tile "box" box) (set_tile "val" val) (action_tile "accept" "(setq ret (get_tile \"val\")) (done_dialog)" ) (start_dialog) (unload_dialog dcl_id) ;;Supprimer le fichier (vl-file-delete temp) ret ) ;;;--------------------------------------------------------------- ;;; ;;; Filtre les blocs anonymes et ceux associés aux xrefs ;;; ;;;--------------------------------------------------------------- (defun recherche_nom(ent) (or (wcmatch (vla-get-name ent) "`**,*|*") (eq (vla-get-isxref ent) :vlax-true) (not (eq (logand (cdr (assoc 70 (tblsearch "block" (vla-get-name ent)))) 2) 2)) (setq tbl (cons (vla-get-name ent) tbl)) ) ) ;;;--------------------------------------------------------------- ;;; ;;; Dessine une ligne de 0,0 au point d'insertion du bloc ;;; ;;;--------------------------------------------------------------- (defun dessine_ligne(ent / bl lay lst) (setq lst (mapcar 'vla-get-textstring (vlax-invoke ent 'getattributes))) (if (member val lst) (progn (setq lay (vla-item (vla-get-layers doc) (vla-get-layer ent))) (if (vlax-property-available-p ent 'EffectiveName) (setq bl (vla-get-effectivename ent)) (setq bl (vla-get-name ent)) ) (if (eq nbl bl) (setq totg (1+ totg)) ) (and (eq (vla-get-freeze lay) :vlax-false) (eq (vla-get-layeron lay) :vlax-true) (eq (vla-get-lock lay) :vlax-false) (eq nbl bl) (not (member (vlax-make-variant (vla-get-name lay)) lst)) (entmake (list (cons 0 "LINE") (cons 8 (vla-get-name lay)) (cons 10 (trans pt 1 0)) (cons 11 (vlax-get ent 'insertionpoint)) (cons 410 (vla-get-name (vla-get-layout (vla-objectidtoobject (vla-get-database ent)(vla-get-ownerid ent))))) ) ) (setq tot (1+ tot)) ) ) ) (princ) ) ;;;--------------------------------------------------------------- ;;; ;;; Routine principale ;;; ;;;--------------------------------------------------------------- (vl-load-com) (setq doc (vla-get-activedocument (vlax-get-acad-object)) cle "HKEY_CURRENT_USER\\Software\\Autodesk\\Autocad\\Patrick_35" val "" s *error* *error* *erroua* ) (if (vl-registry-read cle "Base_Ou_X") (setq pt (list (atof (vl-registry-read cle "Base_Ou_X")) (atof (vl-registry-read cle "Base_Ou_Y")) (atof (vl-registry-read cle "Base_Ou_Z")) ) ) (setq pt '(0.0 0.0 0.0)) ) (vla-startundomark doc) (while (not bas) (initget "Choix Origine") (setq sel (entsel "\nSélectionnez un Bloc / Choix / Origine : ")) (if (eq sel "Origine") (progn (if (setq bas (getpoint (strcat "\nVeuillez saisir le point d'origine (" (rtos (car pt) (getvar "lunits") 2) "," (rtos (cadr pt) (getvar "lunits") 2) "," (rtos (caddr pt) (getvar "lunits") 2) ") : "))) (progn (setq pt bas) (vl-registry-write cle "Base_Ou_X" (rtos (car pt))) (vl-registry-write cle "Base_Ou_Y" (rtos (cadr pt))) (vl-registry-write cle "Base_Ou_Z" (rtos (caddr pt))) ) ) (setq bas nil) ) (setq bas T) ) ) (if (eq sel "Choix") (if (setq fic (findfile "oua.dcl")) (progn (setq fic (load_dialog fic) pos "0") (vlax-map-collection (vla-get-blocks doc) 'recherche_nom) (new_dialog "oua" fic "") (start_list "bl") (mapcar 'add_list (setq tbl (acad_strlsort tbl))) (end_list) (set_tile "titre" "OUA V1.01") (set_tile "bl" pos) (mode_tile "cancel" 2) (action_tile "bl" "(setq pos $value)") (action_tile "accept" "(done_dialog 1)") (action_tile "cancel" "(done_dialog 0)") (if (eq (start_dialog) 1) (setq nbl (nth (atoi pos) tbl)) ) (unload_dialog fic) ) (msgbox "OUA" 16 "Le fichier OU.DCL est introuvable.") ) (if sel (if (and (eq (cdr (assoc 0 (entget (car sel)))) "INSERT") (eq (logand (cdr (assoc 70 (tblsearch "block" (cdr (assoc 2 (entget (car sel))))))) 2) 2) ) (progn (setq ent (vlax-ename->vla-object (car sel)) val (vla-get-textstring (car (vlax-invoke ent 'getattributes))) ) (if (not (vlax-property-available-p ent 'Path)) (if (vlax-property-available-p ent 'EffectiveName) (setq nbl (vla-get-effectivename ent)) (setq nbl (vla-get-name ent)) ) ) ) (princ "\nCe n'est pas un bloc avec attributs.") ) ) ) (if (and nbl (not (eq (setq val (inputbox "OUA V1.01" "Indiquez la valeur de l'attribut" val)) "")) (ssget "x" (list (cons 0 "INSERT") (cons 2 (strcat nbl ",`**")))) ) (progn (if (not (vl-catch-all-error-p (vl-catch-all-apply 'vla-get-activepviewport (list doc)))) (progn (vla-getxdata (vla-get-activepviewport doc) "" 'xt 'xd) (setq lst (vlax-safearray->list xd)) ) ) (setq totg 0 tot 0) (vlax-map-collection (setq sel (vla-get-activeselectionset doc)) 'dessine_ligne) (vla-delete sel) (princ (strcat "\n" (itoa totg) " " nbl " trouvé(s) et " (itoa tot) " ligne(s) de dessinée(s).")) ) ) (vla-endundomark doc) (setq *error* s) (princ) ) (setq nom_lisp "OUA") (if (/= app nil) (if (= (strcase (substr app (1+ (- (strlen app) (strlen nom_lisp))) (strlen nom_lisp))) nom_lisp) (princ (strcat "..." nom_lisp " chargé.")) (princ (strcat "\n" nom_lisp ".LSP Chargé.....Tapez " nom_lisp " pour l'éxecuter."))) (princ (strcat "\n" nom_lisp ".LSP Chargé......Tapez " nom_lisp " pour l'éxecuter."))) (setq nom_lisp nil) (princ) et le DCL // ================================================================= // // OUA.DCL V1.01 // // Copyright (C) Patrick_35 // // ================================================================= oua : dialog { key = "titre"; fixed_width = true; alignment = centered; is_cancel = true; width = 40; : list_box {label= "Bloc(s) avec attribut(s)" ; key="bl"; height = 15; multiple_select = false;} spacer; ok_cancel; } Mais c'est du VB et je ne voie pas bien quelle méthode utiliser.

si tes repères sont des blocs avec attributs , tu peux utiliser OUAT de Patrick35 il me semble si ce sont des textes , la fonction rechercher devrait marcher cherche 24

le plus simple c'est de gérer un type "Vierge" quand tu commerce ure famille. tu fais "enregistrer sous "ouverture vierge (par exemple si cet une ouverture tu règles ce qui reviens comme le types de texte et de cotes, d'unités _ il te suffit de repartir de ce fichier, puis de le , sauver sous"

il parlaient de ça sur the swamp http://www.tcbmi.com/strokeit/ mais j'ai un peu du mal à le faire fonctionner... je regarderai ce soir... Mais je suis étonné qu'il n'y a rien d'officiel chez todesk... il y a un pote qui bossait sur teckla il y a une 10saine d'année et qui contrôlait pratiquement tout avec un stylet sur une tablette avec des gestes simple et qui trouvait ça super productif.. il à eu du mal à reprendre une souris...

Bonjour se me suis payé une gaufre, une tablette Surface 3 avec le stylet ! C'est vraiment fun comme truc, bien sur, sous prétexte d test j'ai fini par installer AutoCAD Ça tourne plutôt pas mal, ça rame un peu bien sur, mais se me demande bien comment on fait pour valider. Ya il un moyen de gérer des gestes avec le stylet pour appeler des raccourcis ? la validation et échappe sont indispensables !!

Désolé pour le retard... je suis charrette avec ma nouvelle casquette avec le quelle je dois dessiner des plans béton (et c'est pas facile de dessiner du béton auquel je ne connais rien avec une casquette) bref, je n'ai pas le "loisir" pour finir ce programme... mais je garde les conseils sous le coude et les mettrai en application dés que j'ai 5mn.. merci encore.. Ps (gile) n'est pas une fonction.... Une dll à la limite... non je déconne, (gile) est le meilleur des contributeurs, le plus dévoué et le plus patient qu'il m'ait été donné de croiser sur les différent forum que je fréquente.. Il faudrait lui faire une statue avec tous les remerciement qu'on lui adresse...