Procedure clrEol en pascal
Résolu
bibou_ini
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
bibou_ini Messages postés 5 Date d'inscription Statut Membre Dernière intervention -
bibou_ini Messages postés 5 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
voila, je veus modifier la procedure clrEol (clear end of line ) dans le dev-pascal alors si vous pouvez me la donner (algorithme ou programme); en faite je veut juste effacer un mot (string) dans une line alors j'ai panser a limiter le nombre de colonne . merci
voila, je veus modifier la procedure clrEol (clear end of line ) dans le dev-pascal alors si vous pouvez me la donner (algorithme ou programme); en faite je veut juste effacer un mot (string) dans une line alors j'ai panser a limiter le nombre de colonne . merci
A voir également:
- Procedure clrEol en pascal
- Turbo pascal - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Dev pascal - Télécharger - Édition & Programmation
- Procédure de frigo vide ✓ - Forum Consommation & Internet
- Le point d'entree de procedure est introuvable kernel32 dll ✓ - Forum Windows
3 réponses
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.
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.