delphi memo 自动滚动到最底下

//定位Memo到底部，显示最新输入
  SendMessage(memo1.Handle,WM_VSCROLL,SB_BOTTOM,0);

参考：
SB_LINEUP
SB_LINELEFT
SB_LINEDOWN 
SB_LINERIGHT
SB_PAGEUP
SB_PAGELEFT
SB_PAGEDOWN
SB_PAGERIGHT
SB_THUMBPOSITION
SB_THUMBTRACK
SB_TOP
SB_LEFT
SB_BOTTOM
SB_RIGHT
SB_ENDSCROLL