@zwfrance
oui très étrange : dans un fichier vierge :
1 - je copie colle un contour
2- je fait une hachure solide
3- j'importe une photo
--> le Lisp fonctionne

Dans un fichier "plein" il ne fonctionne pas.
Il y a peut être une variable locale d'affichage qui change la donne.

Précision c'est après avoir fait un HATCHTOBACK, les hachures sont derrière l'image.
Je n'ai pas de message d'erreur et dans la ligne de commande j'ai :

Commande : imgearr
_.draworder


Sélectionnez des entités pour changer l'ordre : 
9 trouvé(s)

Sélectionnez des entités pour changer l'ordre : 

Entrer une option [au Dessus des entités/en dEssous des entités/AVant/ARrière] <ARrière> : _back
Commande : 

Mais les hachures sont toujours derrière !

Bonjour,

j'ai un petit Lisp qui met toutes les images en arrière, il fonctionne sur ZW2021, mais refuse de répondre sur ZW2023.

Voici le code :

(defun c:imgearr (/ sel)
 (vl-load-com)
 (setq sel (ssget "_X"
		 (list	'(-4 . "<OR")
			'(0 . "IMAGE")
			'(0 . "OLE*")
			'(-4 . "OR>")
		 )))
 (if (= sel nil)
  (alert "Il n'y a pas d'image dans le dessin.")
 (vl-cmdf "_.draworder" sel "" "_back"))
(princ)
)

Avez vous une idée ? et fonctionne t-il chez vous ?
Merci

@ts Bonjour,
merci d'avoir pris le temps de répondre., je viens de trouver à l'instant !:)
J'ai réinitialisé l'environnement et rechargé l'importation des paramètres de la 2021, le problème a disparu.
J'ai pas eu l'idée dès le départ, pourtant c'est le bon adage "Dans le doute --> Reboute ! "

A bientôt,
Rémy

Bonjour,
Je viens de basculer de ZW2021 à ZW2023 et les boites de dialogues ne sont pas
chargés dans les LISP.
 
Que la boite soit temporaire ou en fichier DCL, le LISP ne le charge pas, le LISP se met en erreur après la commande de vérification :
 
 ;; Avec un DCL "temporaire" --- J'ai bien vérifier le fichier dcl est bien dans le %temp%
 ;; charger le fichier
 (setq dcl_id (load_dialog tmp) status 2)
 (while
(< 1 status)
   (if      (not
(new_dialog "EchFena3a4" dcl_id))
     (exit))
 
;;
ou exemple avec un fichier en "dur" :
 (setq
dcl_id (load_dialog "mm2016.dcl"))
 (if
(not (new_dialog "mmortho2016" dcl_id))
  (exit))
 
Bien sûr le chemin de recherche de fichier support est déclaré dans les options. :))
 
Il y a une variable dans 2023 qui gère le chargement des DCL ?
Là je sèche et ne trouve pas d'explication !?

Merci,
Rémy