stephan35

Salut ! Je vais te donner une réponse de normand ... Il existe, de mémoire une documentation sur le cd d'installation, qui ressemble plus à un recueil des fonctions existantes, qu'a un manuel d'utilisation (vente de formation oblige !) Attention, See est un produit complexe, on peut être autodidacte mais pas sans risques !!! (Je parle en connaissance de cause) Dans tous les cas, il vaut mieux déranger tes collègues (faute de formation) plutot que te lancer dans des fonctions qui peuvent par exemple endommager définitivement un environnement de travail ! Bon courrage !

L'erreure est humaine .... Et ça me plait bien comme ça !, On en fait tous, le tout est de savoir le reconnaitre . ;) A+

Dommage ! Merci gile pour tes recherches !

Bonjour à tous ... Pour faire suite à ce sujet : http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=14930 Dans les barres d'outils (et non les menus déroulants) est-possible de désactiver un bouton ??? Et comment ? (Autocad le fait dans certains cas de figure) Merci !

Bonjour, Peut-être une petite introduction sur le S::startup ??? ;) A+

Bonjour, J'ai tenté quelques développement avec le VBA il y a quelques temps ... et je suis revenu au LISP ... Le VBA apportait plus de convivialité dans le développement des boites de dialogues, qui est aujourd'hui complêtement comblé grace à l'OpenDCL. (Arx) J'utilise le Lisp depuis 1988 et tous les outils développé sur autocad ont évolués sans aucun problèmes ... Bon courrage ;)

Bravissimo !!!! Fonctionne pour mon cas : AutoCAD 2006 fr Merci ! ;)

Ben ça alors ! J'ai l'impression que cela ne fonctionne pas dans les menus boutons ! (Barre d'outils )??? :casstet: Merci ! [Edité le 2/5/2007 par stephan35]

bonjour à tous .... Toujours à la recherche du travail propre .... Comment fait-on pour détruire une variable créée ???? après un (setenv "MAvar" 1) (delenv ????) A+

Merci gile, Mais ... Il n'y aurait pas une autre solution : Ma valeur autorise le fonctionnement ou pas de certains programmes lisp (via les boutons), mais pas basé sur les variavble systèmes autocad ! Il me faut absolument une solution .... :( - soit basée sur du lisp, qui inhibe le nième boutton du menu "y" (ID_BT_22) dans le cui cui ... - soit la posiibilité en diesel d'extraire des valeurs issue de (setq toto "1") ??? :casstet: Merci !

Bonjour à tous, Je cherche une solution pour rendre inactif des boutons dans mes menu en fonctione de l'état d'une variable, exemple : (getcfg (strcat "AppData/BHZ/Config/Startup/" (getvar "DWGPREFIX"))) me retourne "1" ou "" , si "1" mon bouton est actif, si "" il est inaccessible ..... Je crois que ça se fait en diesel ???? .... un petit exemple ??? Peut-on le faire en lisp, avons-nous accès directement aux elements des menu boutons ??? Encore merci ! et bon week-end !!! :thumbup: ---------------------------------------------------------------------------------------- Ps : j'ai effectivement changé le titre de ma requête: Il ne s'agit pas des menus déroulants, mais des barres d'outils .... Merci [Edité le 2/5/2007 par stephan35]

Ah ! Serait-ce normal de ne pas pouvoir jouer avec menu pendant un évenement réacteur ??? _menuload plante !! ??? :casstet: (defun CheckEndSave (rea cde) (if (= (car cde) "SAVEAS") (progn ; Regarde si la structure correspond à la norme SETBT (load(strcat $drive "STARTUP_chargement_parametres_debut.LSP")) (if (/= $affaire $controle) (progn .... ) (progn (if (= nil (menugroup "MENU_FAV"))(command "_menuload" (strcat $drive "menu\\MENU_FAV.MNU"))) (setcfg (strcat "AppData/BHZ/Config/Startup/" (getvar "DWGPREFIX")) "1") (load(strcat $drive "STARTUP_chargement_parametres_debut.LSP")) (load(strcat $drive "STARTUP_ACTIVATION.LSP")) ) ) ) ) ) Merci !

Salut Gile ! Merci pour la petite intro .... que je m'empresse de tester .... les asterix sont obligatoires ????? *check...* ??? Merci ! a+

Bonjour ! Je souhaiterai être aidé sur les réacteurs, j'ai besoin de déclenché une série de test après l'éxecution de la commande _saveas, genre : -si le répertoire de sauvegarde respecte une certaine arborescence, activer certains éléments du menu etc. 1 - est-ce la bonne méthode 2 - avoir un exemple 3 - peut-on tout tester ou les limites des réacteurs Un grand merci !!!!

Respect ! ;)

Voila ! (if(> 2 (vla-get-count (vla-get-documents (vlax-get-acad-object))))(setvar "SDI" 1))

Tu me croira si tu voudras, j'allais donner la réponse ! ;) Merci quand même bred !!!! A+

Enfin la suite ... Voici mon astuce : Mon lanceur, qui déclenche l'ouverture d'un autre DWG : (setvar "SDI" 0) (vl-load-com) (setcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX")) (strcat $drive "SCRIPT\\#Zoom#Save#Export.Lsp")) (setq vla(vla-open (vla-get-documents (vlax-get-acad-object)) (strcat (Odcl_Control_GetCaption Boites_Open_EREP) "\\" (Odcl_Control_GetText Boites_Open_EFIC))nil)) (setq ms (vla-get-ModelSpace vla)) (setq app (vla-get-application vla)) (vla-close vla T) ; T pour ignorer la sauvegarde ? (vlax-release-object vla) (vlax-release-object ms) (vlax-release-object app) (setvar "SDI" 1) Je définie une cle "AppData/BHZ/Config/Lisp/" qui, lorsqu'elle est initialisée déclenchera l'ouverutre d'un lisp dans le chargeur acadxxx.lsp ! ACAD2006DOC.lsp ; Déclenchement de lisp à l'ouverture d'un folio dans ce repertoire (if (or (= nil (getcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX")))) (= "" (getcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX")))) ) (setcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX")) "") (getcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX"))) ) ... ... ... .. ; Lanceur programme lisp à l'ouverture d'un folio (if (/= "" (getcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX"))))(load (getcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX"))))) Mon #Zoom#Save#Export.Lsp (alert "ooooo") ; zoom etendu (command "_zoom" "_e") ; Sauvegarde (command "_qsave") ; Exporte la base de donnée (load (strcat $drive "GESTION_data_exporte.lsp")) ; Reinitialise le lanceur (setcfg (strcat "AppData/BHZ/Config/Lisp/" (getvar "DWGPREFIX")) "") A adapter suivant utilisation .... Attention au controle des variables SDI et ACADLSPASDOC qui peuvent poser problèmes... Ouf !

Bonjour à tous, Je viens de découvrir un petit conflit dans l'initialisation de la variable SDI qui bloque la lecture de l'acadxxx.lsp si plus d'un fichier dwg est ouvert dans la même session. Le acadlspasdoc est bien à 1, et lorsque je passe sur la ligne (setvar "SDI" 1) et la suite de mon lisp plante ! Donc : Il me faudrait connaitre le nombre de fichiers ouverts, en lisp pour autoriser le passage ou pas de cette ligne. Merci à vous !

MDR ! :laugh: Merci à tous ! A+

!!!!!!!!!!!!! Ca marche aussi !!!!!!!!!!!!!!!!! Youpi !!!!! Un grand merci à : [surligneur] Bred[/surligneur] :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D PS: Faut pas faire de jaloux .... ;)

!!!!!!!!!!!!! Ca marche !!!!!!!!!!!!!!!!! Youpi !!!!! Un grand merci à : [surligneur] bonuscad[/surligneur] :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D :D Ps: Je n'ai pas cherché, mais : On peut trouver facilement cette liste de variables ???

Oui, donc, Meaculpa, à vouloir toujours aller plus vite, on fini par raccourcir les mots, Faire des fautes d'orthographe et de grammaire (Qui n'a jamais été mon point fort, je l'avoue !)... mélanger les langues .... etc. Exprimer sa demande et se faire comprendre des autres est parfois difficile .... ;) Merci !

Cette solution ne fonctionne que si le menu écran est déjà affiché ! :( Désolé , merci quand même ! Gardons espoire !

J'ai corrigé ma demande ! et c'est dans le panneau de configuration d'autocad que se trouve l'option d'affichage "menu Ecran", Cette option n'est pas sauvegardée ! Je cherche la commande magique (lisp ou autre) qui force l'affichage du menu ecran. ReMerci .... ;)