delphi - 如何用 Delphi 创建一个非矩形按钮？

Question

如何用 Delphi 创建一个透明的非矩形按钮？

Answer 1

基本上，您使用SetWindowRgn来定义按钮/控件/窗口的形状。有关示例，请参见此处。

或者，如果您不介意键盘无法选择您的按钮，您也可以使用 TImage 并使用 OnMouseUp 事件。

或者在Torry上找到一个已经可以完成您想要的操作的 3rd 方按钮。

Answer 2

仅当您不介意它看起来很奇怪时才可以使用 SetWindowRgn - 落在该区域之外的位将完全消失。您最好的选择可能是从 TCustomTransparentControl 派生，但您随后需要进行自定义绘制。不过我怀疑，那幅定制画是你一直期待的吗？

Answer 3

Raize Components有一个名为 TRzShapeButton 的组件，但也可能有免费的替代品。