TRichEdit中怎样将滚动条定位在最下方?急

Question

RichEdit1.SelLength := 0;   
RichEdit1.SelStart:=RichEdit1.GetTextLen; // position caret at end   RichEdit1.Perform( EM_SCROLLCARET, 0, 0 ); // ensure viewport is right

Answer 1

如果你只需要定位滚动条，不需要定位光标
    SetScrollPos(RichEdit1.Handle, SB_VERT, $FFFF, true);
否则用 playpcgame 的方法

Answer 2

最为稳定，最为简单的方法，请留意
  richedit1.SetFocus();
  keybd_event( VK_CONTROL,  0 , 0 , 0 );
  keybd_event( VK_END,  0 , 0 , 0 );     // ctrl+End
  keybd_event( VK_CONTROL, 0, KEYEVENTF_KEYUP , 0 );  // ctrl key up

Answer 3

SendMessage(richedit.Handle,EM_SCROLL,SB_LINEDOWN,0); 
你测试一下！