Question

delphi用代码控制滚动条位置

问各位大侠，用什么代码可以 使得滚动条的位置到顶端啊，或者 滚动到指定位置

Answer 1

滚动条移到顶端

控件.Perform(WM_VSCROLL,SB_TOP,0);

追问

如果是滚动到 某个位置呢。控件.Perform(WM_VSCROLL,SB_TOP,99); 类似这样么

追答

示例代码如下：

Memo1.Perform(WM_VSCROLL,MakeWParam(SB_THUMBPOSITION,SpinEdit1.Value),0);