Введение в программирование. Pascal и Delphi. Гурьянов Л.В - 122 стр.

UptoLike

121
Рисунок 8.4 – Программа ConsoleExample (продолжение).
Процедура ReadElementsFromFile и главная программа
Пример:
if Sender is TEdit then
TEdit(Sender).Text := 'Пример оператора is';
В этом примере, если объект Sender принадлежит классу TEdit,
можно использовать свойство объекта Text.
8.1.4.2. Оператор as
Оператор as выполняет контролируемое преобразование типа
объекта к указанному классу.
Выражение
<объект> as <класс> возвращает тот же самый
объект, приведенный к указанному классу. Если преобразование не-
возможно, то формируется ошибка.
           Рисунок 8.4 – Программа ConsoleExample (продолжение).
           Процедура ReadElementsFromFile и главная программа
  Пример:
  if Sender is TEdit then
     TEdit(Sender).Text := 'Пример оператора is';
  В этом примере, если объект Sender принадлежит классу TEdit,
можно использовать свойство объекта Text.
  8.1.4.2. Оператор as
   Оператор as выполняет контролируемое преобразование типа
объекта к указанному классу.
   Выражение <объект> as <класс> возвращает тот же самый
объект, приведенный к указанному классу. Если преобразование не-
возможно, то формируется ошибка.


                                  121