DenisHen Posté(e) le 30 janvier 2007 Posté(e) le 30 janvier 2007 Bonjour à tous, Voilà, j'ai une routine qui ne tourne qu'à moitier et qui doit faire une vintaine de lignes pour faire ça : string - texte = chiffreje m'explique : "T=125.32" -"T=" = 125.32 Car, j'ai des opération à faire sur 125.32, mais dans le dessin, il est sous forme "T=125.32". Mais il peut aussi être écrit comme ça : "R=125.32" ou F & R =125.32"..... Mais de toutes les façons, le chiffre sera TOUJOURS à la fin. Ma routine cherchait à évaluer si le premier caractère de la chaine "T=125.32" était un caractèresi oui, elle l'enlevait et il ne restait plus que "=125.32" Mais je voulais utiliser "while" mais je me suis perdu en chemin... Tout le monde a saisi ? Bon, bien merci d'avance, Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Bred Posté(e) le 30 janvier 2007 Posté(e) le 30 janvier 2007 Salut, (vl-string-left-trim " T R F&R =" a) avec a : (setq a "T= 125.32") ou (setq a "F= 125.32") ou (setq a "F&R= 125.32") si tu veux transformer le string en chiffre : (atof (vl-string-left-trim " T R F&R =" a)) Si vous êtes persuadés de tout savoir sur un sujet, c''est que vous en ignorez quelque chose...
DenisHen Posté(e) le 30 janvier 2007 Auteur Posté(e) le 30 janvier 2007 Je voyais plus un truc comme ça : (while (/= (left a) "0123456789"(setq a ( right a (- (len a) 1) )) Désolé, mais c'est du gros mélange de VB et Lisp ! ! ! C'est juste pour en donné l'idée, car mes string peuvent aussi être du type : "Radier = 125.20" ou "Hauteur = 52.1" Merci encore, Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Bred Posté(e) le 30 janvier 2007 Posté(e) le 30 janvier 2007 (atof (vl-string-subst "" (vl-string-right-trim "0123456789." a) a)) Si vous êtes persuadés de tout savoir sur un sujet, c''est que vous en ignorez quelque chose...
DenisHen Posté(e) le 30 janvier 2007 Auteur Posté(e) le 30 janvier 2007 Waow, je n'ai pas encore testé, mais ça, ça vaut de passer "Premier Dan" sans problème ! ! Merci Bred ! ! Denis... Windows 11 / AutoCAD 2024 Sur terre, il y a 10 types de personnes, celles qui comptent en binaire et les autres (developpez.net). Davantage d'avantages, avantagent davantage (Bobby Lapointe). La connaissance s'accroît quand on la partage (Socrate). Tant va la cruche à l'eau que l'habit n'amasse pas mousse avant de l'avoir tué. (Moi)
Messages recommandés
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 compteSe connecter
Vous avez déjà un compte ? Connectez-vous ici.
Connectez-vous maintenant