Search and cursor

[theophanie]

Hi everybody,

Beginner with OO Basic language, I would like to know something about cursor and search.
1) Once a search completed, is it possible to get the cursor position and then, for example, to go further by one paragraph ?
2) I have found a script ( by Andrew Pitonyak- Complicated Search And Replace ) which allows to delete all the lines between two delimiters.
But now I need to insert inside those same delimiters the content of an array made of several lines. Do I need to use a cursor to do it ?

Thanks for your help

Jean-michel

[jrkrideau]

[JohnV]

The best I can tell when you search you are moving a cursor so I'll assuming Andrew's code has somthing like this.

Find = oDoc.FindFirst(MyFind)
While Not isNull(Find)
do something
Find = oDoc.FindNext(Find.End,MyFind)
Wend

In this example Find is a cursor and you can move another cursor, such as the View Cursor, to its location like this.

oVC = oDoc.CurrentController.getViewCursor
oVC.gotoRange(Find,False)

[pitonyak]

Based on the examle that you are quoting from my free macro document, the macro is called deleteTextBetweenDlimiters. To summarize what the macro does, it creates TWO search descriptors. The first searches for "[" and the second searches for "]". The code can be characterized as follows:

[theophanie]

Thank you for all the replies.
My macro works now.
I have used Andrew P.'s last commands.

Here is a part of the macro :
vOpenSearch.SearchString = "--- DEBUT INDEX LOUANGE ---"
vCloseSearch.SearchString = "--- FIN INDEX LOUANGE ---"
...
vOpenFound.goRight(1, False)
vOpenFound.gotoRange(vCloseFound, True)
rem I do not want to keep the delimiter in my selection
vOpenFound.goLeft(25, True)
...
Do Until louange(i) = "THE_END"
rem I insert the content of an array
vopenFound.setString(louange(i)+CHR(13))
vOpenFound.gotoNextParagraph(false)
i = i + 1
Loop
...

Thanks and bye
Jean-michel