Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB03ClassParent.shtml

TObject.ClassParent

Метод ClassParent

Затрагиваемые объекты Все объекты.
Назначение Метод ClassParent возвращает родительский класс объекта или класса.
Объявление class function ClassParent: TClass;
Пример синтаксиса
procedure  TForml.ButtonlClick(Sender: TObject); 
var //  Создать переменную типа TClass
   MyParent:   TClass;

begin 
// Сначала присвоить  тип класса Buttonl переменной MyParent
   MyParent := Buttonl.ClassType;
// Затем использовать ClassParent для определения
// родительского класса MyParent
   MyParent := MyParent.ClassParent;
// Наконец, вывести строку с ClassName
   Form1.Caption := MyParent.ClassName;

end;

Описание ClassParent возвращает непосредственный предок текущего класса. Возвращаемый тип ClassParent является TClass, который представляет собой прямого потомка TObject и в основном является тем же, что и TObject, поскольку не добавляет никакой функциональности к базовому классу. Обычно ClassParent используется для определения того, можно ли текущий объект законно присвоить другому объекту. TObject.ClassParent возвратит Nil ввиду того, что поскольку TObject не имеет родительского класса. Программисту приложений или компонентов редко приходится вызывать ClassParent, хотя внутренне ClassParent и используется операторами is и as, и методом InheritsFrom (описанным ниже).

[Метод ClassName] [Метод ClassParent] [Метод ClassType] [Метод Create] [Метод Destroy] [Метод Free] [Метод InheritsFrom] [Метод InstanceSize]


<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:56 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB03ClassParent.shtml