如何在Delphi Docking示例中添加持久性

Question

虽然我知道,除了包括德尔福对接演示还有其他更好的对接库,提供如开发快递库和JVCL对接库,但对于具体的示范项目,我仅限于只使用Delphi的内置功能(尽管存在一些明显的缺陷).

我的问题涉及为对接状态添加持久性.我从检查Controls.pas看到,TDockTree是默认的Dock管理器,它有Stream I/O例程.在SO和各种论坛上挖掘,虽然我无法看到有人称这些例程.我已经尝试从相关的Create和OnDrop事件加载并保存到一个文件,但是我在黑暗中刺伤.我很高兴保存和恢复表单大小和状态,但我正在努力解决我应该保存的概念.任何善良的人都会给我一个起点吗？

我正在使用Delphi XE3,所以所有(？)的东西都是可能的!

非常感谢.

Answer 1

我正在使用J. Russels 的 Toolbar 2000。它提供面板、工具窗口和工具栏。

该函数提供了 和 等功能，TBRegSavePositions将TBRegSavePositions用户自定义存储到注册表中。

通过代码行可以轻松加载“视图”：

TBRegLoadPositions(self, HKEY_CURRENT_USER, c_BaseUserRegKey);

在这种情况下，自我就是我的形式。