FMX.Utils.ValidateInheritance
Delphi
procedure ValidateInheritance(const AValue: TPersistent; const AClass: TClass; const CanBeNil: Boolean = True);
C++
extern DELPHI_PACKAGE void __fastcall ValidateInheritance(System::Classes::TPersistent* const AValue, const System::TClass AClass, const bool CanBeNil = true);
Propriétés
Type | Visibilité | Source | Unité | Parent |
---|---|---|---|---|
procedure function |
public | FMX.Utils.pas FMX.Utils.hpp |
FMX.Utils | FMX.Utils |
Description
Vérifie qu'une classe est une instance d'une autre classe ou qu'elle hérite d'elle.
Si AValue
n'est pas une instance de AClass
ou hérite d'elle, ValidateInheritance déclenche une exception EArgumentException.
Si AValue
n'est pas nil et que CanBeNil
a pour valeur False
, ValidateInheritance déclenche une exception EArgumentNilException.
Exceptions
- EArgumentException est déclenchée si
AValue
ne remplit pas les conditions. - EArgumentNilException est déclenchée si la valeur de
AValue
ou deAClass
est nil.