OnMouseUp事件(50分)

终于找到知音，知道是什么原因吗？如何解决？
我现在只能用OnMouseDown代替了，效果很不好。
资源管理器没有这个问题耶。

是M$的系统或TreeView本身的原因造成的，不是Delphi的原因，因为Delphi收不到
WM_RBUTTONUP消息，你可以在TCustomTreeView.WndProc中加入
if Message.Msg = WM_RBUTTONUP then ShowMessage('WM_RBUTTONUP');
就可以知道。
至于为何得不到WM_RBUTTONUP ，我并不太清楚。

解决方法：
D4下自己写一控件，自己用WM_CONTEXTMENU代替WM_RBUTTONUP，或者使用
Delphi5，TreeView有OnContextPopup事件。

勉强接受吧。