Каково назначение приводимого ниже фрагмента Delphi-модуля, если процедура ShowSender является обработчиком щелчка мыши, а щелчок наносится по компоненту Button1 ?
- end;
- begin
- Edit1.Text:= Sender.ClassName;
- procedure ShowSender(Sender: TObject);
- Edit2.Text:= Sender.ClassParent.ClassName;
- Вывод имён TObject и TPersistent
- Вывод имён TWinControl и TControl
- Вывод имён TButtonControl и TWinControl
- Вывод имён класса, представленного значением Sender, и родителя этого класса
К сожалению, у нас пока нет статистики ответов на данный вопрос,
но мы работаем над этим.