FoxPro/Visual FoxPro - Numero de lineas en editbox

Hola, tengo un problema con un editbox en un formulario, y es que me gustaria poder controlar el numero de lineas maximo que se pudieran meter. Alguien sabe como controlarlo?. Muuuchas gracias de antemano

Bueno prueba los siguiente:
Coloca en la propiedad (KeysPressEvent) del editbox .

if nkeycode=13
if occurs(chr(13),this.value)>=N
nodefault
endif
endif

Donde N es numerico,
Ejenplo N=1 son dos lineas,
N=2 son tres lineas
etc.
Me avisas si te funcionó

Adolfo.......

Si funciona pero no del todo. El problema es que cuando das a enter en la primera linea funciona y pasa a la siguiente, cuando das a enter en la segunda, pasa a la tercera, pero se lleva el ultimo caracter escrito en la linea anterior. Creo haberlo solucionado añadiendo lo siguiente codigo algo curioso. Ahora si funciona perfectamente, (por ahora). Muchas gracias por la ayuda.

IF nKeyCode = 13
IF OCCURS(CHR(13),this.Value) >= N
NODEFAULT
ELSE
this.Value = STUFF(this.Value,LEN(this.Value)-1,0,'')
ENDIF
ENDIF