Classement

Bonjour à tous. Voilà, pour mes besoins, j'ai créé un lisp (avec une DCL) qui dessine des flèches en une polyligne en 2 clics. J'ai différencié 3 types de flèche : petite, moyenne et grande. Toutes les trois paramétrables, soit au moment du dessin, soit dans une fenêtre dédiée. Voici mon programme : DH_Fleches.zip Les différentes tailles (celle de la flèche, de la base et de la queue) sont exprimées en mm papier. Les commandes sont : - ConfigFleches : fenêtre de configuration des flèches, - DHPetiteFleche : dessine une petite flèche selon l'échelle, - DHMoyenneFleche : dessine une flèche moyenne selon l'échelle, - DHGrandeFleche : dessine une grande flèche selon l'échelle, Un grand merci à CadXP (notamment à Patrick_35, (gile), VDH-Bruno et j'en oubli...) sans qui, jamais je n'aurais réussi à faire cette routine... En espérant être utile à quelqu'un... Denis...

Salut, Si la boite de dialogue ne s'affiche pas c'est peut-être parce que le LISP ne trouve pas le fichier DCL (est-il bien dans un répertoire des chemins de support ?) Habituellement ceci est contrôlé en évaluant la valeur retournée par new_dialog : (setq Dcl_Id% (load_dialog "DH_Fleche.dcl")) (if (new_dialog "DH_Fleche" Dcl_Id%) (progn ; ici le code de gestion de la boite de dialogue ) (prompt "\nImpossible de charger le fichier DCL") ) On trouve souvent aussi simplement ça: (setq Dcl_Id% (load_dialog "DH_Fleche.dcl")) (if (not (new_dialog "DH_Fleche" Dcl_Id%)) (exit) ) ; ici le code de gestion de la boite de dialogueDans ce dernier cas le message est : "erreur: quitter / sortir abandon"