VER

Version utilisée

Fonction sans argument qui donne l'environnement et la langue installée

Cette fonction est utile pour tester la machine et vérifier si le programme est compatible avec cette dernière.

Syntaxe : (ver)
comme je vous le disais c'est une fonction sans argument.

valeur renvoyée : "environnement version (nn)"

Exemples :

(ver)

Renvoie :
"Visual LISP 2015 (fr)" sur un Windows français
"MacOS AutoLISP 2015 (en)" sur Mac anglais

Exemples de valeurs pour les nationalités :

(de) German, (en) US/UK, (es) Spanish, (it) Italian ...

Cette fonction peut être utilisée lors de la création de programmes multilingues et on s'en servira pour répondre un message dans une langue ou une autre suivant ce que (ver) nous renvoie.

Exemple d'utilisation pour un message en ligne de commande,
si c'est une version française écrire : Sélectionnez le point de départ
si ce n'est pas une version française écrire en anglais : Select the starting point

1
2
3
4

(if (wcmatch (ver) "*fr*")
(setq pdep (getpoint "\nSélectionnez le point de départ\n"))
(setq pdep (getpoint "\nSelect the starting point\n"))
)

Il est possible de faire encore plus "international" avec (cond)

1
2
3
4
5
6

(cond
((wcmatch (ver) "*fr*")(setq pdep (getpoint "\nSélectionnez le point de départ\n")))
((wcmatch (ver) "*de*")(setq pdep (getpoint "\nWählen Sie den Startpunktt\n")))
((wcmatch (ver) "*it*")(setq pdep (getpoint "\nSeleziona il punto di partenza\n")))
((wcmatch (ver) "*en*")(setq pdep (getpoint "\nSelect the starting point\n"))) 
)

Vous voici propulsés dans le développement d'applications en international, merci da-code (hihi)

Haut de page

revenir aux INCLASSABLES

6 décembre 2017,
mise à jour le 03 mai 2019