给你两种方法：
1.
richedit1.Lines.Move(0,strtoint(trim(edit1.Text))-1); //把这里的edit1.text改成你想要的行数；就行；
这只是最基础的，其他的想要实现可以再加
2.
var
i:integer; //这是你想跳到的行数；
str:string;
begin
richedit1.setfocus;
for i:= 0 to i do str:=str+richedit1.lines[i];
str:=str+(i*2);
richedit1.selstart:=str;
richedit1.sellength(richedit1.Lines.ValueFromIndex[i]);
end;
这个定位更准确点；
内容全部来源于网络收集，如有侵权，请联系网站删除！