这个用Delphi自带的控件是办不到的。建议用第三方的控件，例如DevExpress的套装控件中有你想要的这个效果。控件可以从这里下载：http://blog.csdn.net/maxwoods/article/details/8303127我在网上搜的，不知是否能安装，但可以肯定这个控件是可以达到你要的效果的。
