TcxPCButtonCanShowEvent = procedure(AButton: TcxPCButton; ATabIndex: Integer; var ACanShow: Boolean) of object;