Ne plus rien voir...

[sechanbask]

Bonsoir,

Comment faire pour qu'au lancement d'une commande LISP rien n'apparaisse à l'utilisateur...

Merci d'avance

[(gile)]

Salut,

 

Si "rien" veut dire aucune invite sur la ligne de commande, il suffit de mettre la variable CMDECHO à 0 avant les appels à la fonction command et éventuellement supprimer celles contenues dans la routine.

S'il s'agit d'autre chose, je n'ai pas compris...

[Matt666]

Quelques tentatives de réponses ici...

 

A bientôt !

Matt.

[sechanbask]

en fait , je repose de manière différente le sujet situé ici : http://www.cadxp.com/sujetXForum-16353.htm

 

Merci à tous les deux mais ne connaissant rien au lisp, j'ai un peu de mal.

 

(gile):

si je fais ce que tu m'as dis, je me retrouve avec:

 

(defun c: DMN()
(setvar "cmdecho" 0)
(command "-vbarun" "PROJET.DVB!INSAUTO.DMN")
(setvar "cmdecho" 1)
(princ)
)

 

Mais si je lance avec le lisp sui lance mon VBA (voir http://www.cadxp.com/sujetXForum-16353.htm), j'ai dans la ligne de commande : "Veuillez entrer la largeur de la réservation :", et en ligne dynamique j'ai "Veuillez entrer la largeur de la réservation :Veuillez entrer la largeur de la réservation :" .

 

Matt666, si je voulais intégrer nomutt, ça me donnerai ça, non?:

(defun c:DMN()
(setvar "NOMUTT" 1)
(command "-vbarun" "PROJET.DVB!INSAUTO.DMN")
(setvar "NOMUTT" 0)
(princ)
)

 

Donc ça ne marche pas car j'ai dans la ligne de commande :

"DMN -vbarun PROJET.DVB!INSAUTO.DMN Veuillez entrer la largeur de la réservation :"

et dans la ligne dynamique :

"Veuillez entrer la largeur de la réservation:Veuillez entrer la largeur de la réservation"

 

donc retour à la case départ, merci quand même d'avoir proposé quelque chose car je désespère... C'est vraiment pas facile de conjuguer 2 langages... et je m'en douter voir http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=15751#pid

[(gile)]

Salut,

 

que ce soit avec NOMUT ou CMDECHO, la modification des variable ne jouera que sur la partie LISP.

 

Copies de la ligne de commande, avec CMDECHO = 0 :

Commande: dmn

 

Avec CMDECHO = 1 :

Commande: dmn

-vbarun

Nom de la macro: PROJET.DVB!INSAUTO.DMN

 

Le reste des invites vient de la macro VBA et ne peut surement pas être géré par le LISP qui ne fait que la lancer.

[sechanbask]

C'est quand même bizarre car mon VBA ne me rajoute jamais de texte... voilà mon code VBA pour que quelqu'un puisse me confirmer que ça ne vienne pas de là:

 

Sub DMN()
Dim Largeur As String
Dim texte As String
Largeur = ""
texte = ""
texte = "Veuillez entrer la largeur de la réservation :"
Largeur = ThisDrawing.Utility.GetString(True, texte)
texte = ""
MsgBox "La largeur de la réservation est de : " & Largeur & " cm." & vbCr
Largeur = ""
End Sub

 

je ne pense pas que je puisse plus vérrouiller les variables ?