自定义组件的滚动条为什么和系统的不一样?

Question

CreateParams(var Params: TCreateParams);
begin
  inherited;
   with Params do
    Style := Style  or WS_VSCROLL;
end;
结果:移动块和系统的不一样.
我用的是2010.当你调试运行时看delphi的code页面,它的横滚动条和竖的也不一样,
我的自定义组件的滚动条就像它这时的横滚动条.

Answer 1

原来要用SetScrolllnfo函数:
现在,我有n个页面要显示,每个页面高度为x,
请教怎么设置 nMin,nMax, nPage及合适的滚动条大小?
我设置的总是不对头

Answer 2

解决了
http://blog.csdn.net/stgsd/archive/2009/12/27/5083886.aspx