Aller au contenu

sauver un plan avec 3 layouts...en 3 plans différents


Messages recommandés

Posté(e)

Bonjour,

 

je ne suis pas un spécialiste du script, mais il pourrait ressembler à quelque chose du genre

 

_open "C:\toto\titi\tata1.dwg"
(load "splitlayout")
splitlayout
_close
_open "C:\toto\titi\tata2.dwg"
(load "splitlayout")
splitlayout
_close

 

Les spécialistes du script, et plus particulièrement de SAS, pourront mieux t'aider que moi.

 

Amicalement

Vincent

 

C'est au pied du mur que l'on reconnaît le maçon ! (Anonyme)

C’est en restant au pied du mur qu’on ne voit que le mur (Anonyme aussi)

Posté(e)

Pour Philous2, tu dois avoir escamoté une partie du fichier en faisant le copier/coller.

 

Je l'ai déposé ici

 

Par ailleurs, j'ai changé

(setq RemoveList (vl-remove-if '(lambda(x) (= x LAY)) LLAY))

 

par

(setq RemoveList (vl-remove LAY LLAY))

 

qui fait la même chose en plus simple.

 

Amicalement

Vincent

 

C'est au pied du mur que l'on reconnaît le maçon ! (Anonyme)

C’est en restant au pied du mur qu’on ne voit que le mur (Anonyme aussi)

Posté(e)

Bizarre car j'ai bien copier exactement ton lisp ci-après vérifié et enregistré fichier pas soucis de ce coté là mais ça ne passe pas.

 

(

 defun c:SplitLayout ()
 (vl-load-com)
 (setq PREFIX (getvar "DWGPREFIX"))
 (setq NOM (getvar "DWGNAME"))
 (setq LLAY (layoutlist))
 (foreach LAY LLAY
   (command "_undo" "_begin")
   (setq RemoveList (vl-remove-if '(lambda(x) (= x LAY)) LLAY))
   (foreach RLAY RemoveList
     (command "_layout" "_d" RLAY)
   )
   (command "_saveas"
     ""
     (strcat
       PREFIX
       LAY
       "-"
       NOM
     )
   )
   (command "_undo" "_end")
   (command "_undo" "1")
 )
 (princ)
) 

 

C'est quoi ton lien sur le site 9giga, il faut être inscrit ou pas, c'est là que tu as déposé un fichier c'est cela ! comment ça marche ton truc

merci d'avance

Posté(e)

mon truc c'est un site ftp. Il ne faut pas être inscrit.

 

Comment ça marche ?

 

Tu cliques sur le lien ici

 

Puis tu cliques sur le dossier "Mes lisp" pour qu'il s'ouvre

 

Tu coches le fichier "SplitLayout.lsp" et tu cliques sur "Télécharger" puis tu l'enregistres sur ton disque.

 

Voilà en gros...

 

Amicalement

Vincent

 

C'est au pied du mur que l'on reconnaît le maçon ! (Anonyme)

C’est en restant au pied du mur qu’on ne voit que le mur (Anonyme aussi)

Posté(e)

Décidment vincent y a un truc, qd je clic sur ton lien j'arrive sur la page d'accueil de 9giga ou il y a plusieurs dossiers comme copier vos fichiers,envoyez à vos amis les fichiers que vous souhaitez etc,accédez à vos fichiers,déposez vos documents,, identification, etc.....mais je nevois du tout ton dossier "Mes lisp". a mon avis il faut être inscrit je pense essaie le site "cjoint.fr" qui es tpasmal et simple facile d'accès il faut s'insrire pour déposer mais après cool

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 compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité