检测到Dbgrid处于拖动模式

时间:2013-11-08 17:54:21

标签: delphi

如何检测TDbGrid当前是否处于“拖动模式”,用户将一行(或多行)拖动到另一个组件。

我想:

 if Screen.Cursor = DBGrid.DragCursor then   

但这似乎太暴力了。

我可以使用OnStartDrag和OnEndDrag事件来跟踪自己。

我无法在TDbGrid中找到指示当前模式的属性。

有什么建议吗?

1 个答案:

答案 0 :(得分:5)

您可以使用控件的Dragging功能:

if DBGrid1.Dragging then