>Not that I know of. Does this one work for you?

That might not replace the right line, if lines are duplicated, right? I would use something like (needs improvement):

at(chr(13) + 1, tcMemofield, tnLine - 1)

instead of:

AT( lcSearchStr, tcMemoField )