//其实你最好也安装一个Delphi6
//给你Delphi6的代码自己就可以到Delphi Source中分析
//请你测试测试如下代码var
I, X, Y: Integer;
begin
Y := 3;
X := Length(RichEdit1.Lines[Y]);
I := SendMessage(RichEdit1.Handle, EM_LINEINDEX, Y, 0) + X;
SendMessage(RichEdit1.Handle, EM_SETSEL, I, I);
end;
//给你Delphi6的代码自己就可以到Delphi Source中分析
//请你测试测试如下代码var
I, X, Y: Integer;
begin
Y := 3;
X := Length(RichEdit1.Lines[Y]);
I := SendMessage(RichEdit1.Handle, EM_LINEINDEX, Y, 0) + X;
SendMessage(RichEdit1.Handle, EM_SETSEL, I, I);
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货