Aller au contenu

chemin d un bloc


FRED350

Messages recommandés

Bonjour,

j'ai un problème sur le chemin de mon bloc (nombloc "C:\00-llisp\datej.dwg")

 

pouvez vous m'aider

;;;______________________________________
;;;Programme DATEJ.LSP
;;;______________________________________
(defun c:DATEJ ( / lmois jj mm aa datej rep echbloc nombloc )
 
;;;;; lmois = liste en clair des mois de l année
 (setq lmois ( list "janvier" "février" "Mars" "Avril" "Mai" "juin" "Juillet" "Aout" "Septembre" "Octobre" "Novembre" "Decembre" );list

datej 	(rtos (getvar "cdate")2 0) ;;;;20150505
jj	(substr datej 7 2 );;;;05
mm	(substr datej 5 2 );;;;05
aa	(substr datej 1 4 );;;;2015

rep	(getstring"\nFormat pour la date :1 04/05/2015 / 2 : 4 Mai 2015 <1>:")
echbloc	(getdist  "\nEchelle du bloc <1>:")
	
nombloc "C:\00-llisp\datej.dwg"
		
	);setq



 ;;;;;_________________________________________________________
 ;;;;; test de la condition

 (if (= rep "2")  ;;;;format de la date 4 Mai 2015
   	(setq datej (strcat jj " " (nth (- (atoi mm) 1) lmois) " " aa))
   	(setq datej (strcat jj "/" mm "/" aa))
   	);if


;;;; test la valeur de j echelle

(if(= echbloc nil)
	(setq echbloc 1 )
);if
(alert(vl-prin1-to-string nombloc))

(setvar "cmdecho" 0)
 (setvar "attdia" 0)
 (prompt "\nPosition de la DATE")
 (command "inserer" Nombloc pause echbloc echbloc 0 datej)
 (princ)
	);defun c:datej

Lien vers le commentaire
Partager sur d’autres sites

Bonjour,

 

une barre oblique inverse (\) à l'intérieur d'une chaine de caractères permet d'inclure des caractères de contrôle ou des codes d'échappement.

 

Dans ton code, tu l'utilise d'ailleurs dans la ligne (prompt "\nPosition de la DATE") où le code \n signifie "nouvelle ligne".

 

Compte tenu que \ introduit un code de contrôle, il ne représente pas le caractère "\". Si on veut le caractère "\", il faut le code correspondant à savoir "\\"

 

Donc, le chemin serait plutôt "c:\\00-llisp\\datej.dwg"

 

Par ailleurs, si le répertoire 00-llisp est dans la liste des chemins de recherche des fichiers de support, on peut aussi utliser la fonction (findfile "datej.dwg") qui renverra le chemin complet.

 

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)

Lien vers le commentaire
Partager sur d’autres sites

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é