SF.Designer Posté(e) le 6 juin Partager Posté(e) le 6 juin Bonjour a tous, Petite demande afin de savoir si on peut écrire cela d'une autre façon (plus propre). La validation du OK de ma fenêtre de sélection (defun InitAllPrintOK () (cond((= PlotNB 1)(setq Plotstyle "NB")(PRT))) (cond((= PlotNBB 1)(setq Plotstyle "NBB")(PRT))) (cond((= PlotNBV 1)(setq Plotstyle "NBV")(PRT))) (cond((= PlotNBBV 1)(setq Plotstyle "NBBV")(PRT))) ; --- (cond((= PlotTT 1)(setq Plotstyle "TT")(PRT))) (cond((= PlotTTB 1)(setq Plotstyle "TTB")(PRT))) (cond((= PlotTTV 1)(setq Plotstyle "TTV")(PRT))) (cond((= PlotTTBV 1)(setq Plotstyle "TTBV")(PRT))) ; --- (cond((= PlotTTPRI 1)(setq Plotstyle "TTPRI")(PRT))) (cond((= PlotTTBPRI 1)(setq Plotstyle "TTBPRI")(PRT))) (cond((= PlotTTVPRI 1)(setq Plotstyle "TTVPRI")(PRT))) (cond((= PlotTTBVPRI 1)(setq Plotstyle "TTBVPRI")(PRT))) ; --- (cond((= PlotCO 1)(setq Plotstyle "CO")(PRT))) ) ; --------------------- (defun InitAllPrintCancel () (if (= userclick nil)(princ "\n--- Impression annulée ---\n")) (defun PRT () (vl-cmdf "._-PLOT" "_YES" "MODEL" PlotType PlotLimit "_MILLIMETERS" PlotOrientation "_NO" "_EXTENTS" Plotscale "_CENTER" "_YES" PlotStyle "_YES" "_WIREFRAME" "_NO" "_NO" "_YES")) ) Merci d'avance. Lien vers le commentaire Partager sur d’autres sites More sharing options...
SF.Designer Posté(e) le 6 juin Auteur Partager Posté(e) le 6 juin J'en profite aussi pour vous demander comment ce fait il que sur cette fenêtre, Si je sélectionne NOIR, TEINTAGE et que je me rend compte qu'il ne me faut pas le NOIR, je le désélectionne. Le toggle NOIR me renvoi quand même la valeur 1 et non pas 0. Lien vers le commentaire Partager sur d’autres sites More sharing options...
Luna Posté(e) le 6 juin Partager Posté(e) le 6 juin Coucou, Etant donné que l'on n'a qu'un extrait de code, je dois admettre avoir beaucoup de difficulté pour situer correctement à quoi correspond chaque variable (PlotNB, PlotNBB, ...). D'un point de vue programmation, je recommande vivement de favoriser l'utilisation d'arguments pour les fonctions et de déclarer localement l'ensemble des variables qui ne doivent pas être "enregistrée" dans le dessin après l'exécution d'une fonction. Pour ce qui est de l'architecture des (cond) à la chaîne...avec un simple extrait difficile de voir si l'on peut améliorer l'écriture du programme. Enfin pour le retour des toggles à la fin d'exécution de la boîte de dialogue, sans code impossible de pouvoir y apporter une explication. Bisous, Luna Lien vers le commentaire Partager sur d’autres sites More sharing options...
SF.Designer Posté(e) le 14 juin Auteur Partager Posté(e) le 14 juin Bonjour Luna, (petite excuse, déplacement pro et j'ai zappé mon DD de dév) Alors voila le lisp et dcl (je sais que j'ai pas mal de taf de concaténation etc, et de mise en forme du dcl) Merkiiii PrintV2.lsp PrintV2.dcl Lien vers le commentaire Partager sur d’autres sites More sharing options...
SF.Designer Posté(e) le 18 juin Auteur Partager Posté(e) le 18 juin Bon voici le version pour le moment "définitive"... Print.dclPrint.lsp Je suis ouvert a toutes critiques qui me permettrai de fluidifier, voir accelerer ce code ! Lien vers le commentaire Partager sur d’autres sites More sharing options...
Luna Posté(e) le 18 juin Partager Posté(e) le 18 juin Coucou, Sincèrement désolée, je manque cruellement de temps ces temps-ci et je n'ai toujours pas regarder ton souci. J'espère que ce n'est pas un souci pour toi, je jetterai un œil dès que mon planning se libère un peu 🙂 Bisous, Luna 1 Lien vers le commentaire Partager sur d’autres sites More sharing options...
Messages recommandés
Créer un compte ou se connecter pour commenter
Vous devez être membre afin de pouvoir déposer un commentaire
Créer un compte
Créez un compte sur notre communauté. C’est facile !
Créer un nouveau compteSe connecter
Vous avez déjà un compte ? Connectez-vous ici.
Connectez-vous maintenant