现在有一个非常困惑的问题，就是现在有大于2个的ToolBar组件，在运行过程中需要往上面拖放一些文件，但是如何才知道这些文件是被拖放到哪一个ToolBar组件上呢？

Question

TToolBar不是有OnDragDrop事件吗，即使两个ToolBar共用同一个DragDrop事件处理过程，还有处理过程的Sender参数可以判断，如 
If Sender Is Toolbar1 Then ...
Else If Sender Is Toolbar2 Then ...
Else ...

Answer 1

动态生成的也同样可以用pipai的方法嘛。
如果是从外部（资源管理器之类）拖入就比较麻烦。

Answer 2

if (Sender as TToolBar).Name = toolbar1(2) then
 ......

Answer 3

看看。用Sender应该行的啊？ 不过我没试过

Answer 4

不行吗？？
是不是动态生成你就不会写OnDragDrop事件了？

Answer 5

用ChildWindowFromPoint或ChildWindowFromPointEx得到光标下的控件的句柄，然后用FindControl找出对象指针：HWND ChildWindowFromPoint(
  HWND hWndParent,  // handle to parent window
  POINT Point       // structure with point coordinates
);HWND ChildWindowFromPointEx(
  HWND hwndParent,   // handle to parent window
  POINT pt,          // structure with point coordinates
  UINT uFlags        // skipping flags
);function FindControl(Handle: HWnd): TWinControl;