FMX.Utils.ValidateInheritance

• Übergeordnet: FMX.Utils

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);

Eigenschaften

Typ	Sichtbarkeit	Quelle	Unit	Übergeordnet
procedure function	public	FMX.Utils.pas FMX.Utils.hpp	FMX.Utils	FMX.Utils

Beschreibung

Überprüft, ob eine Klasse eine Instanz einer anderen Klasse oder davon abgeleitet ist.

Wenn AValue keine Instanz von AClass oder davon abgeleitet ist, löst ValidateInheritance eine EArgumentException aus.

Wenn AValue nicht nil und CanBeNil False ist, löst ValidateInheritance eine EArgumentNilException aus.

Exceptions

• EArgumentException wird ausgelöst, wenn AValue die Bedingungen nicht erfüllt.
• EArgumentNilException wird ausgelöst, wenn AValue oder AClass nil ist.

Siehe auch

• System.TObject.InheritsFrom
• System.TClass
• System.Classes.TPersistent