delphi - 如何在标题栏上放置自定义按钮？

Question

可能重复：
航空玻璃窗上的非客户绘画

我想在标题栏上有一个像 Skype 的紧凑视图按钮这样的按钮。我怎样才能做到这一点？

例如：

Answer 1

您可以使用非常漂亮但非常大的开源免费JVCL 库中免费提供的 JvCaptionButton 。它是一个通用的“字幕按钮”。警告：外观不是纯原生的，也不是Windows-7 航空主题。

此按钮不决定从您的应用程序中取出什么，您必须编写代码以使表单进入紧凑模式，您可以单击此标题栏按钮，并在其 OnClick 事件中编写代码。

在运行时：