Aller au contenu

PHILPHIL

Membres
  • Compteur de contenus

    1 259
  • Inscription

  • Dernière visite

  • Jours gagnés

    10

Tout ce qui a été posté par PHILPHIL

  1. PHILPHIL

    Lisps de Patrick_35

    hello patrick avec GEF 3.04 est ce qu'il serait possible d'avoir l'option quand on copie des onglets presentations qu'ils soient directement mis a la fin plutot que copier juste apres un bouton qui copie juste apres ( c'est le cas actuellement ) un bouton qui copie et met a la fin bon week end a+ phil
  2. hello nettement plus simple tu fais un carre ( c'est un rectangle aussi ) dont le centre est en 0,0 et pour chaque coté un etirement double avec point central pas besoin de faire varier le point de base comme ca puisque c'est ton pint d'insertion de ton bloc a+ phil
  3. PHILPHIL

    Xref disparue

    hello normal un xref superposé ne suis que une fois le fichier dans lequel il est un xref attache suis tout le temps 1 superposé dans 2 2 attaché dans 3 1 ne serat pas dans 3 1 attache dans 2 2 attaché dans 3 1 serat dans 3 le superposé permet comme ca de mettre 1 dans 2 et 2 dans 1 sans qu'il n'y est de conflit sinon le fichier se retrouverai dans lui meme a+ phil
  4. PHILPHIL

    SOAP sur W7

    hello tramber impossible d'ouvrir la base de registre sous W7 64bits COMME TOI a+ phil
  5. hello j'ai aussi ce probleme et ca doit plutot venir des drivers de la FX ( carte grafique ) en fait ce sont les deux lignes concernant les fleches des cotes qui mettent deux secondes a apparaitre il doit y avoir un dégrader de couleurs bizarre et rien ne change j'attend la 2011 pour voir d'ailleur je l'attend avec de plus en plus d'impatience a+ phil
  6. PHILPHIL

    Lisps de gile

    hello windows seven 64bits internet explorer avast winrar pour les *.rar et *.zip une option mal coché dans l'explorer peut etre ? faut que farfouille bon week end phil
  7. PHILPHIL

    Lisps de gile

    hello pas si rasurant que ca meme avec 7-zip "totalperim" semble corrompu bon week end phil
  8. HELLO GILE ok je vais regarder ca merci tu avais fait une fonction appeler "exclusive" elle ne faisait pas la meme chose ? j'ai essayer de la mettre dans le code sur le message N°1 haaa petite mise a jour il manque un libloc (setq libloc (vl-sort (vl-remove-if-not '(lambda (x) (wcmatch x (strcat "*" parnombloc1 "*"))) libloc ) '< ) ) le code au dessus est mis a jour a+ phil [Edité le 8/4/2010 par PHILPHIL]
  9. hello oups j'ai du mal m'expliquer il faut bien sur qu'il selectionne tous les blocs meme les parametriques mais ne fasse la liste dans le tableau que des blocs dont le nom comporte un bout de nom "parambloc1" si je ne selectionne par "*U*" au debut il en manque dans la tableau je peux tres bien avoir un bloc normal nommé "porte" et des blocs paramétrique nommer "porte fenetre" et vouloir la liste / tableau de tous les blocs nommer "*porte*" ceci etant un exemple bien sur l'ideal serait de remplacer ceci (cons 2 (strcat "*" parnombloc1 "*,`*U*")) par un truc allant chercher / filtrant directement le "effectivename" = "*"parnombloc"*" a+ phil soit j'enleve le "*U*"
  10. hello le fameux "tabloblo" de TRAMBER modifié marchait bien pour les bloc normaux maintenant que j'ai des blocs parametriques ca marche un peu moins bien je desires filtrer par un bout de "nom" les blocs ( parnombloc1) il me selectionne bien les blocs sauf qu'il en sélectionne meme un peu trop il prend tous es blocs paramétrique maintenant " *U* " je voudrais refiltrer la liste "LIREF" avec "exclusive" pour ne garder que les blocs dont le nom contient parnombloc1 mais la je suis trop nul ca ne marche pas un peu d'aide ? merci a+ phil ;; TABLOBLO (Tramber) ;; Crée un tableau qui liste les blocs insérés (sélectionnés ou toute la collection) (defun c:tbc5 (/ blocks libloc ss col liref ptins tablevl cont row blk com1 com2) (vl-load-com) (setq cav (getvar "clayer")) (if (= (tblsearch "layer" "LES TABLEAUX") nil) (command "-calque" "n" "LES TABLEAUX" "co" "180" "LES TABLEAUX" "") ) (or *acdoc* (setq *acdoc* (vla-get-activedocument (vlax-get-acad-object))) ) (setq blocks (vla-get-blocks *acdoc*)) (setq liref nil) (setq parnombloc1 (getcfg "APPDATA/PARNOMBLOC1")) (setq nomtableau1 (getcfg "APPDATA/NOMTABLEAU1")) (setq nomtableau2 (getcfg "APPDATA/NOMTABLEAU2")) (setq com1 (getstring t (strcat "\nVEUILLEZ ENTRER UNE PARTIE DU NOM DES BLOCS A LISTER <" parnombloc1 "> : " ) ) ) (if (/= com1 "") (setq parnombloc1 com1) ) (setq com1 (getstring t (strcat "\nVEUILLEZ ENTRER LE DEBUT DU TITRE DU TABLEAU <" nomtableau1 "> : " ) ) ) (if (/= com1 "") (setq nomtableau1 com1) ) (setq com2 (getstring t (strcat "\nVEUILLEZ ENTRER LA FIN TITRE DU TABLEAU <" nomtableau2 "> : " ) ) ) (if (/= com2 "") (setq nomtableau2 com2) ) (setcfg "APPDATA/PARNOMBLOC1" parnombloc1) (setcfg "APPDATA/NOMTABLEAU1" nomtableau1) (setcfg "APPDATA/NOMTABLEAU2" nomtableau2) (setq test (strcat "*" parnombloc1 "*")) (prompt (strcat "\nle bout du nom de bloc est : " test)) (prompt "\nSélectionnez les blocs à lister ou <Toute la collection>" ) (or (setq ss (ssget (list '(0 . "INSERT") (cons 2 (strcat "*" parnombloc1 "*,`*U*")) ) ) ) (setq ss (ssget "_X" (list '(0 . "INSERT") (cons 2 (strcat "*" parnombloc1 "*,`*U*")) ) ) col t ) ) (if ss (progn (vlax-for x (setq ss (vla-get-activeselectionset *acdoc*)) (or (vlax-property-available-p x 'path) (setq liref (cons (if (and (vlax-property-available-p x 'effectivename)) (vla-get-effectivename x) (vla-get-name x) ) liref ) ) ) ) (vla-delete ss) ) ) (if col (vlax-for i (vla-get-blocks *acdoc*) (if (= parnombloc1 "*") (progn (if (and (not (wcmatch (setq name (vla-get-name i)) "`**,*|*")) (= :vlax-false (vla-get-isxref i)) ) (setq libloc (cons (vla-get-name i) libloc)) ) ) (progn (if (and (wcmatch (setq name (vla-get-name i)) (strcat "*" parnombloc1 "*") ) (= :vlax-false (vla-get-isxref i)) ) (setq libloc (cons (vla-get-name i) libloc)) ) ) ) ) (setq libloc (remove_doubles liref)) ) (setq libloc (vl-sort (vl-remove-if-not '(lambda (x) (wcmatch x (strcat "*" parnombloc1 "*"))) libloc ) '< ) ) (initget 1) (command "-calque" "ac" "LES TABLEAUX" "ch" "LES TABLEAUX" "") (setq ptins (trans (getpoint "\nPoint d'insertion: ") 1 0)) (setq test2 (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)) ) ) (setq tablevl (vla-addtable (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)) ) (vlax-3d-point ptins) (+ 3 (length libloc)) 3 120 ; Hauteur cellule 250 ; Largeur cellule ) ) (vla-put-vertcellmargin tablevl 4.0) ; Marge verticale (vla-put-titlesuppressed tablevl :vlax-false) (vla-put-headersuppressed tablevl :vlax-false) (vla-put-stylename tablevl "TABLEAU BLOCS") ;STYLE DE TABLEAU PREDEFINI (vla-settext tablevl 0 0 (strcat nomtableau1 nomtableau2)) ; Titre (vla-settext tablevl 1 0 "Nom") ; Titre colonne 1 (vla-settext tablevl 1 1 "Nombre") ; Titre colonne 2 (vla-settext tablevl 1 2 "Symbole") ; Titre colonne 3 (vla-settext tablevl (+ 2 (length libloc)) 0 "TOTAL") ; TOTAL DERNIERE LIGNE (vla-settext tablevl (+ 2 (length libloc)) 1 (strcat "=Sum(B3:B" (rtos (+ 2 (length libloc)) 2 0) ")") ) ; TOTAL DERNIERE LIGNE (vla-setcellalignment tablevl (+ 2 (length libloc)) 0 5) (vla-setcellalignment tablevl (+ 2 (length libloc)) 1 5) (setq cont -1 row 1 ) (setq nbobj (+ 1 (length libloc))) (repeat (- (vla-get-rows tablevl) 2) (setq blk (nth (setq cont (1+ cont)) libloc)) ;; Nom du bloc (colonne A) (vla-settext tablevl (setq row (1+ row)) 0 blk) ;; Nombre de blocs (colonne B) (vla-settext tablevl row 1 (length (vl-remove-if-not '(lambda (n) (= n blk)) liref)) ) ;; Symbole (colonne C) (vla-setblocktablerecordid tablevl row 2 (vla-get-objectid (vla-item blocks blk)) :vlax-true ) (vla-setcellalignment tablevl row 0 5) (vla-setcellalignment tablevl row 1 5) (vla-setcellalignment tablevl row 2 5) (prompt (strcat "\rENTITE(S) TRAITEE(S) : " (rtos row 2 0) " SUR : " (rtos nbobj 2 0) ) ) ) (setvar "clayer" cav) (princ) ) <font class=edite>[Edité le 8/4/2010 par PHILPHIL]</font>
  11. PHILPHIL

    Lisps de gile

    hello tous merci lilian la j'arrive nickel a la télécharger 4 fichiers dedans bonne journée phil
  12. hello je voudrais forcer un second point par rapport a un point mais avec des angles definit le mode ortho nous limite aux angle a 0 90 180 270 je voudrais rajouter des angles definie ex : 45 135 225 315 (setq poibase (getpoint (strcat "\nENTRER LE POINT DE BASE "))) (setq poidi (getpoint poibase (strcat "\nENTRER LE POINT DE DIRECTION ") ) ) poidi etant forcement sir les angles 0 45 90 135 180 225 270 315 sans non plus activer le mode polaire merci a+ phil
  13. hello un petit rappel du "multihread" svp je suis pas foutu de retrouver l'aide sur ca ou alors autocad l'utilise maintenant par defaut a+ phil
  14. PHILPHIL

    Lisps de gile

    HELLO GILE aurais tu changer de machine il n'y a pas longtemps ? ou de programme de compression zip ? les fichiers *.zip que tu as mis en ligne sont pour la plupart corrompus ou alors ca vient de notre systeme qui est passé en 64BITS totalarea.zip me fait la meme chose que m'avait fait le fichier ici http://cadxp.cadmag.info/sujetXForum-27114.htm a+ phil
  15. PHILPHIL

    BUG OU PAS BUG ??

    hello autocad architecture 2010 tout patché mise a jour sinon tu parles peut etre des deux patch correctifs recents mais pour 2011 a+ phil
  16. BONJOUR je suis sous autocad architecture 2010 j'ai pas mal de blocs paramétriques avec le parametre "etirement linéaire" quand je l'importe dans un autre fichier avec un angle ou sans angle d'ailleur et que je tire dessus avec la fleche bleue en poitant la longueur d'étirement j'ai souvent voir meme a chaque fois un gros plantage pour eviter que ca plante je fais des fois une sauvegarde avant d'étirer ou un "control" par contre si je passe par la fenetre des propriétée pour donner la longueur ca ca ne plante plus est ce que ca arrive aussi chez vous ? est ce fait de zoomer dézoomer avec la molette de la souris qui fait que autocad ne sait plus ou il en est ? ca plante un peu moins quand le fichier est ouvert avec la version "autocad" que "autocad architecture" ce qui devrait normalement etre la meme chose enfin y'a peut etre plus de fichier *.arx d'ouvert avec "autocad architecture" dans l'attente de vos avis Msieur t'AUDESK si tu pouvais lire ca et regarder le probleme :) :) :mad: a+ phil [Edité le 2/4/2010 par PHILPHIL]
  17. PHILPHIL

    Ca recommence !

    HELLO si j'ai bien compris certains on deja leurs "autocad 2011" recu par la poste ?? les verticaux sont aussi sortie ?? autocad architecture 2011 ?? revit 2011 ? la poste irait elle plus vite que internet ? ( pour une fois ) j'entend par la que je n'ai pas la possibilite de télécharger ma version par le biais de la souscription ce qui serait tres tres fort de la part d'autodesk y'a un bug ? ou ces verticaux la ne sont pas encore traduit en franais autocad architecture suite 2011 ( autocad 2011? autocda architecture 2011 revit 2011 ) trouver l'erreur GRRRRRRRRRRRRRRRRRR a+ phil
  18. hello tramber merci donc si je comprend bien ( lecture rapide sur LISP ) il faut parcourir toutes les propriétés dynamiques avec "foreach" avant de trouver la bonne et récuperer la valeur on ne peut pas y aller direct ? a+ phil
  19. HELLO gile avait fait ceci http://cadxp.cadmag.info/sujetXForum-16547.htm ca donne toute les propriétées dynamique d'un bloc le LISp osculte toutes les propriétés une par une pour en donner la valeur comment en VLips aller directement a une valeur nommée seulement besoin d"exemples de bout de codes je cherche a récuperer la propriété dynamqieu d'un bloc defini par " LARGEUR" ( Exemple ) et la renvoyer dans le bloc avec une autre valeur je ferais le LISP ce soir a+ merci phil
  20. hello si tu envoies les fichiers dwg seulement pour impression c'est a toi de faire les fichiers *.plt d'impression et a lui de les imprimer il n'aurat plus a gerer comme ca les xref les *.plt son gros certes mais ils se comprimemt tres bien ou alors des fichiers *.dwf que tu peux visualiser mais plus embetant pour l'imprimeur et tu pourras gerer par le biais des presentations tous les format A0 tu as droit a maximum 255 présentations par fichier dwg de base ca l'aise quand meme une marge a+ phil
  21. PHILPHIL

    Appels aux pros des Xref\'s

    hello didier tu as surement du essayer "XREFCLASSIQUE" et le gestionnaire de références aussi ? LES XREFS n'ont pas changer d'echelle a la réouverture ? ils sont chargés ? mais n'apparaissent pas ? ils ont des nom bizarres ? trop longs ? a+ phil
  22. HELLO merci lili206 la ca marche je télécharge bien les deux fichier zip celui de lili2006 a bien un fichier *.dll de 33792ko par contre le tiens gille dans les deux cas j'ai un fichier sans suffixe DLL et il ne faisait que 9728ko j'ai tester le programme sinon ok ca marche merci a vous deux a+ phil
  23. hello gile gros souci alors car tjrs la meme chose bon pas grave je vais faire sans a moins que quelqu'un d'autre essaye merci a+ phil
  24. hello le fichier *.zip contient un fichier "LayerFilterImportExport" 9728ko et pas de fichier "LayerFilterImportExport.dll" nuance qui a peut etre son importance a+ phil
  25. PHILPHIL

    renommer Xref

    hello dans la fenetre des XREF fait apparaitre les lignes de détails aussi en bas sur la ligne "détecté sur" tu peux changer le répertoire au clavier sinon "xrefclassique" bouton enregistré chemin a+ phil
×
×
  • 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é