salvanorigatore

en fait je me suis aperçu que c'est le même problème pour beaucoup d'autres commande comme par exemple déplacer, etc ... ce qui montre que ce n'est pas lié à copyclip mais que c'est un problème plus étendu ...:unsure:

Bonjour a tous, "à l’insu de mon plein gré" j'ai du modifier une variable ou quelque chose du genre et je suis dans une petite galère :wacko: Je m'explique : auparavant je sélectionnait un élément et je faisait un clic droit sur copier (ou ctrl + c) et l’élément se copiait, mais depuis que j'ai fait je ne sais pas quoi je suis obligé de faire d'abord la commande ensuite de sélectionner l’élément ! Est-ce que quelqu'un dans la galaxie CADXP saurait me dire ce que j'ai modifié et surtout comment revenir à la méthode d'avant ? Merci d'avance de votre aide :wub: Ciao.

Salut, apparemment non :(: regarde ici le dernier message en bas de page. Ciao.

Bonjour, voici le lien pour récupérer la version 2013 et en français s'il vous plait ... MDI Tabs 2013 petite précision ce n'est pas un fichier à charger mais un fichier exe qui s'installe tout seul Ciao.

oups...:unsure: je suis confus, toutes mes excuses maitre :wub: La prochaine fois je mettrais mes lunette avant ! Ciao.

Tu a raison Patrick_35 ton lisp est vraiment pratique et en plus je l'utilise régulièrement. Toutefois si tu me le permet je trouve vraiment dommage que, tout comme les autres, il ne propose pas d'enregistrer un fichier Excel avec les résultat, peut-etre tu pourrait rajouter cette option ? :wub: Ciao.

Bonjour, moi j'utilise celle-ci (qui n'est pas de moi hein :ph34r: mais je crois de (gille) ) qui à l'avantage de te proposer d'enregistrer un fichier avec les résultat. par contre les resultat dans la Fenetre de texte ne sont pas aussi bien rangés :( Peut-être un mélange des deux routines pourrait etre bien ...:wub: mais moi je ne sais pas faire :wacko: Ciao. (defun c:cnt-blk (/ obj ss n bl nom lst str file) (vl-load-com) (prompt "\nSélectionnez les blocs ou < Objet >: ") (if (not (setq ss (ssget '((0 . "INSERT"))))) (if (setq obj (car (entsel "\nSélectionnez l'objet délimitant la sélection: ") ) ) (if (member (cdr (assoc 0 (entget obj))) '("CIRCLE" "ELLIPSE" "LWPOLYLINE") ) (progn (ZoomObject (list (vlax-ename->vla-object obj))) (setq ss (SelByObj obj "WP" '((0 . "INSERT")))) ) (princ "\nEntité non valide.") ) (princ "\nAucune entité sélectionnée.") ) ) (if ss (progn (setq n (sslength ss)) (setq str (strcat "\n" (itoa n) " blocs dans la sélection\n") ) (repeat n (setq bl (vlax-ename->vla-object (ssname ss (setq n (1- n)))) nom (if (vlax-property-available-p bl 'EffectiveName) (vla-get-EffectiveName bl) (vla-get-Name bl) ) lst (if (assoc nom lst) (subst (cons nom (1+ (cdr (assoc nom lst)))) (assoc nom lst) lst ) (cons (cons nom 1) lst) ) ) ) (setq str (apply 'strcat (cons str (mapcar '(lambda (x) (strcat (car x) "\t" (itoa (cdr x)) "\n" ) ) lst ) ) ) ) (textscr) (princ str) (initget "Oui Non") (if (= (getkword "\nEnregistrer dans un fichier ? [Oui/Non] < Non >: " ) "Oui" ) (progn (setq file (open (getfiled "Créez ou sélectionnez un fichier" "" "xls" 1 ) "a" ) ) (princ str file) (close file) ) ) (graphscr) ) (princ "\nAucune entité sélectionnée.") ) (princ) ) ;; ZoomObject Effectue un zoom sur les objets contenus dans la liste ;; ;; Argument ;; objlst : une liste de vla-object ;; ;; Variables ;; dir : normale du plan de la vue courante ;; ang : angle de la vue courante ;; 3x3 : matrice de transformation du SCG vers la vue courante (dimension 3) ;; 4x4 : matrice de transformation du SCG vers la vue courante (dimension 4) ;; ptlst : liste des points minimum et maximum des bounding-boxes des objets sélectionnés (SCG) (defun ZoomObject (objlst / dir ang 3x3 4x4 ptlst) (vl-load-com) (setq dir (mapcar '- (trans (getvar "viewdir") 1 0) (trans '(0 0 0) 1 0) ) ang (- (getvar "viewtwist")) 3x3 (mxm (mapcar '(lambda (x) (trans x 0 dir)) '((1 0 0) (0 1 0) (0 0 1)) ) (list (list (cos ang) (- (sin ang)) 0) (list (sin ang) (cos ang) 0) '(0 0 1) ) ) 4x4 (append (mapcar '(lambda (v o) (append v (list o)) ) 3x3 '(0 0 0) ) (list '(0 0 0 1)) ) ) (foreach obj objlst (vla-TransformBy obj (vlax-tmatrix (trp 4x4))) (vla-getBoundingBox obj 'minpt 'maxpt) (vla-TransformBy obj (vlax-tmatrix 4x4)) (setq ptlst (cons (vlax-safearray->list minpt) (cons (vlax-safearray->list maxpt) ptlst) ) ) ) (vla-ZoomWindow (vlax-get-acad-object) (vlax-3d-point (mxv 3x3 (apply 'mapcar (cons 'min ptlst)))) (vlax-3d-point (mxv 3x3 (apply 'mapcar (cons 'max ptlst)))) ) ) ;; transpose une matrice Doug Wilson (defun trp (m) (apply 'mapcar (cons 'list m)) ) ;; Apply a transformation matrix to a vector by Vladimir Nesterovsky (defun mxv (m v) (mapcar '(lambda (r) (apply '+ (mapcar '* r v))) m) ) ;; Multiply two matrices by Vladimir Nesterovsky (defun mxm (m q) (mapcar '(lambda (r) (mxv (trp q) r)) m) ) ;;; SelByObj -Gilles Chanteau- 06/10/06 ;;; Crée un jeu de sélection avec tous les objets contenus ou capturés, ;;; dans la vue courante, par un objet (cercle, ellipse, polyligne fermée) ;;; Arguments : ;;; - ent : un objet (ename ou vla-object) ;;; - opt : un mode de sélection (Cp ou Wp) ;;; - fltr : un filtre de sélection (liste) ou nil (defun SelByObj (ent opt fltr / obj dist n lst prec dist p_lst ss) (vl-load-com) (if (= (type ent) 'ENAME) (setq obj (vlax-ename->vla-object ent)) (setq obj ent ent (vlax-vla-object->ename ent) ) ) (cond ((member (vla-get-ObjectName obj) '("AcDbCircle" "AcDbEllipse")) (setq dist (/ (vlax-curve-getDistAtParam obj (vlax-curve-getEndParam obj) ) 50 ) n 0 ) (repeat 50 (setq lst (cons (trans (vlax-curve-getPointAtDist obj (* dist (setq n (1+ n)))) 0 1 ) lst ) ) ) ) ((and (= (vla-get-ObjectName obj) "AcDbPolyline") (= (vla-get-Closed obj) :vlax-true) ) (setq p_lst (vl-remove-if-not '(lambda (x) (or (= (car x) 10) (= (car x) 42) ) ) (entget ent) ) ) (while p_lst (setq lst (cons (trans (append (cdr (assoc 10 p_lst)) (list (cdr (assoc 38 (entget ent)))) ) ent 1 ) lst ) ) (if (/= 0 (cdadr p_lst)) (progn (setq prec (1+ (fix (* 25 (sqrt (abs (cdadr p_lst)))))) dist (/ (- (if (cdaddr p_lst) (vlax-curve-getDistAtPoint obj (trans (cdaddr p_lst) ent 0) ) (vlax-curve-getDistAtParam obj (vlax-curve-getEndParam obj) ) ) (vlax-curve-getDistAtPoint obj (trans (cdar p_lst) ent 0) ) ) prec ) n 0 ) (repeat (1- prec) (setq lst (cons (trans (vlax-curve-getPointAtDist obj (+ (vlax-curve-getDistAtPoint obj (trans (cdar p_lst) ent 0) ) (* dist (setq n (1+ n))) ) ) 0 1 ) lst ) ) ) ) ) (setq p_lst (cddr p_lst)) ) ) ) (cond (lst (setq ss (ssget (strcat "_" opt) lst fltr)) ss ) ) )

Merci (gile), t'es un chef.:wub: Bonne journée.

Bonjour (gile), excuse mon ignorance mais peut-tu me dire où il faut remplacer la commande dont tu parle ? merci d'avance.

(gile) j'ai bien utilisé ton nouveau code mais apparemment chez moi ça ne veut pas fonctionner :( Bon tant pis, merci quand même pour tes efforts.:wub: Bonne journée.

Bonjour (gile), ou alors il y a quelque chose que je ne fais pas correctement ou bien on ne parle pas de la même chose ! :huh: Donc voici comment j'ai procédé : 1) comme je n'avais pas dans le dossier "C:\Users\s.rigano\AppData\Roaming\Autodesk\AutoCAD 2011\R18.1\fra" de fichier acaddoc.lsp j'en ai crée un et j'y ai collé dedans ton code. 2) ensuite j'ai mis ce fichier dans le dossier "C:\Users\s.rigano\AppData\Roaming\Autodesk\AutoCAD 2011\R18.1\fra\Support" 3) j'ai redémarré AutoCAD Est-ce que j'ai tout bien fait ou est-ce que j'ai oublié quelque chose ? Voilà ce que je veux obtenir: lorsque on va dans le menu texte "Outils\Personnaliser\Menus..." nativement AutoCAD exécute la commande CUI mais lorsque on fait un clic droit sur l'espace barres d'outils et qu'on choisi "Personnaliser..." AutoCAD exécute la commande "QUICKCUI" et c'est là que je veux que ça change ! Quand tu dis "chez moi ça marche bien" de quoi tu parle ? Merci d'avance pour ta réponse.

bonjour, pour répondre à sbosarl : cela ne vient certainement pas de la carte graphique car d’après ce qui est marqué dans l'aide d'AutoCAD c'est une volonté de Autodesk :angry: Pour répondre à (gile) : j'ai essayé ton code mais ça ne marche pas ni dans acaddoc.lsp ni acad.mnl ! y-t-il une erreur dans ton code (ça m’étonnerait !) ou cela est-il empêché par une autre fonction d'AutoCAD (voir ma réponse à sbosarl ci-dessus) ?:unsure: Merci en tout cas pour vos réponses.

Bonjour à tous, merci bryce d'avoir recadré le sujet :P et merci à didier de m'avoir enlevé mes derniers illusions ...:( Finalement mes souhaits sont du domaine du rêve et vont y rester (pour l'instant du moins on ne sait pas ce qui nous réserve l'avenir dans ce domaine...:ph34r:) Merci quand même et bonne journée.

Bonjour à tous, j'ai testé pratiquement tous vos logiciels et sites en ligne. Ils ont chacun leur avantage et leur défaut mais en tous cas j'en ai trouvé aucun qui fasse ce dont j'ai besoin : transformer les textes en vrais textes et les blocs en vrais blocs ! Connaissez-vous un logiciel, même payant qui fasse cela ? Merci de vos réponses.

Merci bryce, tu me sauve la vie, je suis rassuré B) Mais quand-même j'aimerais bien comprendre cette histoire de .NET !

Bonjour, excuse-moi les gars mais pour moi vous parlez un peu chinois :wacko: SVP pouvez-vous m'expliquer c'est qu'est le .NET et comment y passer ? En effet j'ai 1 ou 2 programme en VBA que j'ai récupéré sur les forums et qui me sont très utiles mais comme d'ici la fin de l'année je vais passer en version 2013, que faut-il faire pour que ça fonctionne encore ?:unsure: Merci d'avance. Bonne journée à tous.

Bonjour lili2006, en effet un sujet similaire avait bien été ouvert ici et ici mais la solution proposé ne fonctionne pas chez moi (de toute façon j’étais déjà sur l’écran principal mais j'ai testé les deux ...) ! Dommage j'aurais bien aimé :( Merci quand même. Dans l’espoir qu'un éclair de lumière surgisse quelque part :blink:

Bonjour PHILPHIL, je te remercie pour ta réponse franche mais tu viens de m'enlever les quelques illusions qui me restaient :wacko: Oui M. DESK si tu nous entends fait quelques chose ... Bonne journée et merci quand même.

Bonjour, je voudrais que AutoCAD 2011 mémorise les dimensions et l'affichage personnalisé de la boite de dialogue "Personnaliser l'interface utilisateur" (_.QUICKCUI). Comment faire ? Merci d'avance pour vos réponses. Bonne journée.

lecrabe, 1) je ne suis pas administrateur de mon poste donc je ne peut rien installer 2) le test n'arrange rien (et en plus sa m'a bousillé ma config ... :angry: ) Merci quand meme

bonjour, merci a tous de votre participation lecrabe excuse mon incompétence mais je n'ai rien compris de ce que tu me demande de faire :blink: SVP tu peux m'expliquer un peu plus simplement ? merci d'avance.

non, elle se trouve dans un autre répertoire comme toutes les autres

déjà fait ils sont identiques...

oui, je travaille sur un serveur local et tous les pc peuvent ouvrir le même fichier stocké sur le serveur

Non, il faut que je lui redonne de nouveau le chemin.