Bred

Pour joindre in fichier, tu dois l'enregistrer dans un serveur, par exemple celui-ci. Ensuite, comme une image, tu y colle le chemin généré avec les BB-code des url. http://le chemin du fichier

Re, Comme je bosse en 3D, je n'ai aucun bloc dynamique... pourrais-tu en joindre un stp que je puisse regarder ? merci.

Salut BIGC-ROMU, nos derniers messages se sont croisés, Si je comprends bien tu veux pour chaque case un onglet, avec une fenêtre pointant sur chaque fois une case ?

Merci du test mdsv31, j'avoue que je ne comprends pas pourquoi cela n'est pas cadré chez moi... Je paramètre bien en avance une première impression (j'applique en fait), mais le cadre de sélection est au final décalé (alors que je suis sûr que mes coordonnées sont bonnes) Je suis bien en centré (j'ai même forcé le centrage pour test dans le lisp, sans succès...) :casstet: Si ça fonctionne pour tout le monde, tant mieux.... PS mdsv31 : Mais je n'ai jamais dit de tel chose ! Si j'ai quelque fois fait des remarques à ce sujet, c'est pour plaisanter ! Je ne demande en fait pas de remerciement, je ne suis pas là pour ça, ce qui m'importe le plus, et je ne suis pas le seul, c'est de savoir si les solutions que l'on propose fonctionne ! (parce que l'on passe un peu de temps dessus, et même si c'est avec plaisir et dans le but de faire des exercices, j'aimerais justement savoir si j'ai juste ou pas !) .. c'est marrant ça... en ce moment je me fais démonter indirectement par les réflexions des autre, car une personne à déformer totalement mes propos... ça commence à me courir ! Que quelqu'un me sorte une seul réflexion dans un post ou j'ai fais des remarques désobligeante, ce serait bien pour moi, car je ne m'en suis pas aperçu....

Bon, désolé, là je ne trouve pas... je ne comprends pas pourquoi ce n'est pas cadré.... Les coordonnées de la fenêtre sont bonne, mais ça ne fonctionne pas.

Re, attends, j'ai un peu plus testé et j'ai l'impression d'avoir un problème de cadrage, tu ma le confirmes stp ?

Re, OK désolé... Je vais essayer d'être plus détaillé : Personnellement, j'ai le bug avec un bloc insérer à partir d'une bibliothèque de dwg créer avec la commande wbloc. j'ai testé avec des anciens blocs, ainsi que des récents crée avec la 2009, le problème est le même. Attention : ce bug ne semble être valable que pour des dwg insérer en tant que bloc et créer avec wbloc. Si vous l'essayez avec un bloc de la collection ayant été créer par la commande "bloc", il n'y a pas de bug. Vous insérez donc le dwg de la bibliothèque (avec la commande inserer par exemple) Quand celui-ci est inséré, vous le copier : 1er point là, avant de taper le second point, vous lancer un orbite 3D avec Maj+Clic-Mollette Quand vous relâchez, vous n'avez plus que le bloc au bout du curseur. tous le reste du plan est invisible. Vous cliquer donc le 2nd point n'importe où, le dessin est toujours invisible. il faut faire un regen pour que tous s'affiche. Ce bug est aussi valable pour les commandes déplacer et rotation. Dites le moi si je ne suis pas encore clair....

Re, Tiens, j'ai fais ça, reagrde si ça te conviens (et si il n'y a pas d'erreur, car j'ai fait ça sans trop tester....) Il faut que tu ais déjà paramétrer l'imprimante et sa config, puis tu lance la commande "impt", tu sélectionne le bloc correspondant au cadre de la feuille que tu veux imprimer. Le programme va sélectionner tous les même bloc, et les imprimer à la suite... (test d'abord sur un petit nombre...) ; imprime tous les cadre/bloc identique d'un page (defun c:impt (/ AC-DOC ACDOC B P1 P2 I SEL XMIN YMAX) (vl-load-com) (while (not sel) (setq sel (car (entsel "\n Choix du cadre (Bloc) :"))) (if sel (if (not (equal (vla-get-ObjectName (setq b (vlax-ename->vla-object sel))) "AcDbBlockReference")) (setq sel nil))) ) (setq sel (ssget (list (cons 2 (vla-get-name b)))) AcDoc (vla-get-activedocument (vlax-get-acad-object))) (repeat (setq i (sslength sel)) (vla-GetBoundingBox (vlax-ename->vla-object (ssname sel (setq i (1- i)))) 'xmin 'ymax) (setq p1 (vlax-make-safearray vlax-vbdouble (cons 0 1)) p2 (vlax-make-safearray vlax-vbdouble (cons 0 1))) (vlax-make-variant (vlax-safearray-fill p1 (list (car (vlax-safearray->list xmin)) (cadr (vlax-safearray->list xmin))))) (vlax-make-variant (vlax-safearray-fill p2 (list (car (vlax-safearray->list ymax)) (cadr (vlax-safearray->list ymax))))) (vla-setwindowtoplot (vla-get-activelayout AcDoc) p1 p2) ;(vla-put-PlotType (vla-get-activelayout AcDoc) acWindow) ;(vla-put-CenterPlot (vla-get-activelayout AcDoc) :vlax-false) (vl-cmdf "_-plot" "" "" "" "" "" "" "") ) (princ) ) [Edité le 23/6/2008 par Bred]

Salut, juste pour peut-être réfléchir à une idée de code : tes cadres de feuilles ne serait-ce pas un bloc ?

Bien sur... même si j'attends un minimum de remerciement pour l'aide apporté, moi même je remercie peur-être plus que de mesure quand on m'apporte de l'aide, mais je prefers en faire plus que de paraitre non reconnaissant ! Mais ce n'est pas le cas pour ce post ! Et qui plus est, ma dernière remarque n'étais pas dans l'attente de "félicitation", mais parce que j'avais parlé de cet arx permettant d'avoir les onglets, et quelques messages après d'autre en parle comme si de rien n'étais... ce n'est pas la même chose, et qui plus est ma réflexion étais à prendre comme une plaisanterie ! Ce n'est pas ma discussion sur la religion, qui n'a pas été compris comme étant un total second degré, plus que la personne me répondant a voulu discréditer mes réponses (relis le post que tu sembles citer dans son intégralité.)

Moi c'est le nouvel outils "visuel" de la 2009 -et que tu cites- que je ne peux pas utiliser, pour cause d'ordi pas assez puissant... (Bi-Xeon 3.8 Ghz et CG GeForce 7600 GS 2Go RAM quand même...) J'ai d'ailleurs "chuinté" toutes les nouveautés graphique "ViewCube", "Steeringwells" ... trop lourds ! et j'ai remis les onglets pour les présentations...

Salut, c'est bizarre, mais j'ai l'impression que mon message est vraiment passé inaperçu... Ma réponse N°2 n'est pas lisible ? :casstet: J'aurais de problème pour me faire comprendre en ce moment ?

Je te pris de m'excuser si je t'ai froissé, mais je fais juste une remarque sur ça : Ce qui moi m'a "froissé" aussi, surtout que tu utilises ce terme aussi... d'où ma capture d'écran. Parce que insérer un "Wbloc" n'est pas clair ?... :casstet: C'est gentil de m'aider... mais je trouve plutôt que tu compliques.... POur rappel, voilà ce que je dis : :casstet: :casstet: :casstet: c'est sûr que cela veux dire autre chose que le fait qu'un "Wbloc" soit insérer.... ... ou alors, désolé, mais je ne comprends vraiment rien à tes remarques... si tu parles du fait que lorsque l'on utilise la commande Wbloc on ai l'option de transformer en bloc en validant (dans ta "façon 3"), je ne dis jamais cela... et ce n'est pas ce que je dis dans mon post. Il faut Insérer un Bloc créer avec la commande Wbloc, et faire la manip que j'explique :

En effet, je l'ai dit, mais un "Wbloc" est compréhensible je pense. Comme quoi, il n'y a que les imbécile qui ne change pas d'avis, comme on dis... (et ce n'est pas le seul exemple que j'ai trouvé) mais si dans ce cas là le changement d'avis n'étais pas nécessaire... pour la compréhension... http://xs128.xs.to/xs128/08261/2008-06-23_141628348.jpg

Salut, un lisp vite fait qui projètes les points 3D au niveau 0 sur Z : Utilisation de la routine LST2MAT et SUBLST de (gile) - merci - Commande : p2d3d ;;; transforme poly3D en poly2D (defun c:p2d3d (/ ACDOC COORD COORDF PLINE SEL I P) (vl-load-com) (or (setq sel (ssget '((0 . "POLYLINE")))) (setq sel (ssget "_X" '((0 . "POLYLINE"))))) (setq AcDoc (vla-get-ActiveDocument (vlax-get-acad-object))) (repeat (setq i (sslength sel)) (setq p (vlax-ename->vla-object (ssname sel (setq i (1- i)))) coordF nil coord (lst2mat (vlax-safearray->list (vlax-variant-value (vla-get-coordinates p))) 3)) (foreach n coord (setq coordF (append coordF (list (car n) (cadr n) 0.0)))) (setq pline (vla-addPolyline (if (= (getvar "CVPORT") 1) (vla-get-PaperSpace AcDoc) (vla-get-ModelSpace AcDoc) ) (vlax-make-variant (vlax-SafeArray-fill (vlax-make-SafeArray vlax-vbDouble (cons 0 (1- (length coordF))))coordF)))) (vla-delete p)) ) ;;; LST2MAT Retourne un liste de listes du nombre ; ;;; d'éléments spécifié (matrice) ; ;;; (lst2mat '(1 2 3 4 5 6) 2) -> ((1 2) (3 4) (5 6)) ; ;;; (lst2mat '(1 2 3 4 5 6) 3) -> ((1 2 3) (4 5 6)) ; (defun lst2mat (lst n) (if (and lst (zerop (rem (length lst) n))) (cons (sublst lst 1 n) (lst2mat (sublst lst (1+ n) (- (length lst) n)) n) ) ) ) ;;; SUBLST Retourne une sous-liste ; ;;; Premier élément : 1 ; ;;; (sublst '(1 2 3 4 5 6) 3 2) -> (3 4) ; ;;; (sublst '(1 2 3 4 5 6) 3 -1) -> (3 4 5 6) ; ;;; (sublst '(1 2 3 4 5 6) 3 12) -> (3 4 5 6) ; ;;; (sublst '(1 2 3 4 5 6) 3 nil) -> (3 4 5 6) ; (defun sublst (lst start leng / rslt) (if (not (<= 1 leng (- (length lst) start))) (setq leng (- (length lst) (1- start))) ) (repeat leng (setq rslt (cons (nth (1- start) lst) rslt) start (1+ start)) ) (reverse rslt) ) Edit : Ajout du (vl-load-com) [Edité le 28/8/2009 par Bred]

Salut, Tu as "Ctrl+Tab" pour passer d'un dessin a l'autre (et Ctrl+Maj+Tab pour l'autre sens). Autrement, pour la gestion des plans ouverts, tu as un ARX qui te permet de les afficher en onglet et qui s'appel "MdiTab17.arx" (fais une recherche dans Google) Ha - Edit - Doublon avec Bonuscad (je temps de chercher ne nom de l'Arx, et hop, doublé ! :P ) [Edité le 23/6/2008 par Bred]

Re, En effet. c'est ça, un "Wbloc"... ou si tu veux un dwg dont on se sert comme d'un "dwg crées avec la commande Wbloc".... Si tu veux jouer sur les mots et perdre du temps à ça, je ne pense pas que cela fasse beaucoup avancer ce post. As-tu testé ce que je décris ? Mais par contre la différence est tout de même importante, car le bug cité ne fonctionne qu'avec des "Wbloc" (ou si tu veux "un dwg insérer en bloc dans le dessin)... et non pas des "bloc", (c'est à dire un bloc défini dans la seule collection de ce plan.) Et pour info Ce n'est pas parce que l'on crées un "Wbloc" que l'on en fait une bibliothèque. On peux aussi travailler avec des "Wbloc" à la manière des Xref (selon ce que l'on veux faire) Beaucoup de collègue travaille de cette manière.

Salut, En effet, c'est pour ça que je le met entre guillemet (je crois que cela ce fait quand on utilise des thermes inexact, mais susceptible de se rapprocher de sa définition) Mais comment appellerais-tu un bloc créer avec la commande Wbloc pour le différencier d'un bloc créer avec la commande Bloc ? :casstet:

Salut, Non à part t'envoyer un fichier vide avec un wbloc inséré dedans... As-tu bien testé avec un "WBLOC" ? je crois qu'avec un bloc "simple" le bug ne se produit pas. A moins que MAP ne le fasse pas...

Re, j'ai tester la transparence en essayant de bidouiller un truc avec les rendu et la "translucidité" des matériaux, mais je n'ai pas réussis à adapter ça à des plans en "trais" 2D... désolé.

En fait, pour moi, cette version 2009, avec cette nouveauté "le ruban", je trouve ça génial : grâce à ça, je me suis mis à apprendre d'autre raccourci clavier que je n'utilisais jamais, afin d'éviter d'utiliser ce dit ruban... Il y a de bonne chose à tous... ;)

Si c'est pour apprendre le lisp, ne commence pas par mon code, il utilise des commandes qui sont pour un niveau non débutant. Si c'est juste pour le charger et l'utiliser, tu peux aller voir l'explication de (gile) ici !

Re, pour l'instant ce n'est pas transmis dans Excel, car je ne sais pas trop comment te ranger ces deux valeurs (Nombre et longueur, en colonne ? en ligne ?) Donc, avec le résultat dans une boite de dialogue : Taper "LH" pour lancer la commande. (defun c:lh (/ ACDOC L N SEL) (setq AcDoc (vla-get-activedocument (vlax-get-acad-object)) sel (ssget '((0 . "LINE"))) n 0 l 0) (vlax-for e (vla-get-activeselectionset AcDoc) (if (equal (cadr (vlax-get e 'StartPoint)) (cadr (vlax-get e 'EndPoint))) (setq n (1+ n) l (+ (vla-get-Length e) l)))) (alert (strcat "Nombre de Ligne Horizontale : " (rtos n) "\nLongueur Totale : " (rtos l))) (princ) )

C'est que tu dois avoir des menu perso. As-tu essayer de changer (raccourcir) l'intitulé de tes menus ?

Il triche, le filou ! ;) ça doit être fait avec un captureur d'écran...