Strip Certian lines of text from Memo
Posted on 2004-10-03
I need to strip certain lines of text from a TMemo.
This is what I need to do.
I need to look through the TMemo, and find all lines that have the /
On them. If they do, I need to delete the entire line.
Then loop through the TMemo and delete all "ending" text after the " : Colon
Huun Huur Tu : Huun_Huur_Tu/
Hvorostovsky, Dmitri :
Hynde, Chrissie : /Top/Arts/Music/Bands_and_Artists/P/Pretenders/
Hynes, Nina : Hynes,_Nina/
OK. The text above. "1st & 4th lines" I need to keep.
"2nd & 3rd" Lines I need to delete.
Then I need to delete everything from the :Colon to the "Right" of it.
( That means that I need the "Colon : " deleted along with its
Text to the Right of it )
As you can see in the Text above. Every line has a : Colon
Between the words
Memo1.Text := StringReplace(Memo1.Text, '/Top/', '', [rfReplaceAll,
The above will only delete the [ /Top/ ] from each line in the TMemo.
Any information on how I can accomplish this would be extremely helpful.