鼠标点击控件，控件会随意移动，如何解决

[秋天之落叶]

记得以前有个解决的帖子，怎么也找不到了。

是修改那个参数了？大佬指点一下。

[秋天之落叶]

@tanqth 不是这个原因

[tanqth]

@秋天之落叶 你看看那几个事件是不是写了代码呀，注释了，不要用。

[秋天之落叶]

@tanqth 不是这个意思，是鼠标选择控件或双击控件时，控件会胡乱移动离开原位置，需要重新调整控件的位置才行。如何解决这个问题？

[tanqth]

你说的，应该是这个。

DragMode 设置为 dmAutomatic (自动开始拖动) 或 dmManual (手动控制开始拖动)
OnStartDrag 拖动开始时触发的事件 (源控件)
OnDragOver 当拖动对象经过一个控件时触发，决定目标控件是否接受放下 (设置 Accept 参数)
OnDragDrop 当拖动对象在目标控件上放下时触发，执行实际的放置操作
OnEndDrag 拖动操作结束时触发 (无论成功与否)，用于源控件的清理工作