sbosarl

bonjour, idem pour moi de temps en temps la largeur repasse en version largeur de base

bonjour , tu insere bien le bloc "blk_cartouche" et non le fichier cartouche ?

Bonjour, Je me permets de poser se lisp réserver aux versions 2012 voir + Se lisp « souple « permet de tracer des terminaisons de tuyauterie HVAC Pour info le fichier à évoluer en fonction des années et de mes besoins je l’utilisai avec un type de ligne « pointille » (d’où une non diffusion) et avec l’arrivée des réseaux trajectoire v2012 je l’ai repris Il à peu de temps je l’ais agrémenté de sa boite de dialogue et repris les textes suivant le conseil d’un collègue souple.DCL souple.lsp

bonjour, un bloc dynamique ou un bloc avec attribut doit resté un bloc de base et non étre l'objet d'un autre bloc si tu déconpose ton "Test_etiq" tu aurra 2 bloc avec fonction dyn. et sellection d'attribut oups pardon effectivement (j'avais mal lu la question) la fonction dynamique "etirement polaires" fausse le deplacement lineaire

re, je te remerci c'etait bien cela la coche n'etait plus (grrr variable PICKFIRST à 0 suite à un planté)

bonjour, j'ai un petit problème , j'ai du faire sauté une variable systeme -pour toutes actions sur la barre de propriété (ex: changement de couleur) *bien pris en compte sur les nouveaux objets *NON PRIS EN COMPTE SUR LES OBJETS SELECTIONNES *touche "suppr" non utilisable J'ai fait un "réparer" et fait un essais sous un autre login (la aucun probleme)

vu avec gile en direct : probleme de dezipper sur mon pc

bonjour, pour info j'ai télécharger le zip , puis je l'ai extrait du fichier zip , puis renommer en dll, ouvert autocad sur les "cde" taper "netload" , suivant même "cde" netload j'ai ouvert le fichier sur la racine C:\plansl\stok-zip-plt\DictionaryEditor.dll . (répertoire stok-zip-plt qui me sert de zone d'essai ou de transfere ) j'ai même copie le fichier DictionaryEditor.dll dans un répertoire lu par défaut dans les options (C:\Program Files\Autodesk\AutoCAD 2012 – French\) et relance netload avec comme chemin C:\Program Files\Autodesk\AutoCAD 2012 – French\ DictionaryEditor.dll et la même message d'erreur avec autre chemin . Bon t'en pis je doit avoir un fichier manquant ou une limitation sur se poste merci quand même

boujour, merci "gile" pour ces renseignements ,dans ton post #5 tu te réfère à une cde (en c++) windows :charger et renommer en DictionaryEditor.dll autocad 2012 je l'ai charger en netload et la : mesage d'erreur Impossible de charger l'assemblage. Détails de l'erreur: System.BadImageFormatException: Impossible de charger le fichier ou l'assembly 'file:///C:\plansl\stok-zip-plt\DictionaryEditor.dll' ou une de ses dépendances. Le module était censé contenir un manifeste de l'assembly. Nom de fichier : 'file:///C:\plansl\stok-zip-plt\DictionaryEditor.dll' à System.Reflection.RuntimeAssembly._nLoad(AssemblyName fileName, String codeBase, Evidence assemblySecurity, RuntimeAssembly locationHint, StackCrawlMark& stackMark, Boolean throwOnFileNotFound, Boolean forIntrospection, Boolean suppressSecurityChecks) à System.Reflection.RuntimeAssembly.nLoad(AssemblyName fileName, String codeBase, Evidence assemblySecurity, RuntimeAssembly locationHint, StackCrawlMark& stackMark, Boolean throwOnFileNotFound, Boolean forIntrospection, Boolean suppressSecurityChecks) à System.Reflection.RuntimeAssembly.InternalLoadAssemblyName(AssemblyName assemblyRef, Evidence assemblySecurity, StackCrawlMark& stackMark, Boolean forIntrospection, Boolean suppressSecurityChecks) à System.Reflection.RuntimeAssembly.InternalLoadFrom(String assemblyFile, Evidence securityEvidence, Byte[] hashValue, AssemblyHashAlgorithm hashAlgorithm, Boolean forIntrospection, Boolean suppressSecurityChecks, StackCrawlMark& stackMark) à System.Reflection.Assembly.LoadFrom(String assemblyFile) à Autodesk.AutoCAD.Runtime.ExtensionLoader.Load(String fileName) à loadmgd() AVT : la journalisation de liaison d'assembly est désactivée. Pour activer la journalisation des échecs de liaison d'assembly, attribuez la valeur 1 à la valeur de Registre [HKLM\Software\Microsoft\Fusion!EnableLog] (DWORD). Remarque : une certaine perte de performance est associée à l'enregistrement dans le journal des échecs de liaison d'assembly. Pour désactiver cette fonctionnalité, supprimez la valeur de Registre [HKLM\Software\Microsoft\Fusion!EnableLog] J'ai recherché sur le registe sans rien trouvé , serait il possible de savoir ce que je n'est pas fait correctement.

bonjour , De base lors d'une installe (2010-2012) | Default Windows System Printer.pc3 | DWF6 ePlot.pc3 | DWFx ePlot (XPS Compatible).pc3 | DWG To PDF.pc3 | PublishToWeb JPG.pc3 | PublishToWeb PNG.pc3 Après chaque personne installe plus on moins les mêmes imprimantes avec des noms et des réglages différents. et lors des migration de versions, autocad transfère les imprimantes déjà installées le nettoyage manuel lors d'une suppression de matérielles et souvent le bien venu donc il n'as pas de solution type.

boujour , verifi que ton fichier de tracage "DWG to PDF.pc3" à le bon NOM et qu il fonction bien. publier l'utilise

boujour, oui effectivement il as une fonction (GC) je ne l'avais jamais vu

bonjour , comme d'habitude c'est pascal ^^ petit question la commande (gc) " de gille je suppose" fait quoi au juste

bonjour , le forum semble avoir pris un coups de jeune :D j’aime bien petites remarques: 1-les codes dans un carre uni sont beaucoup moins lisible 2-il manque les boutons pour passés au sujet suivant ou précédent

bonjour , hier j'ai fait un essais http:// http://dl.free.fr/rQfJTWS1a il faut lancer la commande de express "blockreplace" pour valider le lisp commande longue pour remplacement des 400 bloc BLK_FV_TXVOI_P.......... il as fallu 30 minute pour les autres blocs je n'est aucune idee commant récupere les infos sans perdre le lien avec le tracer

bonjour , je n'est pas retrouvée le lisp de base , mais j'ai quand meme un ptit lisp (bidouiller ) (defun c:chgbloc () (setq rep3 "c:/be/affair97/97_29_00/annecy/bloc/blocsymb/") (prompt "\nMise a jour des blocs selectionnes ") (terpri) (setq s (ssget)) (if s (progn (setq rep (getstring "Donnez le repertoire :") ) (if (= rep "") (setq rep rep3) ) (setq e (ssname s 0) n 1 newnom "" fi nil) (while (= newnom "") (setq newnom (getstring T"\nDonnez le nom du nouveau symbole : ") ) (if (= newnom "") (setq newnom rep) (progn ; recherche dans la section block (setq li (tblnext "BLOCK" "t")) (while li (setq nom (cdr (assoc '2 li))) (if (= nom newnom) (setq li nil fi "newnom") (setq li (tblnext "BLOCK")) ) ) ; recherche dans le repertoire indiqu‚ (if (= fi nil) (progn (setq fi (open (strcat rep newnom ".dwg") "r") newnom (strcat rep newnom) ) (if fi (close fi)) )) (if (= fi nil) (progn (terpri) (princ newnom) (prompt " ---- SYMBOLE INCONNU ----") (terpri) (setq newnom "") ) ) )) ) (if (or (= newnom "") (= newnom rep)) (prompt (strcat "Nom du symbole = " newnom " ??? ")) (progn (while e (setq li (entget e)) (setq bi (cdr (assoc '0 li))) (if (= bi "INSERT") (acet-block-replace (cdr (assoc '2 li)) newnom);(progn ; (setq ori (cdr (assoc '10 li)) ; ax (cdr (assoc '41 li)) ; ay (cdr (assoc '42 li)) ; ang (* (/ (cdr (assoc '50 li)) pi) 180.)) ; (entdel e) ; (command "-inserer" newnom ori ax ay ang "" "" "" "") ; ) ) (setq e (ssname s n) n (+ n 1) ) ) )) )) ) ; ******************************************************************** ce liste il te faut un bloc propre avec les meme nom d'attribut (exemple: bloc1) -tu selection les objet que tu veut changer -tu rentre " " pour le repertoire de stokage -tu lui donne ton nom de bloc (exemple bloc1) fait un essai sur une copie au cas ou cela ne te convient pas PS : cela ne fonstion que si tu as les outils express (acet-block-replace bnan bnan2) [Edité le 25/5/2011 par sbosarl]

boujour, Je me permet de poser une methode J'ai eu le même problème avec des info sur des schémas électriques ,( les attributs ne sont pas existant dans la définition du bloc) J'ai donc crée un bloc propre avec les noms des attributs "Identique au non de base" Puis j'ai utiliser un lisp de remplacement des blocs par mon nouveau bloc Dans express tu as un outil ("blockreplace") de transfère d un bloc par un autre Je vais rechercher mon lisp de base : transfère x noms de blocs par un seul

bonjour, piste ou pas piste , l' accrochage "volume" des fois fausse la donne .

bonjour, (defun c:listtest () (setq list00 '(("1" "1.1" "1.1.1") ("1" "1.1" "1.1.2") ("1" "1.2") ("1" "1.3" "1.3.1" "1.3.1.1") ("1" "1.3" "1.3.1" "1.3.1.2") ("2") ("3" "3.1") ("3" "3.2" "3.2.1") ("3" "3.2" "3.2.2") ("3" "3.2" "3.2.3") ) ) ;(princ list00) (setq ix 0 iy 0) (repeat (length list00) (setq fichet1 (nth ix list00)) (setq iy 0) (repeat (length fichet1) (setq fichet2 (nth iy fichet1)) (setq iy (+ iy 1)) (princ "\n")(princ fichet2);(princ (cdr fichet2)) ) (setq ix (+ ix 1)) ))

bonjour , de base ecrit dans mtext et text avec une police tyle arial "²" touche haut gauche à cote du 1et audessus de la touche tab "³" touche "alt+0179"

bonjour, pour info pensez à elevée l'accrochage 3d qui peu prendre le pas sur accrochage "normal" j'ai eu le probleme sur un lisp qui date de 2001-2002 qui refusai de me tracer un ojbet entre 2 points (un de mes deux point de tracer etait proche d'un solide "non visible a plat" )

bonjour , mci , je me compliquais la vie seras correspont as se que je veut faire

bonjour , oui sa pourrai ,mais je veut pas arrete completement le lisp je veut uniquement arreter la boucle de pose de x reperes

bonjour , suivant mon titre , je cherche à interrompre un lisp un peu comme l’arrêt de la commande ligne pour faire simples mon lisp me permet de tracer une nappe de 1 à 6 tubes d’un point A à un points X (ligne pt1 pt2-- ligne pt2 pt3—coude à partir de la je répète ligne coude jusqu ‘au ptX) Aujourd’hui j’utilise dans ma boucle cela : (setq a1 0); (while (/= a1 10) (setq b2 (grread) );(princ b2)(print (nth 1 b2)) (commandetrace) (if (and (= (nth 0 b2) 2)(= (nth 1 b2) 13)) (setq a1 10))) Qui as l’inconvenant d’être bloquant (attente de touche) [Edité le 5/3/2010 par sbosarl]

re bonjour , merci j'ai en faite réinstaler les pilote de de la carte en administrateur cela semble avoir remis les chose en ordre (entre autre cela ma enlevée un probleme sur logiciel maison qui plantais)