怎么获取TComboBox的滚动条信息(100分)

我想将自己的滚动条替换掉TComboBox的垂直滚动条,但碰到下面几个问题:
1.如何判断ComboBox是否有滚动条.我以前替换TListView滚动条时用的是下面的代码:
nStyle := GetWindowlong(Handle, GWL_STYLE);
if (nStyle and WS_VSCROLL) <> 0 then ...
2. 如何获取滚动条信息,我试过用GetScrollBarInfo(Handle,OBJID_VSCROLL,sbInfo)也取不出来.
烦请各位高手帮我看看

当combobox的items内的内容大于8时便产生滚动条

用GetScrollBarInfo函数是可以的

自己研究一下TComboBox是怎样画出来的先