Bred

Salut, En fait, c'est une question de gain de performance pour l'affichage. Sur 2006, tu pouvais trouvé la vrais représentation maillé : c'était une option caché dans 3dconfig... (v puis ligne rapide uniquement) et DISPSILH sur 0 http://xs209.xs.to/xs209/06476/2006-1.jpg Sur 2007 cette option n'existe plus et à l'air d'être d'office... mais si tu fais un affichage "caché" avec la variable DISPSILH sur 0 ça donne ça : (ce qui n'est pas mieux, je te l'accorde... : :casstet: ) http://xs209.xs.to/xs209/06476/2007-1.jpg

J'ai édité la routine ci-dessous : - J'ai modifié le code pour la selection de la fenêtre (sur une proposition de (gile) ) - Je viens de découvrir la raison du rappel de la variable en fin de routine.... mieux vaut tard que jamais !!! (j'ai pas mal de routine à modifié, moi, maintenant !!!)

Réponse à 6h47... Tu es un lève tôt !!! merci pour ta solution !

Routine inutile : Voir Réponse 2. ------------------------------------------------------------------------------------------------- Salut, Ci-dessous une routine permettant de retourner les coordonnées en Espace Papier de l'origine d'une fenêtre. Utilité : Pouvoir situé un objet contenu dans une fenêtre afin de le "travailler" en espace papier (ex : entourer l'objet sur une fenêtre) Le code fonctionne pour des vues Parrallèles (droite, gauche, etc....) Maitre lispeur, à vos clavier, démonter/simplifier/perfectionner moi tout ça !!! ;) merci ! (defun Get-Coord-SCU-Fen_Esp-Pap (/ sel id_fenetre Coord_centre_fenetre/SCU coord_centre_fenetre Sens_vue Ech_Fen Coord_centre_fenetre/SCU) (if (= (getvar "TILEMODE") 1) (princ "\n ** Cette commande n'est valable que dans l'espace papier. **") (progn (if (= (getvar "CVPORT") 1) (progn (while (not (and (setq sel (car (entsel "\n Sélectionner une fenêtre :"))) (or (equal (cdr (assoc 0 (entget sel))) "VIEWPORT") (equal (cdr (assoc 0 (entget (cdr (assoc 330 (entget sel)))))) "VIEWPORT") ) ) ) ) (setq sel (entget sel) id_fenetre (cdr (assoc 69 sel))) (if (= id_fenetre nil) (progn (setq sel (entget (cdr (assoc 330 sel))) id_fenetre (cdr (assoc 69 sel))) ) ) (command "_.MSPACE") (setvar "CVPORT" id_fenetre) ) ) (setq Coord_centre_fenetre/SCU (getvar "VIEWCTR")) (command "_.PSPACE") (setq coord_centre_fenetre (cdr (assoc 10 sel)) Sens_vue (cdr (assoc 16 sel)) Ech_Fen (/(cdr (assoc 41 sel))(cdr (assoc 45 sel))) Coord_centre_fenetre/SCU (list (* Ech_Fen (car Coord_centre_fenetre/SCU)) (* Ech_Fen (cadr Coord_centre_fenetre/SCU)) (* Ech_Fen (caddr Coord_centre_fenetre/SCU)))) (cond ((equal sens_vue '(0.0 -1.0 0.0));VF (Setq Coord-SCU-Fen_Esp-Pap (list (- (car coord_centre_fenetre)(car Coord_centre_fenetre/SCU)) (- (cadr coord_centre_fenetre)(caddr Coord_centre_fenetre/SCU))))) ((equal sens_vue '(-1.0 0.0 0.0));VG (Setq Coord-SCU-Fen_Esp-Pap (list (+ (car coord_centre_fenetre)(cadr Coord_centre_fenetre/SCU)) (- (cadr coord_centre_fenetre)(caddr Coord_centre_fenetre/SCU))))) ((equal sens_vue '(1.0 0.0 0.0));VD (Setq Coord-SCU-Fen_Esp-Pap (list (+ (car coord_centre_fenetre)(* (cadr Coord_centre_fenetre/SCU) -1)) (- (cadr coord_centre_fenetre)(caddr Coord_centre_fenetre/SCU))))) ((equal sens_vue '(0.0 0.0 1.0));VH (Setq Coord-SCU-Fen_Esp-Pap (list (- (car coord_centre_fenetre)(car Coord_centre_fenetre/SCU)) (- (cadr coord_centre_fenetre)(cadr Coord_centre_fenetre/SCU))))) ((equal sens_vue '(0.0 0.0 -1.0));VB (Setq Coord-SCU-Fen_Esp-Pap (list (+ (car coord_centre_fenetre)(car Coord_centre_fenetre/SCU)) (- (cadr coord_centre_fenetre)(cadr Coord_centre_fenetre/SCU))))) ) ) ) Coord-SCU-Fen_Esp-Pap ) Pour le tester : lancer "test" (defun c:test (/ pt) (setq pt (Get-Coord-SCU-Fen_Esp-Pap)) (if pt (command "_circle" pt 2)) (princ) )[Edité le 25/11/2006 par Bred] [Edité le 25/11/2006 par Bred]

Re, - Pour SSget, j'écris souvent un texte avant, mais au final on à toujours "Choix des objets:", ce qui n'est pas trés explicite... (mais peut être que quelqu'un aurait dans ces cartons une fonction de selection de groupe plus personnalisable ??? ;) ) - OK pour la boucle plus concise (merci) - Par contre, j'ai un doute sur un truc : ton (while (not (and (setq sel (car (entsel "\n Sélectionner une fenêtre :"))) (equal (cdr (assoc 0 (entget sel))) "VIEWPORT") ) ) ) ne fonctionne que pour des fenêtre rectangulaires, tandis que (setq sel nil) (while (= sel nil) (while (not (setq sel (car (entsel "\n Sélectionner une fenêtre :"))))) (setq sel (entget sel)) (if (not (equal (cdr (assoc 0 sel)) "VIEWPORT")) (progn (if (not (equal [b](cdr (assoc 0 (entget (cdr (assoc 330 sel))))) "VIEWPORT"))[/b] (setq sel nil) ) ) ) ) fonctionne aussi pour les fenêtres polygonales, etc... (dxf 330 de l'entité cherche une "VIEWPORT" joint).

Salut, (gile), ta routine fonctionne.... mais après plusieur test 2 choses me dérange : - J'utilise personnellement de moins en moins souvent la fonction "ssget" pour le choix d'objet unitaire car on ne peut pas mettre de texte explicatif, donc je fais des "entsel" que je test en boucle... - Ta routine me gène au niveau visuel : la fenêtre est bien courante, mais on ne le vois pas visuelement : le cadre n'est pas "épaissi"... J'ai donc bidouillé un truc qui à l'air de fonctionner : (setq sel nil) (while (= sel nil) (while (= sel nil) (setq sel (entsel "\n Sélectionner une fenêtre :"))) (setq sel (entget (car sel))) (if (not (equal (cdr (assoc 0 sel)) "VIEWPORT")) (progn (if (not (equal (cdr (assoc 0 (entget (cdr (assoc 330 sel))))) "VIEWPORT")) (setq sel nil) ) ) ) ) (setq id_fenetre (cdr (assoc 69 sel))) (command "_.MSPACE") (setvar "CVPORT" id_fenetre) ... je ne suis pas trés content (et d'autre vont m'en faire la remarque ... ;) ) d'utiliser un "(command..." ... si vous avez l'équivalent, je suis preneur !!!

... peut-être sur un calque "non imprimé" ? (petite imprimante dans gestionnaire de calque) si même calque, alors réponse précédente superflus... (lais on ne sait jamais...)

merci (gile) !!! (je suis désolé de mon retard...)

... C'est ce que l'on appel ce faire avoir en beauté !!!... :P Je me suis fait avoir par l'ouverture des onglets su IE7, car lorsque j'ai cliqué sur http:// http://www.abcad.fr, je suis allé voir l'onglet déjà ouvert http:// http://www.bedetheque.com/auteur-11300-BD-Tramber.html à la place !!!.... ce n'est pas la première fois que ça m'arrive avec ces onglets !!!... :P

Salut Tramber, Je suis un gros fan de BD, mais j'avoue ne pas te connaitre en tant que tel car je suis plus dans la branche réaliste. Mais je tient à te saluer et je me pencherais certainement par curiosité sur tes oeuvres. Je vois que tu as fait partis à un moment du journal Métal Hurlant, as-tu lié des liens avec certains auteurs (je penses surtout à Moebius/Gir , Druillet, et autre humanoïde...)

Salut, Je bute sur un problème : je n'arrive pas à laisser la main en lisp à l'utilisateur afin qu'il puisse rendre une fenêtre courante (dans l'espace papier), afin de faire une selection à l'interieur... J'ai essayé (maladroitement) : (princ "\nSélectionner des Objets dans une fenêtre :") [b](command pause pause)[/b] (setq sel (ssget)) " (command pause pause) " ... était dans le but de laisser la possibilité du double clic ... Ah oui, j'ai essayé aussi : (setq sel (entget (car (entsel)))) (setq id_fenetre (cdr (assoc 69 sel))) (setvar "CVPORT" id_fenetre) (command "_.MSPACE") ... mais autocad refuse de me changer "CVPORT" (certainement à cause d'une "commande active"....) merci de votre aide ! [Edité le 22/11/2006 par Bred]

:casstet: J'ai du mal à comprendre comment ça à pû lui arriver alors ... Essaye de changer de profil (je ne garantis rien)

Salut, C'est en effet un problème d'affichage du gestionnaire des calques sur le deuxième écran. Le fait de changer le fichier sur un autre poste ne corrigeras rien : cela n'a rien à voir avec le fichier mais est dû au fonctionnement logiciel : Donc il faut que tu branches un second écran sur le poste de ton collègue pour déplacer le fenêtre de dialogue... [Edité le 22/11/2006 par Bred]

Salut, Pour une utilisation Professionnel (et soutenu) le developpemnt Autocad le + répondu (j'ai l'impression) est COVADIS.

testé : ça à l'air de fonctionner ! merci aussi ! :P [Edité le 21/12/2006 par Bred]

??? ... :casstet: :casstet: Alors là, je suis sur le ... Cela fonctionne... merci !!!! Comment as tu trouvé ça ??? (pour info, j'étais d'abord passé par la base de registre, mais comme c'est pour "forcé" le 1er chemin proposé de "DWG TO PDF", et ce "plot" fontionne en se lançant en récupérant le chemin de "PlotToFilePath" AVANT d'écrire dans la base de registre.... ce qui fait que je n'arrivais pas à forcé le premier chemin proposé...)

Salut, j'ai ecris une routine me changeant le chemin d'enregistrement d'impression dans fichier... Mon problème est que je n'arrive pas à supprimer le chemin existant pour y insérer le nouveau !... :casstet: (setq acadObject (vlax-get-acad-object) prefsObject (vlax-get-property acadObject 'Preferences) OutputObject (vlax-get-property prefsObject 'Output)) ; (vlax-dump-object OutputObject T) ;récup nom actif (setq DefaultPlotToFilePath (vlax-get-property OutputObject 'DefaultPlotToFilePath)) ;change nom (vlax-put-property OutputObject 'DefaultPlotToFilePath "c:\\Test\\") ... merci de votre aide !

Merci Maximilien, mais je ne charche pas à transformer les coordonnées, mais à situé ma vue dans la fenêtre par rapport au SCU espace Objet et coordonnées de la fenêtre. (Nos réponses précédentes ce sont croisés) [Edité le 20/11/2006 par Bred]

Ok, trouvé : en "travaillant" les coordonnées de "VIEWCTR" j'arrive à ce que je veux.

Salut, Dans l'espace Papier : Je cherche à connaitre les coordonnées d'origine du SCU par rapport à l'affichage de ma fenêtre... :casstet: Exemple : J'ai vu qu'avec le code dxf 10 je récupère les coordonnées du centre de la fenêtre... donc je voudrais connaitre les coordonnée de ce centre par rapport au SCU (espace objet) affiché dans cette fenêtre ... Raison : je veux insérer un texte à un point précis dans ma présentation, ce point précis étant donné par un objet dans l'espace objet. (imaginez un carré en escpace objet) je crée une fenêtre affichant ce carré, et je veux, en espace présentation, insérer un texte dans le carré (la seul donné que j'ai est l'entité de la fenêtre contenant le carré)... merci d'avance ! [Edité le 20/11/2006 par Bred]

Salut link93300, bienvenue sur ce forum, et restes-y... tu y apprendras beaucoup de chose ! (un exemple : Le fait de ne pas prendre la mouche à une remarque juste, mais au contraire de l'accepter et d'en tenir compte !) Saches, pour répondre à ta question, que les métiers de la CAO/DAO existent (preque) partout : en techniques quelqu'elle soit, en Médecine, Art, .... à toi de savoir ce qu'il te plait et de rechercher le métier y correspondant !... Tu es en "Génie Électrotechnique", celà doit pouvoir déboucher en CAO/DAO dans des secteurs de recherche de toutes sorte... que ce soit dans la création ou la technique, selon ta sensibilité. BTS ou DUT cela n'a pas d'importance : La CAO/DAO est un outil au service de tout ce qui existe : à toi de t'investir dans l'apprentissage de l'outils informatique et logiciel, et à te "vendre" et à prouver ta valeur (et ta motivation : l'un des points les + important dans le milieu professionnel quand on débute !). Bon courage et tiens nous au courant !

Salut, Si tu connais le VB, je te conseil le VB.net. Tu peux trouver des logiciels gratuits (perso j'ai Vb Express 2005). mais il te faudra peut-être une petite formation.... [Edité le 21/12/2006 par Bred]

Salut, (vl-mkdir "c:\\Monrepertoire")

Salut, Juste un post pour signaler ce qui m'arrive : peut-être certains on déjà eu le problème. Mon pack Office (2002 puis 2003) à toujours fonctionner "bizarrement" : Boutons ne répondant pas, taille de fenêtre faisant des sienne, ... désinstallation/réinstallation x fois sans succés ... (base de registre compris) Puis mon ordi à commencer à refuser de faire fonctionner un logiciel de synchro (SyncBack) : Le logiciel s'ouvre, commence à fonctionner, puis se ferme sans aucun préambule (et il n'est même plus dans les processus...) ... désinstallation/réinstallation x fois sans succés ... (base de registre compris) Puis j'ai fait un petit prog en VBA sous Excel, qui à fonctionner une dixaine de fois, puis... Excel refuse d'ouvrir tout fichier contenant des macro VBA (il se ferme tout simplement, comme le logiciel ci-dessus...) ... désinstallation/réinstallation x fois sans succés ... (base de registre compris) Et aujourd'hui : l'apothéose !!! J'avais un petit souci sur un prog en VBA sur Autocad 2007... je l'ai ouvert, puis refermé sans rien changé... et là.... Autocad refuse maintenant de charger mes DLL perso ! (réalisé avec VB.net) ... il se ferme comme décris ci-dessus au moment de les charger (ces DLL ont été utilisé et ont fonctionné une bonne centaines de fois auparavent !!!) ... le mot clef est : Macro VBA/.net ... (je soupsone le premier logiciel décris (Syncback) d'avoir été codé en VB.net) Appel à un informaticien (ingénieur réseaux) : ce doit être le noyaux d'office, qui, ne fonctionnant pas au départ, à foutu le bordel dans les DLL et autre fichiers système... Remède : tout formater ... Précaution pour le futur : Au vu de mon utilisation soutenu (prog+utilisation logiciel), il me conseille de refaire une installation générale tout les 6mois / 1 ans .... ... trés content moi ... :mad:

hou là !... c'est vrais, je n'avais pas vu qu'il parlait de F2 ... c'est pour ça que je ne comprenais pas pourquoi rien ne réagissais.... et donc le message qu'il dit avoir eu c'est le message de disparition de la ligne de commande... et il pensais l'avoir en faisant un F2... Tout est clair !... c'est vrais que je n'avais rien compris... mea culpa !!!...