Aller au contenu

Classement alphanumérique des onglets de présentation


Messages recommandés

Posté(e)

Bonjour à Toutes et à Tous,

 

 

J'ai fait une recherche sans succès !!!

 

J'avais vu passer un sujet sur un programme LISP qui classait ALPHANUMERIQUEMENT les onglets de présentation...

 

 

Merci pour votre aide à retrouver ce sujet...

 

 

Christian

Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...

cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)

Posté(e)

Re, Re,

 

Une petite remarque quel est le type d'indexage utilisé car curieusement comme depuis VISTA et SEVEN dans certains cas le caractère _ (underscore) se retrouve en fin de liste alors qu'il est généralement toujours en tête !!!! :unsure:

 

Christian

Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...

cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)

Posté(e)

Bonjour rebcao,

 

Une petite remarque quel est le type d'indexage utilisé car curieusement comme depuis VISTA et SEVEN dans certains cas le caractère _ (underscore) se retrouve en fin de liste alors qu'il est généralement toujours en tête !!!!

 

Sur ce coup la VISTA et SEVEN non rien avoir dans l’histoire, tout ce passe dans cette ligne de code :

;; trier la liste
 (setq layoutsName (vl-sort layoutsName '<))

 

Plus précisément au niveau de la fonction de comparaison utilisé <, exemple :

_$ (vl-sort '("1" "0" "b" "B" "33" "3" "_") '<)
("0" "1" "3" "33" "B" "_" "b")

 

 

Pour retrouver un trie plus conforme à tes attentes remplace la ligne précédente par celle-ci.

(setq layoutsName (acad_strlsort layoutsName))

 

Exemple:

_$ (acad_strlsort  '("1" "0" "b" "B" "33" "3" "_"))
("_" "0" "1" "3" "33" "b" "B")

 

A+

Apprendre => Prendre => Rendre

Posté(e)

Re,

 

Pour compléter ta question

quel est le type d'indexage

 

La fonction de trie utilisé avec le comparateur < effectue un trie en fonction des codes ASCII, pour t’en convaincre tu peux regarder ces quelques expressions :

_$ (vl-sort '("1" "0" "b" "B" "33" "3" "_") '<)
("0" "1" "3" "33" "B" "_" "b")
_$ (mapcar 'ascii '("1" "0" "b" "B" "33" "3" "_"))
(49 48 98 66 51 51 95)

 

A+

Apprendre => Prendre => Rendre

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é