求教一个Memo的小问题

[mme]

我想问一下,当Memo里面的数据太多时,怎样才能使得Memo的滚动条自动滚动到文本的最后一行.谢谢了.

[wangxiangsjz]

Memo1->Lines->Add("");

[铖邑]

Memo1->SelStart = Memo1->Text.Length();
Memo1->SelLength = 0;

[kingfish]

添加一行后
SendMessage(Memo1->Handle,WM_VSCROLL,SB_LINEDOWN,0);