TCard class 没有 public OnShow 和 OnHide 事件

TCard class does not have public OnShow and OnHide events

在 Delphi 10.4 VCL 应用程序中,TCard(作为 TCardPanel 的容器项)没有 public OnShowOnHide 事件(比如 TTabSheet 有)。

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

上的控件

示例代码:

CardPanel1.ActiveCard := Card2;

在这种情况下,不会触发 TCard.OnEnter 事件!

是否可以使用 public OnShowOnHide 事件升级 TCard class?或者是否可以模拟这些事件?

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