Memo组件：不用手拖动滚动条，如何使Memo中的文本在满屏时自动上滚？(50分)

H

hawk2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-18

• #1

[]向Memo组件中动态输入文本时，当输入满一屏时，后续输入的文本就会被隐藏在下面，请问如何在不用手拖动滚动条的情况下，实现Memo中的文本自动上滚，从而使后续文本显示在底端？

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-18

• #2

选泽ScrollBars的属性，设置。

 

I

iseek

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-18

• #3

本来就是能自动向上滚嘛.
如果你要将caret卷至文末,可以这样：
memo.SelLength := 0;
memo.SelStart:=memo.GetTextLen;
memo.Perform( EM_SCROLLCARET, 0, 0 );

 

C

chenxz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-18

• #4

Memo1->ScrollBy(0,Memo1->Height);

 

C

coolqiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-18

• #5

SendMessage(Memo1.Handle,WM_VSCROLL,SB_LINEDOWN,0);

 

H

hawk2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-18

• #6

以上几位大侠的方法我都一一试过，虽然可实现在全部文本输入完毕后的上移，
但还是没实现在动态输入文本过程中使文本整体上移[xx(]

 

H

hawk2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-19

• #7

多人接受答案了。