Typeof.PAS

Язык:
Русский
English


 { Пример программы для функции TypeOf }

procedure GraphicalObject.Move;
begin
 { В зависимости от типа полученного значения, }
 if TypeOf(Self) = TypeOf(ScrWindow) then
   { выполняем специальное действие, если перемещаем окно, или }
 else
   { если нет, то другое действие }
end;
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //