But be carefull with the ALINES() Command.
It does not recognize chr(10) or chr(13) alone. And it does happen, that these are NOT saved in your MEMO Field together. Then it happened that you only have 2 LINES instead of 3.
So you would have to

Using the sample:

local lcContent
USE test2 && test table with memofield called test

**********************************************************
*Because there is a bug in the ALINES() Command
*you have to correct the CARRIAGE RETURN+ LINEFEEDS
**********************************************************
lcContent = strtran(test2.test,chr(13)+chr(10),chr(13) )
lcContent = chrtran(lcContent,chr(10),chr(13) )
lcContent = strtran(lcContent,chr(13),chr(13)+chr(10))
**********************************************************

x=ALINES(larray,lcContent)


FOR i = 1 TO x
? SUBSTR(larray[i],RAT('-',larray[i])+1)
ENDFOR