Question:
Please provide easiest way to copy paste from TMemo.

Answer:
Just use VCL command.
Like this ...



procedure TForm1.Button2Click(Sender: TObject);
begin
Memo1.SelectAll;
Memo1.CopyToClipboard;
Memo1.Clear;
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
Memo2.PasteFromClipboard;
end;


CLICK TO REGISTER