FoxPro/Visual FoxPro - Buscar texto y ubicar cursor

Bajo version 6

Desde un boton, activo una ventana donde se introduce un texto, el que si se
encuentra se deberia ubicar el cursor en un edit asociado al memo.

El texto es encontrado, tengo su posicion, pero al tener el foco el edit2
(de solo lectura) queda el cursor al principio del texto en su edit.

Consejo???
Gracias

Mi codigo es

...lcBusca ya viene en upper()

lcBusca = ALLTRIM(m.busca)
lnLen = LEN(lcBusca)
lnPos = AT(lcBusca,upper(paciente.h_clinica))
IF lnPos > 0
thisform.buscado=1
thisform.pageframe1.page2.Edit2.SELSTART = lnPos - 1
thisform.pageframe1.page2.Edit2.SELLENGTH = lnLen
thisform.pageframe1.page2.Edit2.refresh
thisform.pageframe1.page2.Edit2.SETFOCUS
exit
ELSE
thisform.buscado=0
MESSAGEBOX("No se encuentra texto indicado",64,"Aviso")
ENDIF

Dario