|
| Recherche dans un document Word |
| Iniciado por Patrice Gence, mar., 01 2004 3:33 PM - 2 respostas |
| |
| | | |
|
| |
Publicado em março, 01 2004 - 3:33 PM |
Bonjour,
Il y a dans les exemples windev une application qui possede l'objet automation
"rechercher/remplacer" de word.
J'aimerai savoir comment n'utiliser que la fonction rechercher qui par exemple
reverrait vrai lorsque le mot recherché a été trouvé dans le texte.
Quelle est la syntaxe de cet objet (visible dans l'exemple "pilotage de word"
?
:m_xWord>>Selection>>Find>>Execute(sChRecherche,Faux,Vrai,Faux,Faux,Faux,Vrai,1,Faux,sChRemplace,2) |
| |
| |
| | | |
|
| | |
| |
Publicado em março, 01 2004 - 6:40 PM |
vous pouvez tester une variable globale
Is_la_Selection_Aboutie = Faux
clWord:selection("%LI_SIGN%")
SI Is_la_Selection_Aboutie ALORS
// code
fin
Cette variable est déterminée dans une nouvelle méthode de la classe clWord
(à créer):
PROCEDURE Selection(sChRecherche)
// sChRecherche est la chaine recherchée
QUAND EXCEPTION DANS
:m_xWord>>Selection
FAIRE
Info("Vous devez d'abord sélectionner du texte.") RETOUR
FIN
QUAND EXCEPTION DANS
SELON :m_xWord>>Selection>>Find>>Execute(sChRecherche,Faux,Vrai,Faux,Faux,Faux,Vrai,1,Faux,sChRecherche,1)
CAS Vrai
Is_la_Selection_Aboutie = Vrai
CAS Faux
Is_la_Selection_Aboutie = Faux
FIN
FAIRE
Info(sChRecherche)
:MsgErreur("Impossible d'exécuter le Rechercher/Remplacer.",ExceptionInfo())
RETOUR
FIN |
| |
| |
| | | |
|
| | |
| |
Publicado em março, 04 2004 - 7:09 AM |
Merci LJ, c'est exactement ce que je cherchais ! |
| |
| |
| | | |
|
| | | | |
| | |
|