| N° | Fonction | Catégorie | Version |
|---|---|---|---|
| BIS 10 | BiS_DelSpace | Gestion de Chaînes | 1.0 - Janvier 2007 |
| But | Suppression des espaces à droite et à gauche d'une chaîne. |
| Prototype | (BiS_DelSpace Texte_Cible ) |
| Argument | Texte_Cible - Le texte à modifier - chaîne - |
| Retours | La chaîne modifiée |
| Var. globales | Néant |
| Description | Supprime tous les blancs (ou espaces) qui pourraient se trouver à droite et à gauche d'une chaîne de texte. |
| Notes | Si l'argument n'est pas une chaîne, celui-ci est retourné sans changement. Pour supprimer les blancs à droite seulement, utilisez la fonction BiS_DelSpaceR ; Pour supprimer les blancs à gauche seulement, utilisez la fonction BiS_DelSpaceL. |
| Exemples | Commande: (BiS_DelSpace " Fiche BiS 08 ") retourne "Fiche BiS 08" Commande: (setq T1 " Texte avec blancs ") " Texte avec blancs " Commande: (BiS_DelSpace T1) retourne "Texte avec blancs" Commande: (BiS_DelSpace " ") retourne "" Commande: (BiS_DelSpace bb) retourne nil Commande: (setq Nb1 1.23456) Commande: (BiS_DelSpace Nb1) retourne 1.23456 Commande: (setq L1 '(20 " texte ")) Commande: (BiS_DelSpace L1) retourne (20 " texte ") (L1 est une liste et non pas une chaîne - La liste est retournée telle quelle, les éléments à l'intérieur de la liste n'étant pas considérés.) |
1- (defun BiS_DelSpace (*Text) 2- (BiS_DelSpaceL (BiS_DelSpaceR *Text)) 3- )
Ligne 2 : Utilise la fonction BiS_DelSpaceL avec comme argument le résultat de l'évaluation de la fonction BiS_DelSpaceR avec l'argument *Text