Aller au contenu

Revit

Logiciel d'architecture de la société Autodesk.


1 068 sujets dans ce forum

    • 1 réponse
    • 1,4 k vues
  1. fichier .fbx

    • 0 réponse
    • 4,1 k vues
    • 2 réponses
    • 344 vues
    • 1 réponse
    • 187 vues
    • 9 réponses
    • 1,8 k vues
    • 1 réponse
    • 144 vues
    • 0 réponse
    • 187 vues
    • 3 réponses
    • 198 vues
    • 0 réponse
    • 157 vues
    • 0 réponse
    • 199 vues
    • 1 réponse
    • 160 vues
    • 5 réponses
    • 250 vues
    • 3 réponses
    • 575 vues
  2. Arase des acrotères

    • 12 réponses
    • 5,5 k vues
    • 1 réponse
    • 199 vues
    • 47 réponses
    • 2,1 k vues
    • 1 réponse
    • 477 vues
  3. [FORMATION] Revit débutant

    • 3 réponses
    • 573 vues
  4. conversion fichier

    • 2 réponses
    • 348 vues
    • 1 réponse
    • 265 vues
  5. Création de légende

    • 3 réponses
    • 498 vues
    • 0 réponse
    • 383 vues
    • 2 réponses
    • 529 vues
    • 0 réponse
    • 294 vues
    • 13 réponses
    • 826 vues


  • Statistiques des forums

    • Total des sujets
      48,7 k
    • Total des messages
      295,3 k
  • Sujets

  • Messages

    • Salut @didier,   Le thème clair ou foncé concerne la couleur du ruban, des palettes... C'est indépendant de la couleur de l'arrière plan uniforme. Avec les 2 thèmes, les couleurs sont imposées, tu ne peux pas les choisir, c'est soit clair, soit foncé, mais pas autre chose. Personnellement, je travaille en thème clair et arrière plan en blanc. C'est peut-être pour ça que j'ai des lunettes ? 🤔   Olivier
    • Bonjour @Olivier Eckmann Oui, je sais que ça existe, le mieux que j'aie trouvé est le gris foncé, j'ai quasiment arrêté le noir complet. (voilà comment le vote n'est plus secret (hihi)) Question d'habitude, car quand je vois des écrans clairs, je ne suis pas choqué. Amicalement
    • Question subsidiaire : le style foncé étant celui par défaut, est-ce que tout le monde sait que l'on peut le modifier? Est-ce que tout le monde a essayé le thème clair et a réellement choisi en connaissance de cause une fois les 2 configurations possibles testées?
    • Bonjour, Il me reste 55s sur la minute que tu réclame ... je te les offres 🙂  
    • Bonjour, Une simplification du code pour toi. (vl-load-com) (defun c:mult-info_po2CSV ( / js file_name cle f_open key_sep str_sep oldim lst_id lst_length lst_surf lst_closed lst_centroid lst_layer lst_width n) (princ "\nSélectionner les polylignes optimisées.") (while (null (setq js (ssget '((0 . "LWPOLYLINE"))))) (princ "\nSélection vide, ou ce ne sont pas des LWPOLYLINE!") ) ;pour déterminer la précision des décimales que tu veux inscrire dans le fichier (command "_.ddunits" (while (not (zerop (getvar "cmdactive"))) (command pause) ) ) (setq file_name (getfiled "Nom du fichier a créer ?: " (strcat (substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 3)) "csv") "csv" 37)) (if (null file_name) (exit)) (if (findfile file_name) (progn (prompt "\nFichier éxiste déjà!") (initget "Ajoute Remplace annUler _Add Replace Undo") (setq cle (getkword "\nDonnées dans fichier? [Ajouter/Remplacer/annUler] <R>: ") ) (cond ((eq cle "Add") (setq cle "a") ) ((or (eq cle "Replace") (eq cle ())) (setq cle "w") ) (T (exit)) ) (setq f_open (open file_name cle)) ) (setq f_open (open file_name "w")) ) (initget "Espace Virgule Point-virgule Tabulation _SPace Comma SEmicolon Tabulation") (setq key_sep (getkword "\nSéparateur [Espace/Virgule/Point-virgule/Tabulation]? <Point-virgule>: ")) (cond ((eq key_sep "SPpace") (setq str_sep " ")) ((eq key_sep "Comma") (setq str_sep ",")) ((eq key_sep "Tabulation") (setq str_sep "\t")) (T (setq str_sep ";")) ) (setq oldim (getvar "dimzin")) ; pour écrire tous les zéro, même ceux qui se révèlent inutiles. (setvar "dimzin" 0) (setq lst_id '() lst_length '() lst_surf '() lst_closed '() lst_centroid '() lst_layer '() lst_width '() ) (repeat (setq n (sslength js)) (setq ename (ssname js (setq n (1- n))) obj (vlax-ename->vla-object ename) lst_id (cons (strcat "'" (vlax-get obj 'Handle)) lst_id) lst_length (cons (vlax-get obj 'Length) lst_length) lst_surf (cons (vlax-get obj 'Area) lst_surf) lst_closed (cons (vlax-get obj 'Closed) lst_closed) lst_centroid (cons (osnap (vlax-curve-getStartPoint obj) "gcen") lst_centroid) lst_layer (cons (vlax-get obj 'Layer) lst_layer) lst_width (cons (vlax-get obj 'ConstantWidth) lst_width) ) ) (foreach n (reverse (mapcar 'list (append (mapcar '(lambda (x) (strcat x str_sep)) lst_id) (list (strcat "Handle" str_sep))) (append (mapcar '(lambda (x) (strcat (rtos x) str_sep)) lst_length) (list (strcat "Longueur" str_sep))) (append (mapcar '(lambda (x) (strcat (rtos x) str_sep)) lst_surf) (list (strcat "Surface" str_sep))) (append (mapcar '(lambda (x) (strcat (itoa x) str_sep)) lst_closed) (list (strcat "Fermée" str_sep))) (append (mapcar '(lambda (x) (strcat (if x (rtos x) "") str_sep)) (mapcar 'car lst_centroid)) (list (strcat "X Centroïd" str_sep))) (append (mapcar '(lambda (x) (strcat (if x (rtos x) "") str_sep)) (mapcar 'cadr lst_centroid)) (list (strcat "Y Centroïd" str_sep))) (append (mapcar '(lambda (x) (strcat x str_sep)) lst_layer) (list (strcat "Calque" str_sep))) (append (mapcar '(lambda (x) (strcat (rtos x) str_sep)) lst_width) (list (strcat "Largeur" str_sep))) ) ) (write-line (apply 'strcat n) f_open) ) (close f_open) (setvar "dimzin" oldim) (prin1) )  
  • Sujets

×
×
  • 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é