dbgrideh的滚动条问题

我希望实现在鼠标滑轮滚动时，数据表格整体滚动，面当前记录不变。
在网上查了很多，还是没有找到答案。
再仔细看ehlib附带的例子DEMO1,发现在它有我所要的功能，但不知如何设置。更奇怪的是：如果在原来demo1的基础上，新建一个Form，拖一个dbgrideh进去，只令dasource为数据模块dm1的datasource1(当然在unit3中要加上uses dm1;)，按F9运行，竟发现新建的dbgrideh有我所要的效果！看其源程序，始终还没有弄清哪个地方在做怪。