Aller au contenu
Problème de lien d'inscription (résolu ?) ×

VRD

Logiciels de Voiries et Réseaux Divers

627 sujets dans ce forum

  1. plate forme avec covadis 9.1

    Par mounir81,
    • 1 réponse
    • 3 k vues

  2. Détail sur les séparateurs à hydrocarbures

    Par TonyWesson,
    • 5 réponses
    • 3,1 k vues

  3. Aide pour quantitatif lotissement

    Par manu_geom,
    • 2 réponses
    • 3,2 k vues

  4. regard au niveau séparateur

    Par squatter,
    • 2 réponses
    • 2,3 k vues

  5. station service

    Par x_all,
    • 2 réponses
    • 1,8 k vues

  6. Giration - Marche arriére de camions

    Par cspadoni,
    • 2 réponses
    • 4,1 k vues

  7. avaloir, question ?

    Par koliom,
    • 2 réponses
    • 3,1 k vues

  8. Giration porte engin

    Par BOBO34,
    • 0 réponse
    • 2,8 k vues

  9. Durée d\'exécution

    Par DAVID30,
    • 5 réponses
    • 2,5 k vues

  10. Détail des symboles AEP

    Par _christian_,
    • 3 réponses
    • 5,3 k vues

  11. lien pour fonte de voirie

    Par dilack,
    • 1 réponse
    • 2,1 k vues

  12. Tranchée technqiue

    Par squatter,
    • 1 réponse
    • 2 k vues

  13. Ralentisseurs et autres...

    Par kallain,
    • 1 réponse
    • 2,4 k vues

  14. Poste transfo

    Par pointpower,
    • 6 réponses
    • 3,1 k vues

  15. Mensura - pluie de projet

    Par kras,
    • 0 réponse
    • 2,1 k vues

  16. logiciel eclairage public gratuit

    Par DAVID30,
    • 2 réponses
    • 6,2 k vues

  17. Covadis ou Mensura?

    Par TonyWesson,
    • 4 réponses
    • 5 k vues

  18. Signalisation pompier

    Par BOBO34,
    • 0 réponse
    • 2,6 k vues

  19. Essieu de 13T

    Par zourite9141,
    • 1 réponse
    • 3,7 k vues

  20. Instructions techniques fibre optique

    Par MNT,
    • 2 réponses
    • 2,6 k vues

  21. Mini Giratoire

    Par fullface06,
    • 4 réponses
    • 3,5 k vues

  22. Dimensionnement de canalisation eaux pluviales

    Par BOBO34,
    • 5 réponses
    • 7,5 k vues

  23. Distance minimale

    Par DAVID30,
    • 2 réponses
    • 2,8 k vues

  24. Hauteur de quai de déchargement PL

    Par zourite9141,
    • 3 réponses
    • 10,7 k vues

  25. Cuve AEP 60 m3

    Par zourite9141,
    • 2 réponses
    • 2,8 k vues


  • Statistiques des forums

    • Total des sujets
      49,3 k
    • Total des messages
      299 k

  • Sujets

  • Messages

    • (gile)
      Objet en avant ou en arrière plan

      Par (gile) · Posté(e)

      Je suis parti de l'ancien code, mais j'aurais pu (dû) écrire de façon moins cryptique : (defun DrawOrderByLayer (fun / ent doc blocks layer sort lst var) (vl-load-com) (and (setq ent (car (entsel "\nSélectionnez un objet sur le calque cible: "))) (SETQ doc (vla-get-ActiveDocument (vlax-get-acad-object)) blocks (vla-get-Blocks doc) layer (cdr (assoc 8 (entget ent))) ) (not (vla-StartUndoMark doc)) (vlax-for b blocks (or (not (vl-catch-all-error-p (setq sort (vl-catch-all-apply 'vla-GetObject (list (vla-GetExtensionDictionary b) "ACAD_SORTENTS") ) ) ) ) (setq sort (vla-AddObject (vla-GetExtensionDictionary b) "ACAD_SORTENTS" "AcDbSortentsTable" ) ) ) (setq lst nil) (vlax-for obj b (if (= (vla-get-Layer obj) layer) (setq lst (cons obj lst)) ) ) (if lst (fun sort (vlax-make-variant (vlax-safearray-fill (vlax-make-safearray vlax-vbObject (cons 0 (1- (length lst)))) lst ) ) ) ) ) ) (vla-EndUndoMark doc) (vla-Regen doc acActiveViewport) (princ) ) (defun c:TOP () (DrawOrderByLayer vla-MoveToTop)) (defun c:BOT () (DrawOrderByLayer vla-MoveToBottom))  
    • (gile)
      Objet en avant ou en arrière plan

      Par (gile) · Posté(e)

      Salut les commandes TOP et BOT définies ci-dessous affectent tous les espaces et tous les blocs. (mapcar (function (lambda (cde fun) (eval (list 'defun cde '(/ ent doc blocks layer sort lst var) '(vl-load-com) (list 'and '(setq ent (car (entsel "\nSélectionnez un objet sur le calque cible: ") ) ) '(setq doc (vla-get-ActiveDocument (vlax-get-acad-object)) blocks (vla-get-Blocks doc) layer (cdr (assoc 8 (entget ent))) ) '(not (vla-StartUndoMark doc)) (list 'vlax-for 'b 'blocks '(or (not (vl-catch-all-error-p (setq sort (vl-catch-all-apply 'vla-getObject (list (vla-getExtensionDictionary b ) "ACAD_SORTENTS" ) ) ) ) ) (setq sort (vla-addObject (vla-getExtensionDictionary b ) "ACAD_SORTENTS" "AcDbSortentsTable" ) ) ) '(setq lst nil) '(vlax-for obj b (if (= (vla-get-Layer obj) layer) (setq lst (cons obj lst)) ) ) (list 'if 'lst (list fun 'sort '(vlax-make-variant (vlax-safearray-fill (vlax-make-safearray vlax-vbObject (cons 0 (1- (length lst))) ) lst ) ) ) ) ) ) '(vla-EndUndoMark doc) '(vla-regen doc acActiveViewport) '(princ) ) ) ) ) '(c:top c:bot) '(vla-MoveToTop vla-MoveToBottom) )  
    • didier
      Multi-Axe et tabulations

      Par didier · Posté(e)

      Merci beaucoup @La Lozère pour l'échange. La prochaine fois qu'une question sur ce sujet se présentera, on saura renvoyer vers ce message. Amicalement
    • didier
      Attribut dans une côte dans un bloc dynamique

      Par didier · Posté(e)

      Bonjour @barbichette Ravi de voir que la question posée a trouvé sa solution. Ce serait sympa pour la communauté de fournir le bloc avec la solution mise en place pour que les prochaines questions portant sur ce sujet soient redirigées vers ce message. Le principe est l'échange de savoir, de combines, de bidouilles, de ce qui fait avancer les choses en général. Amicalement
    • La Lozère
      Multi-Axe et tabulations

      Par La Lozère · Posté(e)

      Bon.... J'ai trouvé. Ou plutôt on m'a montré... Merci le support Je cherchais à tabuler au niveau de la branche. Ici : Alors qu'il fallait le faire au niveau du carrefour. Ici :

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