delphi - TCard 类没有公开的 OnShow 和 OnHide 事件

Question

在 Delphi 10.4 VCL 应用程序中，TCard（作为 的容器项TCardPanel）没有公共OnShow和OnHide事件（如TTabSheethas）。

因此，TCard.OnEnter当特定TCard对象被激活时，事件处理程序不会被触发。事件TCard.OnEnter处理程序仅在例如单击TCard.

示例代码：

CardPanel1.ActiveCard := Card2;

在这种情况下，TCard.OnEnter事件不会被触发！

TCard是否可以通过公共OnShow和活动升级课程OnHide？或者是否可以模拟这些事件？

Answer 1

使用 TCardPanel 的 OnCardChange 事件并将 PrevCard 和/或 NextCard 与您的实际卡实例进行比较。