Справочник функций и процедур Delphi: TObject

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

 

TObject
Тип
Тип базового класса, который является предком для всех других классов System unit
  
type TObject = class
   constructor Create;
   ...
   ...
   destructor Destroy; virtual;
end;

Google  
 
Описание
Тип TObject определяет тип базового класса. Он является самым старым прародителем всех классов - каждый класс, в конечном счете, получен из TObject.

Из-за этого, каждый объект унаследовал методы TObject.

Методы TObject относятся к двум категориям - класс и не класс. Когда предустановленно ключевое слово Class, метод можно вызвать и в объекте класса, и в классе непосредственно. Такой статический метод не может обратиться ни к каким полям класса, потому что сам класс не имеет никаких данных, только объекты - имеют данные.

Некоторые ключевые (статические) методы Class:

function ClassName Выдает имя класса как строку
ClassParent Выдает имя родителя класса
ClassInfo Выдает Run Time информацию класса
InstanceSize Размер объекта класса в байтах
NewInstance Создает новый объект класса

Некоторые ключевые методы Object:

Create Создатель пустого объекта
Free Вызывает Destroy для ненулевых объектов
Destroy Высвобождение памяти объекта
AfterConstruction Вызывается после построения
BeforeDestruction Вызывается перед разрушением
Похожие команды
Class  Начинает объявление типа объектного класса

Printer  Возвращает ссылку к глобальному объекту Printer

 
Пример кода : Использование методов TObject унаследованных в подклассе TForm
begin
  // Форма модуля была получена от TObject.
  // Так что мы можем использовать методы TObject:
  ShowMessage('Имя класса объекта Form1 = '+
              Form1.ClassName);
  ShowMessage('Имя родительского класса объекта Form1 = '+
              Form1.ClassParent.ClassName);
  ShowMessage('Размер образца объекта Form1 = '+
              IntToStr(Form1.InstanceSize));

  // И теперь непосредственно TObject
  ShowMessage('Имя класса TObject = '+
              TObject.ClassName);
  ShowMessage('Размер образца TObject = '+
              IntToStr(TObject.InstanceSize));
end;
Имя класса объекта Form1 = TForm1
Имя родительского класса объекта Form1 = TForm
Размер образца объекта Form1 = 764
Имя класса TObject = TObject
Размер образца TObject = 4
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook