一个派生于 TCollectionItem 类 的 TbsButtonBarItem 类 然后 怎么给 TbsButtonBarItem 增加一个 onMouseDown 事件

Question

TbsButtonBarItem 一个皮肤控件的类，只有 oclick 事件。 我想 给它增加一个
OnmouseDown 事件 我派生了一个TbsButtonBarItem 类 TbsBarItem 然后加入了消息 捕捉过程
procedure WMLBUTTONDOWN(var Message: TMessage); message WM_LBUTTONDOWN;为什么 这个procedure TbsBarIte.WMLBUTTONDOWN(var Message: TMessage);
begin
 showmessage('test');  ///这个为什么不发生呢？？？
 NowIndex:=self.index;
end;为什么捕捉不到消息呢， 点击控件的时候end;这个控件来自 TbsSkinButtonsBar ，TbsButtonBarItems 类的 子类 
我想在在右点 这个控件的时候找到它的 index  
可是没有 OnMouseDown 这个事件 ， 我事件扑捉 怎么没有反映呢，，？！？扑捉不到消息？

Answer 1

TCollectionItem及其派生类不是控件类,无法直接接受消息,所以不能简单地添加一个消息,必须首先得到所属控件的消息过程才行,既然TbsButtonBarItem类有一个OnClick事件,它必然截留了它所属的控件的消息过程,参照其方法实现你的事件!