Кто поскажет как поределить динамическая идентификация типа данных

[Владимир]

Вот ссылка что я хочу узнать: 

https://ru.wikipedia.org/wiki/%D0%94%D0%B8%D0%BD%D0%B0%D0%BC%D0%B8%D1%87%D0%B5%D1%81%D0%BA%D0%B0%D1%8F_%D0%B8%D0%B4%D0%B5%D0%BD%D1%82%D0%B8%D1%84%D0%B8%D0%BA%D0%B0%D1%86%D0%B8%D1%8F_%D1%82%D0%B8%D0%BF%D0%B0_%D0%B4%D0%B0%D0%BD%D0%BD%D1%8B%D1%85

 

 Пример на Delphi:

Type

  TClass0 = class

  end;

 

  TClass1 = class(TClass0) ;

  TClass2 = class(TClass0) ; 

 

 var

  tmp1: TClass1;

  tmp2: TClass2;

begin

  ... 

  if  (tmp1 is TClas0s) then

  begin

  end;

   if  (tmp2 is TClass0) then

  begin

  end;

end;

 Кто подскажет, кто поможет? 

[---]

factor_admin:

 Кто подскажет, кто поможет? 

в чем проблема отнаследовать всё от одного объекта (например CObject) и юзать его метод int Type()

  ?