Memo控件，如何删除最后一行后光标不能在移到该行。。

Question

Memo控件，如何删除最后一行后光标不能在移到该行。。
Memo6.Lines.Delete(Memo6.Lines.count-1);
我用这方法只能删除最后一样的内容，但光标还能移下去。。

Answer 1

 
 mmo1.Lines.Delete(mmo1.Lines.Count-1);
  mmo1.SetFocus ;删除完后，应该让mmo1获得焦点，否则不会看到光标。

Answer 2

我想下面应该是你要的：
  mmo1.Lines.Delete(mmo1.Lines.Count-2);  mmo1.SetFocus ;
  mmo1.SelStart :=   Length(mmo1.Text);
每次都移到最后！