delphi - 有什么优雅的方法可以消除可停靠控件的闪烁？

Question

我想在应用程序中添加停靠功能，不需要，现在我这样做了，但是每当单击并从“停靠站点”拖动面板时，窗口矩形在桌面上被画得很丑(闪烁) Canvas 。

所以，我的问题是:

有什么简单而优雅的方法可以通过覆盖某些方法来克服这个问题？

Answer 1

我做一个批号对接的 UI，到目前为止我发现的唯一方法是使用第三方对接解决方案，例如在 JVCL 中找到的。

如果您放弃 TJvDockServer在您的主表单(其他表单将停靠的那个)上，然后放下 TJvDockClient在上述每个停靠窗体上，分配相同的样式(例如 TJvDockVCStyle )，它完全改变了停靠的行为，包括将窗口拖动到停靠时呈现的矩形。

也许您可以从这些组件中提取所需的代码来绘制您自己的自定义矩形，以在拖动到停靠时表示表单。