发布网友 发布时间:2024-10-24 04:42
共2个回答
热心网友 时间:2024-11-09 05:21
全部显示在memo2:memo2.text:=memo1.text;
取第1行 memo1.Lines.Strings[0] ;
取第2行 memo1.Lines.Strings[1] ;
热心网友 时间:2024-11-09 05:28
var i:integer;
begin
Memo2.Lines.Clear;
for i := 0 to memo1.Lines.Count -1 do
begin
Memo2.Lines.Add(memo1.Lines.Strings[i]);
end;
end;