[the darkness]

tambien lo puedes hacer por medio de

memoreceptor.text:=memo1.text;

o mas complicado con un for
for i:=0 to memo1.lines.capacity do
memoreceptor.lines.add(memo1.lines.strings[i])
suerte