Código Delphi [-] if instancia is TClaseAbstracta then ...;
if instancia is TClaseAbstracta then ...;
Código Delphi [-] if instancia.inheritsFrom(TClaseAbstracta) then ...;
if instancia.inheritsFrom(TClaseAbstracta) then ...;