Re: RTFSélection() est buggué ?
Posté par Anak1 le 20/11/2006 14:12:08
La fonction RTFRecherche() a un peu de mal a fonctionner chez moi. (Si vous avez des retours)
Je pense que je vais utiliser ça
Cordialement,
Anak1
Je pense que je vais utiliser ça
FONCTION RTFPosition(ChaineInitiale,ChaineARechercher, PositionDepart)
i,NbRC sont des entiers
LaPosition est un entier
//On regarde la position avec les RC
LaPosition=Position(RTFVersTexte(ChaineInitiale),ChaineARechercher, PositionDepart)
//On conserve la valeur de la position avec les RC
i=LaPosition
//On compte les RC avec j
i=Position(RTFVersTexte(ChaineInitiale),RC,i,DepuisFin)
TANTQUE i<>0
i=Position(RTFVersTexte(ChaineInitiale),RC,i-1,DepuisFin)
NbRC++
FIN
//On renvoit en enlevant les RC
RENVOYER LaPosition-NbRC
Cordialement,
Anak1
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=4774&post_id=19824