1. Виртуальный означает, что этот метод может быть изменен TBASS = Классовая процедура оповещения; 2. Переопределить изменение метода родительского класса с тем же именем Tchild1 = Class (TBASS) Alert;
