6.5 Информация о классе
И
нформация
о классе храниться в спец. структуре
данных – RTTI. Эта структура
хранит всю информацию о классе все
экземпляры объекта класса используют
одну RTTI.
VMT – таблица виртуальных методов,
DMT - динамических
Указатель на класс + поля данных = экземпляр класса – объект.
Информация хранящаяся в RTTI может использоваться как явно так и не явно. Лучшее использование RTTI неявное, для этого служат 2 оператора:
is – проверят принадлежность экземпляра класса: O1 is TO1 – проверка, является ли O1 экземпляром TO1 или его наследником. Возвращает значение типа bool.
as – оператор приведения типов: with O1 as TO1 do … – O1 рассматривается как объект типа TO1, но может быть объектом любого класса наследников TO1.
В Delphi обработчики событий являются наследниками типа TObject (т.е. Sender : TObject).
Явное использование RTTI возможно если в программе использовать структуру RTTI и используется специальный тип переменной – указатель на класс, который объявляется следующим образом.
type
TO1 = class
…
end;
TO1 Class = class of TO1
Такой подход не рекомендуется использовать. Вместо прямого обращения к RTTI рекомендуется использовать спец. методы класса. Под методом класса понимают особую разновидность метода, который может вызываться из экземпляра класса. Эти методы предназначены для работы с RTTI. Объявляются эти методы в программе:
type
TO1 = class
…
class function GetName;
Класс TObject содержит все практически методы:
1) Create – создание конструктора
2) ClassName – метод который возвращает значение строковой переменной – имя класса
Пример применения указателей на класс:
type
TMyObject = class(TObject)
…
end;
//указатель на родительский класс
TMyObjClass = class of TObject;
var
//указатель на класс, получаем прямой доступ к RTTI
AmyObjRef : TMyObjClass;
begin
AMyObjRef : TObject;
writeln(AMyObject.ClassName); //TObject
AMyObjRef := TMyObject;
writeln(AMyObject.ClassName); //TMyObject
end;
Особенности архитектуры программ
Как известно среда Windows управляется событием. Это накладывает отпечаток на среду программ. Среда традиционных ОС предполагает, что приложения имеют структуру управляемую данными, т.е. решение о передачи управления принимается на основе анализа внутренних данных и наз. структура программы управляемой данными.
Среда Windows предполагает структуру управляемой событиями:
7 .1 Обработчики сообщений Windows в Delphi
Сообщение – информация о событии.
Все визуальные компоненты среды Delphi имеют встроенные обработчики сообщений верхнего уровня, определённые в TObject.
Обработчики сообщений – спец. методы представляющие собой набор динамических методов:
type
TMyControl = class(TWinControl)
…
procedure (var Message : TWMSize); message WM_SIZE;
…
end;
Тип (TWMSize) и константа (WM_SIZE) определены в модуле MESSAGES.
Визуальные компоненты – особые классы, имеющие визуальное представление в среде разработки (например TForm, TButton).
Вместо явной обработки сообщений Windows вводятся в Delphi механизм событий.
Рассмотрим пример, где показана обработка событий Delphi:
Под событием понимается св-во процедурного типа.
//Вводим процедурный тип
type
TMyEvent = procedure(Sender : TObject; …) of object;
// это позволяет рассматривать этот процедурный тип
// как процедурный тип метода объекта
// Вводим иерархию 2-х классов
T1stObject = class
FOnMyEvent : TMyEvent;
…
property OnMyEvent : TMyEvent read FonMyEvent
write FOnMyEvent;
// OnMyEvent – св-во процедурного типа (событие)
…
end;
// обработчик сообщений Windows
procedure T1stObject.MyMessageHandler(var Message …);
message WM_COMMAND;
begin
…
if Assigned(FOnMyEvent) then FOnMyEvent, …);
…
inherited; // вызов унаследованного обработчика
end;
Процедура обработки сообщений вызвала некую процедуру через поле FOnMyEvent. Эта процедура является обработчиком событий Delphi.
T2ndObject = class
procedure SetValue1(Sender : TObject, …);
procedure SetValue2(Sender : TObject, …);
end;
В этом класс событий Delphi. Адреса этих процедур могут присваиваться полю FOnMyEvent.
…
var
Obj1 : T1stObject;
Obj2 : T2stObject;
…
Obj1.OnMyEvent := Obj2.SetValue1;
Присвоение событию адрес метода – делегирование.