Aller au contenu

bseb67

Membres
  • Compteur de contenus

    833
  • Inscription

  • Dernière visite

Tout ce qui a été posté par bseb67

  1. Salut, J'ai pu mettre quelques dessinateurs à autocad 2008 et même un à la 2009. Par contre une chose le chagrine, lorsqu'il veut utiliser autofluid version 4 (patcher en 4.16) en cliquant sur le petit 4 pour lancer la boite de dialogue qui cherche la présence des clés (usb) et du pref. Il doit attendre entre 25 et 45s. et malheureusement je ne sais pas pourquoi :casstet: Sur un autocad 2006,2007 ou 2008 il faut 2 à 5s seulement. J'ai donc voulu essayer sur la 2010 fraichement installée, et bien là ca prend 2s, mais il ne trouve plus les clés usb :o j'ai déjà contacté par mail texacad, mais pas de réponse, je vais devoir les appeler. et je suis sur qu'ils vont me dire : "passez à autofluid 2009" Si quelqu'un a aussi eu ce problème l'a-t-il résolu? Merci.
  2. bseb67

    Ouverture fichiers long

    En plus de la purge (classique), du controle, de la purge des échelles d'annotations, il faut aussi faire: -purger r * n => c'est pour purger les applications liées aux xdatas, il m'est déjà arrivé d'avoir plus de 100 applications enregistrées sur des fichiers reçus de nos partenaires et puis une purge des groupes aussi, mon record sur un fichier: 1.200.000 groupes :o Le fichier faisait 32Mo avant et après 8Mo, un groupe vide prend dans les 22o, un ca va, mais plus d'un million ouille ouille ;)
  3. Salut nicoping28, je viens juste d'essayer un peu, disons que c'est déjà une petite avancée. Mais moi c'est surtout en lisp ou vlisp que j'aimerai travailler sur ces contraintes, mais pour l'instant je n'ai trouvé que les contraintes dimensionnelles
  4. bseb67

    On vient d\'avoir la 2010

    Bon, alors voici mes petits commentaires sur la 2010: points positifs: - installation simple et rapide encore (pas de bug comme sur 2009 ou MEP2008) - il cherche les SP , c'est pour le futur :cool: - l'imprimante DWG TO PDF est plus performante => wipeout sortent correctement et à l'impression du pdf aussi, c'est plus une prison ou que du noir - le pdf contient la liste des calques que l'on peut alors rendre visible ou non points négatifs: - génération des pdf super longue, et lorsque l'on veut les imprimer encore plus: aplatissement - gestion de la mémoire horrible, le même plan en 3D, puis basculement sur une présentation puis aperçu impression: pic à 350Mo puis ca redescend à 120Mo sur une 2008, pic à 550Mo sur 2010 et ca reste à 515Mo :o => j'ai ouvert trois plans + un aperçu et BAM: plantage mémoire insuffisante - autofluid v4.16 ne marche plus, la boite de reconnaissance des clés ne bug pas (c'est le cas sur 2009), mais il ne trouve pas les clés donc on ne peut rien faire - énorme lenteur vis-à-vis de la 2008, moindre par rapport à la 2009. Pour résumer: il me faudrait un autre PC, un core2duo à 3Ghz au-lieu de 2.66, mais avec un OS 64 bits pour le problème de mémoire. En attendant, je reste sous 2008 ;) , j'attends le SP1 et Seven, et puis je me courberai devant mes chefs pour avoir un nouveau PC avec Seven 64 :) partie non essayer encore: bonne impression 3D et paramétrages des objets (d'après fiches)
  5. Salut à tous! Petit colis ce matin du facteur: une jolie boite avec un Autocad 2010. Aller hop, m'en vais l'installer. je reviendrai plus tard.
  6. bseb67

    Accrochage objet

    Salut, ben je ne vois pas le problème, il faut juste penser à mettre os en local. mais ta fonction marche chez moi.
  7. bseb67

    1er lisp ... Help

    Re, La fonction and effectue tous les tests jusqu'à arriver à un test faux. Donc (and js (repeat...)) est équivalent à: (and (/= js nil) (repeat..)) => ce qui fait que si js vaut nil le and s'arrête, sinon on effectue le repeat. Ensuite, pour avoir les poly et cotes pivotées dans une seule sélection: (setq js (ssget '((-4 . "")))) une cote pivotée à dans son code DXF 100 "AcDbRotatedDimension" Et comme tu veux attraper soit une poly soit une cote pivotée j'ai mis un " maintenant si tu veux créer deux jeux de sélection en filtrant un autre il faut: 1) faire la première sélection 2) (setq jspoly (ssadd) jscotpiv (ssadd)) => créer deux sélections vides jspoly et jscotpiv 3) le repeat dans lequel tu testes si (0 . "LWPOLYLINE") => (ssadd ent jspoly) si (100 . "AcDbRotatedDimension") => (ssadd ent jscotpiv) [Edité le 26/3/2009 par bseb67]
  8. bseb67

    1er lisp ... Help

    Tu veux faire: - un jspoly et un jscotpiv? - une sélection contenant les deux?
  9. bseb67

    1er lisp ... Help

    Tout d'abord félicitation, ce mettre au lisp quand on ne connait pas c'est un peu déroutant, surtout toutes les parenthèses. Bon je rajoute mon petit grain pour ta fonction en t'expliquant les modifications: (defun c:eaa( / js i1 ent) (setq js (ssget) i1 0) (and js (repeat (sslength js) (if (= (cdr (assoc 0 (entget (setq ent (ssname js i1))))) "LWPOLYLINE") (command "_explode" ent) ) (setq i1 (1+ i1)) ) ) (princ) ) Mes modifications: - (setq ...) suivi d'un autre (setq ...) peuvent être remplacés par un seul => légèrement plus rapide - le sslength plante si js vaut nil => d'où le (and js - lent et typent ne sont pas nécessaire si tu ne fais rien avec => d'où le (setq ent dans le test du if - la fonction (1+ est plus rapide (aussi) que (+ 1 ...) Voilà, a+ ;)
  10. bseb67

    2 versions sur même poste

    Salut chanoine, J'ai déjà fait mieux que ca ;) : - 2007 - 2008 - 2009 sur le même PC. L'activation marche bien. Pour l'ordre, ben la 2007 était déjà dessus, j'ai mis la 2008 en juillet 2007 et la 2009 en octobre 2008. Par contre j'ai fait une bêtise d'après mon formateur lisp lors de mon arrivé dans mon boulot: J'ai fait "migrer les paramètres" et ca, faut éviter, car d'après lui ca laisse trainer des liens dans la 2008 vers la 2007 et dans la 2009 vers la 2008 et 2007. Le dessinateur ne se sert que d'une version à la fois, mais c'est vrai qu'on est hors-la loi ainsi. Autodesk devrait autoriser le fait de mettre plusieurs versions (on peut mettre une ancienne, ca c'est autorisé) sur un même pc et de les utiliser comme on veut.
  11. Mouai, ben moi ile me jette avec ca comme message: Location Error - Trial Download Request Trial Not Available This trial program is not available in some countries
  12. bseb67

    Probême de Restauration

    salut prass! La restauration système ne marche malheureusement que très rarement. Car le système nettoie aussi les fichiers de restaurations, puis certaines mise à jour t'empêche de revenir en arrière de même si tu utilises des nettoyeurs de PC. si ton système déconne, essaye en premier sfc /scannow dans menu->démarrer->exécuter Sinon, fait des recherches sur le net sur comment réparer une partition. Et en dernier recours, branche ton dd en esclave sur un autre pc, fait une sauvegarde des tes données puis formate le et ré-installe.
  13. Salut, la commande angle calcul l'angle entre les lignes L1 : (0.0 0.0 0.0) => (1.0 0.0 0.0) L2: p1 => p2 va voir ici, (gile) à déposé une fonction angle_3pts: http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=9120 edit: correction du lien ;) [Edité le 18/3/2009 par bseb67]
  14. bseb67

    Problème ouverture fichier

    passe la variable filedia à 1 ;)
  15. bseb67

    Clic droit, horodater

    salut patrick! avec le clic droit je ne connais pas d'outil, mais tu peux utiliser antrenamer comme expliqué sur ce lien: http://www.pcastuces.com/pratique/windows/renommer_fichiers/page8.htm
  16. Resalut, Désolé, mais tu as du mal me comprendre: (defun (_SetClipBoardText (getvar "clayer")) => normal que ca donne un message d'erreur. Laisse la fonction comme je l'ai donné au début et déclare celle-ci en plus après: (defun c:ccpp() (_SetClipBoardText (getvar "clayer")) ) ; c:ccpp comme-ca il suffit de tapper la commande ccpp (j'ai pris ce nom pour copie calque presse papier)
  17. Salut! voici une fonction que j'avais trouvé (je ne sais plus où): (defun _SetClipBoardText ( text / htmlfile result ) ;; Caller's sole responsibility is to pass a ;; text string. Anything else? Pie in face. ;; Attribution: Reformatted version of ;; post by XShrimp at theswamp.org. ;; ;; See http://tinyurl.com/2ngf4r. (setq result (vlax-invoke (vlax-get (vlax-get (setq htmlfile (vlax-create-object "htmlfile")) 'ParentWindow ) 'ClipBoardData ) 'SetData "Text" text ) ) (vlax-release-object htmlfile) text ) Pour toi, il suffit de l'appeler ainsi (_SetClipBoardText (getvar "clayer"))
  18. Salut. Normal, avec le 'w' tu écrases le fichier, il faut faire 'a' pour append (ajout). Si tu veux vider le fichier au début, alors oui, tu peux faire un 'w' puis le fermer puis le rouvrir ensuite avec 'a' pour y mettre tes infos. et comme l'a précisé Gile, pense à fermer le fichier avec un close.
  19. bseb67

    fonction mathematique

    Salut! => Non => tan X = sin X / cos X
  20. Mais non tramber, c'est pour faire un jeu du solitaire sous autocad :D
  21. bseb67

    Modification d\'attribut

    Et un (vla-put-visible vln :vlax-false) sur chaque attribut? Mais bon, c'est aussi un peu long en temps de traitement.
  22. bseb67

    Messenger intranet ....

    Salut, a mon avis net send est surement désactivé. c 'est une des premières choses qu'un admin fait sur un serveur. Nous on utilise atnotes, il permet de mettre des notes, alarmes sur ton pc, et d'envoyer des messages à d'autres pc sur le réseau, il faut activer dans réseau accepter messages entrants. Son seul défaut: prendre la main en pop_up, car il n'a pas d'info bulles d'arriver de message Patrick35=> je sentirai un bon challenge pour développer en lisp par le biais d'un fichier de communication, un mini chat sous totocad. :D Faut pas que j'en parle à ma chef, car elle me trouve déjà parano du lisp :cool:
  23. Bon, je n'ai pas eu le temps de faire la deuxième version. mais voici la première: ;-------------------------------------; ; nom: keep_number_bseb67 ; ; role: garde uniquement les nombres ; ; contenus dans la liste lst ; ; param: lst => liste d'éléments ; ; retour: une liste (avec sous listes); ; nil si pas de nombre ; ; date: 04/03/2009 ; ; BLAES Sébastien ; ;-------------------------------------; (defun keep_number_bseb67( lst / res) (cond ; on teste si lst est en fait un nombre ((/= (member (type lst) (list 'INT 'REAL)) nil) lst ) ; si c'est une liste ((= (type lst) 'LIST) ; on retire nil du resultat sur le premier élément auquel on ajoute ; le résultat sur la suite de la liste (vl-remove nil (cons (keep_number_bseb67 (car lst)) (keep_number_bseb67 (cdr lst)))) ) ) ; cond ) ; keep_number_bseb67
  24. Yahaaaa! Un petit challenge :D . La première version est déjà faite, reste encore la liste sans sous-liste pour le resultat
  25. Il faut trouver bill (clinton) en premier, car elle se trouve en-dessous :cool:
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité