>>>Something like this (not tested)

>>>lcNewString=''
>>>#define crlf chr(13)+chr(10)
>>>For lnX = 1 to memlines(lcString)
>>>   lcNewString =Upper(Left(mline(lcString,lnX),1)) + substr(mline(lcString,lnX),2)  + crlf
>>>Endfor
>>>lcNewString = left(lcNewString, len(lcNewString-2))

>>
>>No
>
>???
>

Try a with an mline() that is longer than set('memowidth')