Delphi 完全时尚手册之 CoolBar 篇---实现 CoolBar 的新特性 Chevron

1. 我们看到上面的代码只在 Form1.OnShow 事件中为 DealWidth 赋值：
   CoolBar1.Bands.Items[CoolBandIndex].DealWidth := GetTBButtonsWidth(ToolBar1);
   当我们在运行期间将 ToolBar1 由大按钮变为小按钮（或反之），那么 DealWidth 的值将和 ToolBar1 上所有按钮的总宽度有出入，这样下拉按钮（Chevron）就无法正确出现在它应该出现的地方。所以，只要有动作改变 ToolBar1 所有按钮的总宽度，就要重新给 DealWidth 赋值。
2. 在将 ToolBar1 上被遮住按钮用 PopupMenu1 来显示时要分清楚这些按钮的不同状态，比如某按钮为一 tbsCheck 按钮，或是一 tbsDropdown 按钮（具有下拉菜单的）该如何处理。遇到这些情况，大家可以看看其他著名的共享软件如何实现，比如 ACDSee5、WinZip等。

文章是写完了，就不知道写的是否明了。如有什么疑问，请来 Email 和我讨论，也可向我索要 Demo。
我的 Email: Happyjoe@21cn.com

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!