This a clean and simple function I made a long time ago, and which is very useful.

Function A2MEMO
   Parameters lcArray
   Local lcLagre
   lcResult=''
   #Define CRLF Chr(13)+Chr(10)

   For Each lcValue In (lcArray)
      lcResult=lcResult + Transform(lcValue) + CRLF
   Endfor
   If Right(lcResult,2)=CRLF
      lcResult=Substr(lcResult,1,Len(lcResult)-2)
   Endif
Return lcResult

?Adir(temp,'p:\data\*.dbf')
?a2memo('temp')

>Is there a relatively simple way to take the contents of an array and store them in a Memo (or some other type of) field?
>
>At the moment, I'm trying to work with the results of ASTACKINFO and am stuck with converting each element to string and adding as a new line. I'm hoping there's a better way.
>
>Thanks to all..............Rich