[Résolu] Retours de initget et getkword incohérents

[Aleck_Ultimate]

Bonjour à tous.

 

Je me suis arraché les cheveux un bon moment avant de comprendre l'origine du problème.

 

Avec le code :

 

(initget "Parent Numero_dossier Etudes test_4 test_5") ;_ Choix de l'utilisateur
(setq chn_setq_getkword (getkword "Quel dossier ouvrire ? [Parent/Numero_dossier/Etudes/test_4/test_5]"))

Si je choisis "Parent" il me retourne "dossier"

 

Si je choisis "Numero_dossier" il me retourne "Etudes"

 

Si je choisis "Etudes" "Test_4" ou "Test_5" il me retourne une erreur si j'ai DYNMODE désactivé et "nil" si j'ai DYNMODE activé.

 

Par contre avec le même code sans les tirets bas.

 

(initget "Parent Numerodossier Etudes test4 test5") ;_ Choix de l'utilisateur
(setq chn_setq_getkword (getkword "Quel dossier ouvrir ? [Parent/Numerodossier/Etudes/test4/test5]"))

Tout marche normalement.

 

Je comprend pas pourquoi les tirets bas font tout buger. C'est normal ? Corrigible ? Explicable ?

 

Si c'est une contrainte tant-pis, mais je trouve que ça fait quand-même pas un outil très pratique alors que certains commande natives d'AutoCAD comportent même des espaces dans les noms de leurs options.

 

Merci.

[Fraid]

Bonjour,

 

A tu essayer avec un "\" devant ton "_" ?

[Aleck_Ultimate]

A tu essayer avec un "\" devant ton "_" ?

Effectivement non, mais le retour est le même chose avec ou sans "\".

[bonuscad]

Bonjour,

(initget) utilisé avec (getkword) a une syntaxe particulière permettant l'internationalisation du lisp.

En effet si on fait:

(initget "Bonjour Aurevoir _Hello Byebye")(getkword "\nJe dis [bonjour/Aurevoir]?: ")

Si l'on renseigne "b", "B" (au minimum: la lettre ou les lettre en Majuscule définie-s) ou "bonjour" "Hello" est retourné.Si l'on renseigne "_h", "_H" ou plus, "Hello" est aussi retourné.Donc si initget rencontre un underscore dans ses paramètres, il considère que les mots suivants ( en nombre équivalent) sont en langue international et retournera ceux-ci et non ceux défini en Français.

[(gile)]

Salut,

 

Pour ajouter à ce qu'a dit bonuscad, dans le initget, on ne met que les "mots clé" à savoir un seul mot par "mot clé"; mais dans l'invite, on peut mettre des espaces et/ou des tirets bas. La valeur retournée par getkword est le "mot clé"

D'autre part, si on ne spécifie pas le bit 1 dans le initget (pour refuser que l'utilisateur fasse Entrée), il est préférable de spécifier une option par défaut.

 

(initget "Parent Numero Etudes 4 5")
(setq chn_setq_getkword (getkword "\nQuel dossier ouvrir [Parent/Numero dossier/Etudes/test 4/test 5] <Parent>: "))
(cond
 ((= chn_setq_getkword "Numero")
  (alert "Numero")
 )
 ((= chn_setq_getkword "Etudes")
  (alert "Etudes")
 )
 ((= chn_setq_getkword "4")
  (alert "4")
 )
 ((= chn_setq_getkword "5")
  (alert "5")
 )
 (T (alert "Parent"))
)

[Aleck_Ultimate]

Merci beaucoup. Comme quoi vaut mieux un qui sait (en l'occurrence deux) que moi qui cherche pendant des heures

[lecrabe]

Hello

Waouh les 2 Vieux Grands Maitres Jedi (du Lisp/VLisp) Gilles et Bruno

ont pris sous leur ailes le Jeune Padawan Aleck !!

Bye, lecrabe

[DenisHen]

Le 10/10/2018 à 14:19, (gile) a dit :

Pour ajouter à ce qu'a dit bonuscad, dans le initget, on ne met que les "mots clé" à savoir un seul mot par "mot clé"; mais dans l'invite, on peut mettre des espaces et/ou des tirets bas. La valeur retournée par getkword est le "mot clé"

Cela signifie qu'on peut avoir un (initget de ce type ?

(initget "1 2 3")
(setq Choix (getkword "\nChoix de l'option [1-Ajouter/2-Modifier/3-Supprimer] : "))

 

[didier]

Bonjour @DenisHen

Oui, mais il ne faut pas laisser les majuscules en début de mots pour ne pas tromper l'utilisateur au moment de la saisie.

Amicalement

[DenisHen]

Merci @didierpour ta réponse.
Parfait, ça va me faciliter la vie cette astuce.
Denis.

[(gile)]

Le 24/08/2022 à 08:58, DenisHen a dit :

Cela signifie qu'on peut avoir un (initget de ce type ?

(initget "1 2 3")
(setq Choix (getkword "\nChoix de l'option [1-Ajouter/2-Modifier/3-Supprimer] : "))

Pour avoir rapidement une réponse à ce genre de question, il suffit de tester. La console Visual LISP est ta meilleure amie.

[DenisHen]

Bonjour @(gile) et merci pour ton conseil.
Je ne pense jamais à tester le code dans la console, mais tu as raison, elle est notre amie.