Question

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

怎样在memo中取得第二行到第三五行的字符？如：
1111111111111111
2222222
333333333333333333333333
44444444444
555555555555555555

取得第二行到第五行的字符
2222222
333333333333333333333333
44444444444
555555555555555555
to temp2000:不要借助于memo2
to freecode:详细点

Answer 1

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

Answer 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;