编辑Delphi表单时如何拦截控件移动

Question

我正在开发一个可视化组件（VCL），一个专门的TPanel。 当用户在编辑表单时移动放在我的特殊面板上的控件时，我需要拦截。 我需要拦截移动以调整放在同一特殊面板上的其他控件的视觉属性。

我的问题是：当用户在IDE中编辑表单时，如何拦截/检测/响应TCustomPanel派生组件上的控件移动？

Answer 1

您可以覆盖容器TPanel. AlignControls方法TPanel. AControl参数将告诉您哪个子控件已移动或插入容器并作出相应的反应。 然后，您可以根据需要调整其他子控件的位置。