delphi:如何取得memo中指定行数的值

2025-03-04 12:17:52

推荐回答（2个）

回答1：

用MEMO控件的Lines.Strings[index]就可以取到，index为0表示第一行，1表示第二行。。。。。。以此类推。

回答2：

//下面的代码将把memo1指定行段的内容复制到memo2中，line1为开始行，line2为结束行号。
//需要在程序中有memo1,memo2,并在var中添加 line1,line2,i:integer;

memo2.clear;
//line1,line2可以在程序其它地方指定
if (line1<1) or (line>memo1.lines.count) then//不在memo1的范围内，退出
exit;
for i := line1-1 to line2-1 do//-1是因为数组下标以0开始。
begin
memo2.Lines.Add(memo1.Lines[i]);
end;