Aller au contenu

Messages recommandés

Posté(e)

Bonjour à tous,

 

Je cherche à afficher une liste sans guillemets du type :

 

s::startup getverx64 tpsload doslibcharg C:TPSDOSLIB C:TPSH C:TPSA C:MSADOX

 

issue de la commande "lstdefun" de ce même forum !

 

sujet de ce forum :

 

Afin d'améliorer l'affichage, dans une fenêtre avec liste déroulante comme celle des doslib ou autre !

 

 

(dos_listbox "Set Current Layer" "Select a layer" '("Layer1" "Layer2" "Layer3"))

 

daniel OLIVES

Posté(e)

Re bonjour,

 

C'était tout simple avec une autre routine dispo sur le site !

 

J'ai convertit la liste sans guillemets en liste avec !

 

; (str2lst "a b c" " ")

(defun str2lst (str sep / pos)

(if (setq pos (vl-string-search sep str))

(cons (substr str 1 pos)

(str2lst (substr str (+ (strlen sep) pos 1)) sep)

)

(list str)

)

)

 

Daniel OLIVES

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é