最後の行へカーソル移動について

ライン 2005-12-23 05:02:03 No: 19386

最後の行にカーソル移動するには、どーすればよいでしょうか？
最終行はLines.Countで得れることは分かったのですが、
SelStartで移動させてみると、
間の行に文字列が含まれているとうまく実行されないので悩んでいます。
お願いします。

りおりお 2005-12-23 06:58:02 No: 19387

TMemo か TRichEdit か分かりませんが、どっちでも

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.SelStart := Length(Memo1.Text);
Memo1.SetFocus;
end;

な感じで。