ЭтоПодкласс(<Тип>)
Тип: Булево.
Определяет, является ли текущий Тип (Type) производным от указанного в параметре типа.
Тип1 = Ф.Тип("Вкладка"); Тип2 = Ф.Тип("Панель"); Сообщить("ЭтоПодкласс = " + Тип1.ЭтоПодкласс(Тип2));
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Тип1 = Ф.Тип("Вкладка"); Тип2 = Ф.Тип("Панель"); Сообщить("Тип1 = " + Тип1.ВСтроку()); Сообщить("Тип2 = " + Тип2.ВСтроку()); Сообщить("ЭтоПодкласс = " + Тип1.ЭтоПодкласс(Тип2)); Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Тип1 = Ф.Тип("Вкладка"); Тип2 = Ф.Тип("Панель"); Сообщить(?( Тип1.ЭтоПодкласс(Тип2) , "", "!!! ") + "Тип.ЭтоПодкласс (Type.IsSubclassOf) Метод" + " " + ТекущаяДата());