-
Compteur de contenus
6 374 -
Inscription
-
Dernière visite
-
Jours gagnés
30
Type de contenu
Profils
Forums
Calendrier
Blogs
Tout ce qui a été posté par Patrick_35
-
C'est super zebulon_ ;) Il reste juste encore quelques command dans to lisp ;) @+
-
Salut (length (layoutlist)) @+
-
Salut utilise la commande -banniere @+
-
Je vous rejoins tous les deux. Il n'y a pas assez de donateur et notre cher webmaster a surement besoin de sous pour sa nouvelle maison ;) @+
-
Salut Tu as le fichier ObjectDCL2004.arx à charger pour que les boîtes de dialogues soient comprises en vlisp et le programme ObjectDCL.exe à lancer pour créer ces boîtes Tu peux ajouter dans les chemin de recherche le répertoire d'installation d'ObjectDCL et créer un bouton pour lancer l'appli ex:^C^C(startapp "ObjectDCL.exe") @+
-
Salut Regerde ce sujet @+
-
Salmut Tu as du pour et du contre. C'est surtout en fonction de ta disponibilité, de tes connaissances et de l'energie à investir Un MO, c'est clé en main. On n'a qu'un seul interlocuteur et pas de problème de planning Si on fait soi-même la MO, il faut suivre l'avancement du chantier, ne pas hésiter à faire quelques reunions de chantiers avec un compte-renduu (c'est une pièce officiel) user de son energie pour que l'artisant soit présent ou exécute son travail dans un temps imparti Si tu fais la MO, le plus important est de faire un bon planning afin que tout se déroule pour le mieux. Il faut quand même savoir qu'il y a des tâches importantes qui doivent se suivre et d'autres qui peuvent se faire en parralèlle. Un peintre ne pourra peindre que la cloison montée. De même pour l'electricien et le plombier (qui eux doivent commencer avant et finir ensuite) Un autre exemple, Le macon pose son ferraillage, l'électricien intervient pour y couler ses gaines et le maçon fait son plancher. (d'autres le font dans la chape du carreleur, d'autres pas, celà dépend du chantier) Cela peut paraître bête, mais ce n'est pas si simple à plannifier Par contre, l'avantage, c'est le choix des artisants, du matériel mis en oeuvre, de la qualité du travail effectué et pas de surprise (normalement si c'est bien suivi) lors de la réception de la maison La solution idéal, un MO qui prenne tes artisants mais ce n'est pas toujours facile Bon courage ps : Une maison en bois, perso je trouve ça très bien. Ca coute environ 20% de plus à la construction par rapport à une maison traditionnelle, mais tu as une trés bonne isolation. De plus, le cout de l'energie commence à devenir prohibitif. Tu as des subventions pour ce qui est de la géothermie/pompe à chaleur/panneaux solaires par le conseil régionnal, l'ADEME et sûrement d'autres organismes. Par contre, surtout ne pas commencer de travaux avant les subventions sinon, elles te passe sous le nez (je parle d'expérience) @+
-
Salut J'ai regardé ton code de plus près et je l'ai remanié, notamment au niveau des parenthèses. Comme je ne possède pas ton environnement, je n'ai pas pu le tester, mais ça devrait fonctionner ;;Pour activer les fonctions visual-lisp (vl-load-com) ;; --------------------------------------------------------------------------- --------------------------------------------- ;; Programme principale pour l'exportation d'attributs de blocs ;; --------------------------------------------------------------------------- --------------------------------------------- (defun c:Export_XL (/ OldCmd dcl_id) ;; Fonction pour Saisie du nom et chemin du fichier xls ..(defun saisie () ....(setq nom (getfiled "Nom du fichier excel à créer" "T:\\Export\\" "xls" 1)) ....(set_tile "montexte" nom) ..) ;; Fonction pour Récupération des informations de la boite DCL ..(defun do_accept () ....(setq EXPORT (get_tile "export")) ; (alert nom) ;; pour débug afficher la valeur récupérée ....(if (= nom "") ......(alert "Saisissez le nom et le chemin du fichier d'exportation") ......(done_dialog 2) ....) ..) ;; --------------------------------------------------------------------------- --------------------------------------------- ;; Fonction pour Affichage de la boite de dialogue d'aide Fct Export ..(defun helpexpt () ....(new_dialog "helpexpt" dcl_id) ....(setq x (dimx_tile "logo") ............y (dimy_tile "logo")) ....(start_image "logo") ....(fill_image 0 0 x y -2) ....(slide_image 0 0 x y "ERAS") ....(end_image) ....(start_dialog) ..) ..(setq OldCmd (getvar "CMDECHO") ..........dcl_id (load_dialog "ERAS-EL.dcl")) ..(setq nom "") ..(setvar "CMDECHO" 0) ;; Création de la boite ..(new_dialog "export" dcl_id) ;; Fonction d'appel en retour ..(action_tile "about" "(c:about)") ..(action_tile "helpexpt" "(helpexpt)") ..(action_tile "cancel" "(done_dialog 0)") ..(action_tile "accept" "(do_accept)") ..(action_tile "saisie" "(saisie)") ..(action_tile "Ouverture" "(setq Ouverture $value)") ;; Affichage de la boite ..(setq What_next (start_dialog)) ..(if (= What_next 2) ....(progn ;; Exportation des attributs ......(if (= EXPORT "Filerie") ........(command .........."-eattext" "dwgCourant" "Non" "Non" .........."w:\\technique\\autocad\\Symboles DAO 2003\\REPERE FIL CABLE\\FIL.blk" "Xls" ..........nom) ......) ......(if (= EXPORT "Cable") ........(command .........."-eattext" "dwgCourant" "Non" "Non" .........."w:\\technique\\autocad\\Symboles DAO 2003\\REPERE FIL CABLE\\CAB.blk" "Xls" ..........nom) ......) ....) ..[surligneur][b]) ;; Ajoutée[/b][/surligneur] ..(setvar "CMDECHO" OldCmd)[surligneur][b] ;; ) Enlevée[/b][/surligneur] ;; Déchargement de la boite ..(unload_dialog dcl_id) ;; Ouverture du fichier ..(if (= "1" (get_tile "Ouverture")) ....(Liaison_Xl)[surligneur][b] ;; ) Enlevée[/b][/surligneur] ..) [surligneur][b]) ;; Ajoutée[/b][/surligneur] ps : chaque . représente un espace. C'est une manière de représenter le code afin qu'il soit plus facilement lisible, compréhensible et "débbugable" @+
-
Salut Quesques sites pour les fiches techniques Def Cerberus Shubb AE&T Gardiner Civ Sécuritas Eclats antivols Wps Sovematic @+
-
Salut (gile) En regardant dans le zip, tu trouveras toutes les sources en c ou c++, mais pas d'arx pour faire fonctionner ObjectDCL sous 2007, comme pour les autres versions @+
-
Merci, c'est super mais il ne reste plus qu'à le compiler :( @+
-
Salut, je pense que oui mais je n'ai jamais testé. Je trouve que ça perd un peu de son intérêt car si tu changes la valeur d’un attribut dans la chaîne de type Somme, le total est réactif. De plus, si des points topo devaient changer pour une raison ou une autre, tu risques du coup d’être embêté avec des attributs constants. @+
-
Eh oui, comme quoi il me reste encore des choses à découvrir sur Autocad ;) , mais j''ai une excuse, je viens d'avoir enfin une 2005 depuis peu qu'il me reste à approfondir :) @+
-
Bien (gile) Il est possible d'améliorer ton lisp en associant le bloc concerné avec la polyligne par exemple et comme tu travailles avec les champs dynamiques, si on modifie une surface, le champ concerné sera remis à jour (avec un regen) @+
-
Salut A te lire sans tester, je pense avoir trouvé l'erreur (vlax-import-type-library :tlb-filename Chemin_Excel :methods-prefix "xl-" :properties-prefix [surligneur][b];;Pour Toutes Versions Excel[/b][/surligneur] "xlp-" :constants-prefix "xlc-") Je pense que ce qui est souligné est mal placé @+
-
Salut Effectivement, il y avait bien un bug. C'est corrigé et mis à disposition @+
-
Correction d'un bug sur la vérification de la base de données de LATT qui passe donc en version 6.31 Tramber, je t'ai envoyé un MP à propos de ta question et pas de réponse depuis une semaine :( @+
-
Salut, elles sont principalement en lisp voir vlisp, alors si tu souhaites t'y mettre, bienvenue au club ;) ps: le vlisp et le vba se ressemblent beaucoup et on arrive en vlisp à jouer avec les ActiveX @+
-
Oui, c'est bien ce que je disais, passe en 1024x768 @+
-
Ah oui, désolé. Je viens de verifier mon adresse et il y a un _ en trop @+
-
Problème de boucle sur les attributs de bloc
Patrick_35 a répondu à un(e) sujet de Morgul dans Débuter en LISP
On la fait plus subtile avec un inputbox et la valeur par défaut dans la boucle ? ;) Ce sont les petites rivières qui font les grands fleuves et comme ça, j'ai un peu plus de temps pour la pause café :cool: @+ -
Problème de boucle sur les attributs de bloc
Patrick_35 a répondu à un(e) sujet de Morgul dans Débuter en LISP
ou encore (while (/= (cdr (assoc 0 att)) "SEQEND") ...) on gagne deux parenthèses :D @+ -
Salut Voici les liens pour les originaux --> Déterminer la version d'Excel --> Des exemples pour travailler avec excel en vlisp @+
-
Renseigner un attribut de bloc après selection
Patrick_35 a répondu à un(e) sujet de Morgul dans Débuter en LISP
Salut C'est exact, il y a bien une coquille Je t'ai donné ces exemples de mémoire et sans tester mais tu as trouvé et c'est le principal ;) @+ -
Salut Tu as pensé à changer la résolution de ton écran ? @+
