[NKVD]

всем привет)защищал лабу.препод дал вопрос,который,как мне казалось, я знал)в итоге отправил готовиться)спросил что такое is и зачем нужно.я ему ответил.он сказал,что еще существуют частные случаи.вот про них я и хотел бы узнать


итак.предположим,что есть класс TA.от него наследуются классы TB и TС.

Object1:TA;
Object2:TB;
Object3:TA;

Object1:=TA.Create;
Object2:=TB.Create;
Object3:=TA.Create;



что будут возвращать данные операции?

Object1 is TA
Object1 is TB
Object1 is TC

Object2 is TA
Object2 is TB
Object2 is TC

Object3 is TA
Object3 is TB
Object3 is TC