求助：MapObjects控件响应滚轮事件？？

<P>经常见到使用鼠标滚轮放大、缩小地图显示，</P>
<P>如何用MapObjects实现？？</P>
<P>求高手相助！！不胜感激！！有实例代码最好（Delphi或BCB）</P><img src="images/post/smile/dvbbs/em08.gif" /><img src="images/post/smile/dvbbs/em08.gif" /><img src="images/post/smile/dvbbs/em08.gif" />