能否让其他控件产生OnDragOver事件？

[OverlordBlind]

想把一个控件的OnDragOver，OnDragDrop事件转移到另一个控件中去，
OnDragDrop可以，因为TControl中有DragDrop过程，而且是public的，
但TControl.DragOver却是protected的，无法调用
TDragObject和TControl定义在同一个单元里，能访问TControl类，
但TDragObject怎么用呢？它的function Capture: HWND竟然是private
私有函数，也就是说根本无法手动启动
我该怎么办

[darkliu]

不懂 帮顶

[OverlordBlind]

没结帖…… 没拿到答案怎么结帖？ 有人用过TDragObject吗？

[yjs_lh]

继承TWinControl，或者其它需要继承的Control，然后在published中添加
public OnGragOver;
就行了。