Fraid

Bonjour, Va voir sur le site d'Autodesk et tu auras le minimum requis pour ta version d'Autocad. Pour une lt un simple pc suffit. pour une version pleine il faut une bonne carte graphique compatible même si tu ne fait pas de 3D, le plus de RAM possible (8GO mini donc 64 bits) et des processeurs performants . le tout bien ventilé.

Donc, pour compléter, si tu connais le .net http://www.theswamp.org/index.php?topic=10634.0 C'est destiné au débutant....

oui,.... tappe op Entrée puis sur l'onglet Ouvrir et Enregistrer tu peux choisir ta version

je me souvient aussi avoir eu des soucis d'affichage avec des plans en R14. regarde si le PC incriminé n'enregistre pas en R14

Bonjour, Cela ressemble à un problème lié à la carte graphique. Les pilotes sont ils à jour?

Bonjour, Moi aussi je m’étais posé la question. Le seul moyen que j'ai pu trouver sans passer par la programmation , c'est d'utilisé la palette d'outil en virant tous ce qui est insérer par défaut, du coup elle est perso....

Merci, C'est génial :D Mais travaillant sur 2011, y a t il eu beaucoup de changement depuis? en fait il y a un historique, je n'avais pas assez fouillé, c'est le pied

+1 à Didier Nous sommes manipulé depuis des siècles, il faut s'y faire. Le conditionnement de la masse a commencé avec les religions, maintenant il y a en plus, le sport, la politique, les infos, les médias qui mélange le tout.(j'en oublie) Difficile de garder son libre arbitre face a un tel matraquage..

Bonjour, Je ne vois pas trop ce que tu cherche à faire exactement, mais il me semble que tu te complique un peu. Pour moi les variables Viewsize et viewctr sont suffisantes. un exemple pour récuperer une vue d'un plan à l'autre. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;Sauver la vue (defun c:SVU nil (vl-registry-write "HKEY_CURRENT_USER\\Software\\Perso" "Reg-ViewSize" (rtos (getvar "viewsize")) ) (vl-registry-write "HKEY_CURRENT_USER\\Software\\Perso" "Reg-ViewCtr" (lst2str (trans (getvar "viewctr") 1 0) ";") ) (princ) ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;Restaurer la vue (defun c:RVU nil (vl-cmdf "_zoom" "_c" (trans (mapcar 'atof (str2lst (vl-registry-read "HKEY_CURRENT_USER\\Software\\Perso" "Reg-ViewCtr") ";")) 0 1) (atof (vl-registry-read "HKEY_CURRENT_USER\\Software\\Perso" "Reg-ViewSize")) ) (princ) )

Bonjour, Peut on trier Alphabétiquement un Tableau Autocad sans passer par excel ni programmation ? Merci

Je vient d'essayer avec write (qui n'est plus documenté ?) cela n'a rien changé. Ce n'est pas grave, je ne vais pas passer mon temps la dessus, je m'en suis accommodé.. Et merci pour ton conseil Carboleum, c'est vrais que c'est plus concis. a pluche et encore Merci

Bonjour, Afin de limiter les tests d exécution de certaines de mes routines manipulant les textes, j'utilise cette fonction pour éliminer les lignes vides de caractères. ;Effacer les lignes vides (pouvant contenir blancs et Tabulations) d un fichier texte ;Arguments: OpFichier -Chemin du fichier ex: "C:/Test/Communes.csv" ; Utilise DosLib (defun SupLigVid (OpFichier / Fch Pst Nombl riid rid ) (setq Nombl (Len-Line OpFichier) Fch (open OpFichier "r") ) (repeat Nombl (setq riid (read-line Fch) rid (dos_strtrim (dos_strreplace riid "\t" "")) ) (if (not (= rid "")) (setq Pst (cons riid Pst))) ) (setq Pst (reverse Pst)) (close Fch) (setq Fch (open OpFichier "w")) (foreach Z Pst (write-line Z Fch)) (close Fch) T ) ;Compteur de lignes dun fichier Texte ;Arguments: OpenFichier -Chemin du fichier ex: "C:/Test/Communes.csv" ;retour: Entier (defun Len-Line ( OpenFichier / len Fich) (setq len 0 Fich (open OpenFichier "r")) (while ( read-line Fich) (setq Len (+ 1 len))) (close Fich) len ) Elle fonctionne bien, sauf qu'a la fin de la dernière ligne, elle ajoute un retour chariot ajoutant une ligne vide a la fin. je ne vois pas comment l’éliminer... Merci

Bonjour, C'est comme un dossier Windows, te ne peux les classer qu'en cliquant sur la barre supérieur de la fenêtre, sur Nom par exemple ou Geler...

Malgré multiples essais, impossible de faire des "petits" tableaux. J'ai donc multiplier par mille mes tailles, et la, plus de problèmes. Merci encore pour ton aide.

aprés test, cela ne change rien. je voudrai qu'il fasse 0.257 de large et il fait 1.5 une fois créer !? :blink:

Merci, c'est la derniere proprietée décrite dans le guide, j'aurai du commencer par la fin...

Bonjour, Déjà quelques heures passées dans l'aide du developper a chercher les bonnes methodes, j'ai plus ou moins réussis a se que je voulais, mais je bloque dans le dimensionnement du tableau. (defun tablolist (Titre ListeDeListe / PtIns NbLigne NbColon HautLigne LargCol Tableau compt1 compt2 LL ) (setq *AcDoc* (vla-get-ActiveDocument (vlax-get-acad-object)) PtIns '(0.02 0.277 0.0) LengthList (length ListeDeListe) NbLigne (+ 1 LengthList) NbColon (length (car ListeDeListe)) HautLigne 0.01 LargCol (/ 0.257 NbColon) Tableau (vla-addtable(vla-get-paperspace *acdoc*) (vlax-3d-point ptins) NbLigne NbColon HautLigne LargCol) compt1 0 compt2 0 ) ;(vla-put-StyleName Tableau "NouveauStyle");j'ai essayer en créant un style avant, mais ce n'est pas mieux (if (/= Titre nil) (vla-settext Tableau 0 0 Titre) (vla-put-titlesuppressed Tableau :vlax-true) ) (repeat LengthList (setq LL (nth compt1 ListeDeListe) ) (mapcar '(lambda (x) (vla-settext Tableau (+ compt1 1) compt2 x ) (setq compt2 (+ 1 compt2)) ) LL) (setq compt1 (+ 1 compt1) compt2 0 ) ) ) avec une liste du genre '( ("toto" "tata" "titi") ("nana" "neuneu" "néné")) le tableau se créer bien et se remplis, mais ne fait pas du tout la taille escomptée ???? Merci

Bonjour, Tu change l'extention .bak en .dwg en le renomant.

Bonjour, Très intéressant, mais si on veut se passer de Outlook en utilisant gmail par exemple, je ne vois pas du tout comment faire en gardant le même algorithme ...

Bonjour, Il me semble que tu repond toi meme a ta question en quoi cela te géne?

est ce un probleme recent? a tu tout les droits d'administrateurs sur ton poste?

Bonjour, Tu peu te faire un lispounet qui ce charge a chaque démarrage. (setvar "MBUTTONPAN" 1) (setvar "FILLMODE" 1) Tu peux en mettre autant que tu veux

Bonjour, Entre AMD et NVIDIA, il n'y a pas photo, c'est NVIDIA qui est le plus compatible avec Autocad, surtout en multi-ecran. Avec les autres logiciels, j'en sais rien. Par contre PRO ou pas, c'est difficile. J'ai vu des options de rendus dans 3DSMAX grisées avec une carte nonpro...., je te conseillerai d'en acheter une non-pro quitte a passer en pro après, si cela te bloque.

Merci, Bryce encore des erreurs d’inattention.... du coup je vais savoir faire les fonctions qui me manque sur ce model.

Bonjour, Je cherche à "manipuler" des textes par l'Autolisp. revenu bredouille de google pensant trouver facilement des fonctions déjà faites, je m'y collasse. je commence par l'insertion d'une ligne, qui me semblais un exercice facile, que neni ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;Insérer un ligne de texte dans un fichier texte ;Arguments: OpenFichier -String, Chemin du fichier ex: "C:/Test/Communes.csv" ; Line -Entier, Numero de la ligne d insertion (la ligne est inserée aprés celle-ci), si = 0 au debut, si superieur au nb de lignes à la fin ; Texte -String, Texte de la ligne à insérer ;retour: T si reussi sinon NIL ;Ex: (Insert-Line "C:/Test/Communes.csv" 10 "Abbenans;ABBENANS;25340;25003;43;47.5;6.45") (defun Insert-Line ( OpenFichier Line Texte / Nombline Pre Post Fichier ) (setq Nombline (Len-Line OpenFichier) Fichier (open OpenFichier "r") ) (cond ((= Line 0) (repeat Nombline (setq Post (cons (read-line Fichier) Post)) ) (setq Post (reverse Post)) (close Fichier) (setq Fichier (open OpenFichier "w")) (write-line Texte Fichier) (foreach Z Post (write-line Z Fichier)) (close Fichier) T ) ((< Line Nombline) (repeat line (setq Pre (cons (read-line Fichier) Pre)) ) (setq Pre (reverse Pre)) (repeat (- Nombline Line) (setq Post (cons (read-line Fichier) Post)) ) (setq Post (reverse Post)) (close Fichier) (setq Fichier (open OpenFichier "w")) (foreach Z Pre (write-line Z Fichier)) (write-line Texte Fichier) (foreach Z Post (write-line Z Fichier)) (close Fichier) T ) ((>= Line Nombline) (repeat line (setq Pre (cons (read-line Fichier) Pre)) ) (setq Pre (reverse Pre)) (close Fichier) (setq Fichier (open OpenFichier "w")) (foreach Z Pre (write-line Z Fichier)) (write-line Texte Fichier) (close Fichier) T ) ) ) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;Compteur de lignes d'un fichier Texte ;Arguments: OpenFichier -Chemin du fichier ex: "C:/Test/Communes.csv" ;retour: Entier (defun Len-Line ( OpenFichier / len Fich) (setq len 0 Fich (open OpenFichier "r")) (while ( read-line Fich) (setq Len (+ 1 len))) (close Fich) len ) Evidemment cela ne veux pas fonctionner, cela bloque au moment de l’écriture je n'arrive pas a savoir pourquoi. (1er question) 2em : j'ai l'impression de vouloir réinventer la poudre, n'existe t'il pas des fonctions d'editions de fichiers textes, comme supprimer une ligne...? merci