Memo in Variable

[Popov]

Delphi-Quellcode:

var
  s: String;
begin
  s := Memo1.Lines.Text;
  
  Memo2.Lines.Text := s;
end;