Supprimer des ligne dans RichTextBox

Résolu
Signaler
Messages postés
19
Date d'inscription
jeudi 15 mai 2008
Statut
Membre
Dernière intervention
6 février 2012
-
Messages postés
19
Date d'inscription
jeudi 15 mai 2008
Statut
Membre
Dernière intervention
6 février 2012
-
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.

2 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
81
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)
Messages postés
19
Date d'inscription
jeudi 15 mai 2008
Statut
Membre
Dernière intervention
6 février 2012

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!