3

我使用标准的 delphi 停靠功能将表单停靠到 TPanel。停靠表格的标题看起来像这样 在此处输入图像描述

如何修改它的外观?

4

1 回答 1

8

默认外观来自TCaptionedDockTree. 您可以编写自己的后代并将其分配DefaultDockTreeClass给替换它。要更改标题高度,请覆盖AdjustCaptionRect. 要更改标题的实际绘制,请使用覆盖和/或方法覆盖GetDockCaptionDrawer以返回您自己的后代。TDockCaptionDrawerDrawDockCaptionDockCaptionHitTest

于 2012-05-13T08:29:02.897 回答