Delphi справочник - Форум программистов - Навигация  
 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      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  


Основы Delphi
TObject
Тип
Тип базового класса, который является предком для всех других классов System unit
  
type TObject = class
   constructor Create;
   ...
   ...
   destructor Destroy; virtual;
end;
Описание
Тип 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
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия