DELPHI7 Memo1中的内容怎么一行一行读出并显示在Memo2
发布网友
共2个回答
热心网友
全部显示在memo2：memo2.text:=memo1.text;
取第1行 memo1.Lines.Strings[0] ;
取第2行 memo1.Lines.Strings[1] ;
热心网友
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;
