G geshengping Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-27 #2 控制TMemo的滚动条的位置我倒没试过,但可以使Memo卷页或卷屏。 SendMessage(DBMemo1.Handle, EM_SCROLLCARET, 0, 0);
M mayday Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-27 #3 ScrollBars的位置在Memo中好像是根据当前 光标的位置自动确定的. 实在要改,就该光标的位置吧! memo1.caretPos.x Memo1.caretPos.y 改这个吧!
C cytown Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-27 #4 try this-> Memo1.perform(wm_vscroll,sb_xx,xx);
C cmldy Unregistered / Unconfirmed GUEST, unregistred user! 1999-08-29 #5 Var ScrollMessage : TWMVScroll ; begin ScrollMessage.Msg := WM_VScroll ; ScrollMessage.ScrollCode := sb_LineUp ;//向上 ScrollMessage.Pos := 0 ; Memo1.Dispatch(ScrollMessage) ; end ;
Var ScrollMessage : TWMVScroll ; begin ScrollMessage.Msg := WM_VScroll ; ScrollMessage.ScrollCode := sb_LineUp ;//向上 ScrollMessage.Pos := 0 ; Memo1.Dispatch(ScrollMessage) ; end ;