Salut,
si ce que tu veux faire : Supprimer les occurence d'un mot dans une chaine de caractère alors ceci peut t'aider :
Pour effacer des caractères dans une chaine utiliser la procedure
- Delete([Chaine], [PositionDebutEffacement], [NombreCaracteresEffaces]
Pour Trouver l'oocurence d'un mot dans une chaine utiliser la fonction
- Pos([Mot], [Chaine])
en combinant ces deux fonctions tu peux créer la procedure désirée.
Exemple
//////////////////////////////////////////////////////////////////////
Procedure EffacerMot(sMot : String; Var sChaine : String);
Begin
While Pos(sMot, sChaine) > 0 do
Begin
Delete(sChaine, Pos(sMot, sChaine), Length(sMot));
End;
End;
//////////////////////////////////////////////////////////////////////
Bonne chance.