cs_plano
Messages postés19Date d'inscriptionjeudi 15 mai 2008StatutMembreDernière intervention 6 février 2012
-
27 janv. 2009 à 18:48
cs_plano
Messages postés19Date d'inscriptionjeudi 15 mai 2008StatutMembreDernière intervention 6 février 2012
-
27 janv. 2009 à 20:17
Bonjour à tous et à toute !
Voilà mon souci , Dans un richtextbox j'ai ces ligne d'afficher :
G01 X49.157 Y105.35
G01 X49.618 Y103.564
G01 X49.903 Y101.777
G01 X50.0 Y100.0
G00 Z10
G00 X50.0 Y100.0
G01 Z0
G01 X50.0 Y50.0
G00 Z10
Si on regarde les trois ligne en rouge , je voudrai faire en sorte que si la troisième ligne moins "G00 " est égale à la première ligne moins "G01"
alors supprimer la deuxième et la troisième ligne!
Voilà ce que je souhaiterai faire!
Est ce que quelqu'un peut m'aider s'il vous plait?
Merci d'avance.
Plano.
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 27 janv. 2009 à 19:53
Salut
Et qu'as-tu fait, testé, lancé ?
Le plus simple serait de rentrer toutes ces chaines dans un tableau afin de travailler avec des éléments du tableau, car la manipulation de RTB n'est pas simple et obligerait à mémoriser les emplacements curseur de début et de longueur des chaines ...
Facile à faire avec Split :
Dim monTexte As String = "123" & vbCrLf & "456" & vbCrLf & "789"
Dim monTableau As String() = Split(monTexte, vbCrLf)
MsgBox(monTableau(1))
Ensuite, tu n'as plus qu'à lister (boucle For-Next) chaque élément de ton tableau et tester son contenu par rapport à l'élément "ligne - 2", ce n'est qu'un jeu de manipulation de chaine.
Si tu dois supprimer un élément du tableau, il te faudra décaler les éléments du tableau de la position n+1 vers n (encore une boucle For-Next)
Une fois que tu auras épuré ton tableau, utilise Join (l'inverse de Split) pour reconstituer ton texte
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés
<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
cs_plano
Messages postés19Date d'inscriptionjeudi 15 mai 2008StatutMembreDernière intervention 6 février 2012 27 janv. 2009 à 20:17
Merci Jack pour TES réponses , puisque tu m'à aussi répondu dans une autre section (super réactif le Jack!!!!:)
Aux vues de ma petite tête , je vais y arriver , il est vrai que je m'évertuai a travailler directement sur le rixtextbox , alors qu'avec les tableau ce sera plus facile.
Pour info , mon appli sert à convertir les fichiers DXF en code machine(ISO) pour une fraiseuse numérique de ma fabrication , donc ceci fonctionne , et il ne me restait plus que ce point à éclaicir!
Merci énormement et bravo pour ta réactivité!
Plano!