delphi - 从 Delphi 获取表单标题栏颜色

Question

我的问题很简单，但我找不到任何有关它的信息。我需要从 Delphi 中检测有关 TitleBar 的一些信息；例如哪个是高度，特别是它的颜色是什么？我认为有一些 Windows API，但我在网上找不到任何东西。有人可以建议我如何完成这些任务。

Answer 1

要获得磁贴栏的高度，您可以使用GetSystemMetrics API（SM_CYCAPTION作为参数）。

对于标题区域颜色 -在 Graphics unit 中定义了一些系统颜色，即clActiveCaption和clInactiveCaption，这些是在 Windows 控制面板中定义的颜色。